gnu/dist/gcc4/gcc/testsuite/gcc.dg/cpp/20000625-1.c

   1 /* Regression test for paste corner cases.  Distilled from
   2    syscall stub logic in glibc.  */
   3
   4 /* { dg-do compile } */
   5
   6 #define ENTRY(name)     name##:
   7 #define socket bind
   8
   9 int
  10 main(void)
  11 {
  12   goto socket;
  13
  14   ENTRY(socket) /* { dg-warning "valid preprocessing token" "" } */
  15     return 0;
  16 }