8sa1-gcc/gcc/testsuite/gcc.dg/cpp/20000625-2.c
2001-09-25 06:18:03 +00:00

31 lines
711 B
C

/* More paste corner cases from glibc. */
/* { dg-do run } */
#include <stdlib.h>
#include <string.h>
#define symbol_version(name, version) name##@##version
#define str(x) xstr(x)
#define xstr(x) #x
/* This testcase is bogus, as it testing undefined behaviour. We can
get the behaviour GLIBC desires by removing the space before
GCLIB_2.0 in this line. */
const char a[] = str(symbol_version(getrlimit,GLIBC_2.0));
/* { dg-warning "valid preprocessing token" "" { target *-*-* } 14 } */
const char b[] = str(getrlimit@GLIBC_2.0);
const char c[] = "getrlimit@GLIBC_2.0";
int
main(void)
{
if(strcmp(a, b))
abort();
if(strcmp(b, c))
abort();
if(strcmp(c, a))
abort();
return 0;
}