URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Go to most recent revision |
Only display areas with differences |
Details |
Blame |
View Log
Rev 154 |
Rev 816 |
/* Test for recognition of digraphs: should be recognized in C94 and C99
|
/* Test for recognition of digraphs: should be recognized in C94 and C99
|
mode, but not in C90 mode. Also check correct stringizing.
|
mode, but not in C90 mode. Also check correct stringizing.
|
*/
|
*/
|
/* Origin: Joseph Myers <jsm28@cam.ac.uk> */
|
/* Origin: Joseph Myers <jsm28@cam.ac.uk> */
|
/* { dg-do run } */
|
/* { dg-do run } */
|
/* { dg-options "-std=iso9899:1999 -pedantic-errors" } */
|
/* { dg-options "-std=iso9899:1999 -pedantic-errors" } */
|
|
|
#define str(x) xstr(x)
|
#define str(x) xstr(x)
|
#define xstr(x) #x
|
#define xstr(x) #x
|
#define foo(p, q) str(p %:%: q)
|
#define foo(p, q) str(p %:%: q)
|
|
|
extern void abort (void);
|
extern void abort (void);
|
extern int strcmp (const char *, const char *);
|
extern int strcmp (const char *, const char *);
|
|
|
int
|
int
|
main (void)
|
main (void)
|
{
|
{
|
const char *t = foo (1, 2);
|
const char *t = foo (1, 2);
|
const char *u = str (<:);
|
const char *u = str (<:);
|
if (strcmp (t, "12") || strcmp (u, "<:"))
|
if (strcmp (t, "12") || strcmp (u, "<:"))
|
abort ();
|
abort ();
|
else
|
else
|
return 0;
|
return 0;
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.