URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [cpp/] [paste11.c] - Blame information for rev 816

Details | Compare with Previous | View Log


/* Copyright (C) 2000 Free Software Foundation, Inc.  */
 
/* { dg-do preprocess } */
 
/* Test correct pasting of identifiers and numbers.  We can paste any
   number, as long as no '.', '-' or '+' appears in its spelling.  */
 
#define glue(x, y) x ## y
 
glue (ident, 12)                /* OK.  */
glue (ident, 12e3)              /* OK.  */
glue (ident, 12e+3)             /* { dg-warning "valid preprocessing tok" } */
glue (ident, 12e-3)             /* { dg-warning "valid preprocessing tok" } */
glue (ident, 1.2)               /* { dg-warning "valid preprocessing tok" } */
glue (ident, .12)               /* { dg-warning "valid preprocessing tok" } */

Line No.	Rev	Author	Line
1	149	jeremybenn	`/* Copyright (C) 2000 Free Software Foundation, Inc. */`
2
3			`/* { dg-do preprocess } */`
4
5			`/* Test correct pasting of identifiers and numbers. We can paste any`
6			`number, as long as no '.', '-' or '+' appears in its spelling. */`
7
8			`#define glue(x, y) x ## y`
9
10			`glue (ident, 12) /* OK. */`
11			`glue (ident, 12e3) /* OK. */`
12			`glue (ident, 12e+3) /* { dg-warning "valid preprocessing tok" } */`
13			`glue (ident, 12e-3) /* { dg-warning "valid preprocessing tok" } */`
14			`glue (ident, 1.2) /* { dg-warning "valid preprocessing tok" } */`
15			`glue (ident, .12) /* { dg-warning "valid preprocessing tok" } */`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [cpp/] [paste11.c] - Blame information for rev 816