procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* gcc.dg/cpp/sysmac1.c, sysmac2.c: New testcases.

Browse source 
From-SVN: r39662
This commit is contained in:
Neil Booth 2001-02-14 07:39:40 +00:00 • committed by Neil Booth
parent 7065e130e0
commit ceeaadbb78
3 changed files with 70 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
gcc/testsuite/ChangeLog
View file

@ -1,3 +1,7 @@
2001-02-14 Neil Booth <neil@daikokuya.demon.co.uk>
* gcc.dg/cpp/sysmac1.c, sysmac2.c: New tests.
2001-02-12 Geoffrey Keating <geoffk@redhat.com>
* g++.dg/vtgc1.C: Update for new ABI.

32
gcc/testsuite/gcc.dg/cpp/sysmac1.c Normal file
View file

@ -0,0 +1,32 @@
/* Copyright (C) 2001 Free Software Foundation, Inc. */
/* { dg-do preprocess } */
/* { dg-options "-std=gnu99 -pedantic -Wtraditional" } */
/* Tests diagnostics are suppressed for some macros defined in system
headers. */
/* Source: Neil Booth, 15 Jan 2001. */
#define uint 1U
#define str(x) x
#define foo(x, y...) bar(x, ##y) /* { dg-warning "named variadic macros" } */
# 16 "system.h" 1 3 /* { dg-warning "followed by integer" } */
#define sys_uint 1U
#define sys_str(x) x
#define sys_foo(x, y...) bar (x, ##y)
# 22 "bar.c" 2 /* { dg-warning "expected to return" } */
#if uint /* { dg-warning "traditional C rejects" } */
#endif
#if sys_uint /* { dg-bogus "traditional C rejects" } */
#endif
(str); /* { dg-warning "used with arguments" } */
(sys_str); /* { dg-bogus "used with arguments" } */
foo (one_arg); /* { dg-warning "requires rest arguments" } */
sys_foo (one_arg); /* { dg-bogus "requires rest arguments" } */

34
gcc/testsuite/gcc.dg/cpp/sysmac2.c Normal file
View file

@ -0,0 +1,34 @@
/* Copyright (C) 2001 Free Software Foundation, Inc. */
/* { dg-do compile } */
/* { dg-options "-std=gnu99 -pedantic -Wtraditional" } */
/* Tests diagnostics are suppressed for some macros defined in system
headers. */
/* Source: Neil Booth, 15 Jan 2001. */
#define uint 1U
#define fl 1.0f
#define ld 1.0L
# 16 "system.h" 1 3 /* { dg-warning "followed by integer" } */
#define sys_uint 1U
#define sys_fl 1.0f
#define sys_ld 1.0L
# 22 "bar.c" 2 /* { dg-warning "expected to return" } */
int
main ()
{
int u1 = uint; /* { dg-warning "traditional C rejects" } */
int u2 = sys_uint; /* { dg-bogus "traditional C rejects" } */
float f1 = fl; /* { dg-warning "traditional C rejects" } */
float f2 = sys_fl; /* { dg-bogus "traditional C rejects" } */
long double ld1 = ld; /* { dg-warning "traditional C rejects" } */
long double l2 = sys_ld; /* { dg-bogus "traditional C rejects" } */
return 0;
}