2003-12-26 Guilhem Lavaux <guilhem@kaffe.org>
[official-gcc.git] / gcc / testsuite / gcc.dg / cpp / paste10.c
blobab3cb9050bee8a3b678987e06042946aba664163
1 /* Copyright (C) 2000 Free Software Foundation, Inc. */
3 /* { dg-do preprocess } */
4 /* { dg-options "" } */
6 /* This testcase used to produce a bogus "invalid paste" warning, owing
7 to not clearing a PASTE_LEFT flag. */
9 #define strcpy(src) __strcpy_small (src)
11 #define __strcpy_small(src) src
13 #define tprintf(format, args...) sprintf(format, ## args)
15 strcpy(tprintf("<%s>", test))