gcc/testsuite/gcc.dg/cpp/trad/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
   7 #ifndef FOO
   8 #1                      /* Once caused a bogus unterminated #ifndef.  */
   9 #endif
  10
  11 #define foo() mov r0, #5  /* { dg-bogus "not followed" "spurious warning" } */
  12
  13 entry:
  14         foo()
  15
  16 /* Check we don't EOF on an unknown directive.  */
  17 #unknown directive
  18 #error a later diagnostic       /* { dg-error "diagnostic" } */
  19
  20 /*
  21    { dg-final { if ![file exists 20000510-1.i] { return }       } }
  22    { dg-final { set tmp [grep 20000510-1.i # line]              } }
  23    { dg-final { if {[string length $tmp] > 0} \{                } }
  24    { dg-final {     pass "20000510-1.S: # preservation"         } }
  25    { dg-final { \} else \{                                      } }
  26    { dg-final {     fail "20000510-1.S: # preservation"         } }
  27    { dg-final { \}                                              } }
  28 */
  29