gcc/testsuite/gcc.dg/cpp/paste10.c

   1 /* Copyright (C) 2000 Free Software Foundation, Inc.  */
   2
   3 /* { dg-do preprocess } */
   4 /* { dg-options "" } */
   5
   6 /* This testcase used to produce a bogus "invalid paste" warning, owing
   7    to not clearing a PASTE_LEFT flag.  */
   8
   9 #define strcpy(src) __strcpy_small (src)
  10
  11 #define __strcpy_small(src) src
  12
  13 #define tprintf(format, args...) sprintf(format, ## args)
  14
  15 strcpy(tprintf("<%s>", test))