diff options
Diffstat (limited to 'gcc/testsuite/gcc.dg/cpp/_Pragma1.c')
| -rw-r--r-- | gcc/testsuite/gcc.dg/cpp/_Pragma1.c | 41 |
1 files changed, 41 insertions, 0 deletions
diff --git a/gcc/testsuite/gcc.dg/cpp/_Pragma1.c b/gcc/testsuite/gcc.dg/cpp/_Pragma1.c new file mode 100644 index 00000000000..8759b0a0824 --- /dev/null +++ b/gcc/testsuite/gcc.dg/cpp/_Pragma1.c @@ -0,0 +1,41 @@ +/* Copyright (C) 2000 Free Software Foundation, Inc. */ + +/* { dg-do preprocess } */ + +/* Tests the _Pragma operator. Contributed by Neil Booth 1 Nov 2000. */ + +/* Within the preprocessor, the easy pragma to test is "poison". */ + +#pragma GCC poison p1 +p1 /* { dg-error "poisoned" } */ + +/* Standard use of _Pragma. */ +_Pragma ("GCC poison p2") +p2 /* { dg-error "poisoned" } */ + +/* I can see no reason it cannot appear in a directive. Check we + enter the conditional. Putting the _Pragma at EOL also catches + nasties like not saving current lexer state properly. Also test + that wide strings are OK. */ +#if 1 _Pragma (L"GCC poison p3") +p3 /* { dg-error "poisoned" } */ +#endif + +#define M1 _Pragma ("GCC poison p4") +p4 /* No problem; not yet poisoned. */ +#define M2(x) _Pragma (#x) + +/* Now test macro expansion with embedded _Pragmas. */ +M1 p4 /* { dg-error "poisoned" } */ +M2 (GCC poison p5) p5 /* { dg-error "poisoned" } */ + +/* Look, ma! These things even nest. */ +_Pragma ("_Pragma (\"GCC poison p6\") GCC poison p7") +p6 /* { dg-error "poisoned" } */ +p7 /* { dg-error "poisoned" } */ + +/* Check we ignore them in false conditionals. */ +#if 0 +_Pragma ("GCC poison p8") +#endif +p8 /* No problem. */ |
