OSDN Git Service

PR preprocessor/30805:
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.dg / cpp / assembler.S
1 /* Regression test - in assembly language, # may have some significance
2    other than 'stringize macro argument' and therefore must be preserved
3    in the output, and should not be warned about.  */
4
5 /* { dg-do preprocess } */
6 /* { dg-options "" } */
7
8 #define foo() mov r0, #5  /* { dg-bogus "not followed" "spurious warning" } */
9
10 entry:
11         foo()
12
13 /* Check we don't EOF on an unknown directive.  */
14 #unknown directive
15 #error a later diagnostic       /* { dg-error "diagnostic" } */
16                 
17 /*
18    { dg-final { if ![file exists 20000510-1.i] { return }       } }
19    { dg-final { set tmp [grep 20000510-1.i # line]              } }
20    { dg-final { if {[string length $tmp] > 0} \{                } }
21    { dg-final {     pass "20000510-1.S: # preservation"         } }
22    { dg-final { \} else \{                                      } }
23    { dg-final {     fail "20000510-1.S: # preservation"         } }
24    { dg-final { \}                                              } }
25 */
26