OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

paste2.c: Update test.

Browse Source 
* gcc.dg/cpp/paste2.c: Update test.
        * objc/execute/paste.m: New test.

From-SVN: r37597
This commit is contained in:
Neil Booth 2000-11-21 00:00:50 +00:00 committed by Neil Booth
parent d63eefbf11
commit e6afac9494
3 changed files with 30 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,8 @@
2000-11-20 Neil Booth <neilb@earthling.net>
* gcc.dg/cpp/paste2.c: Update test.
* objc/execute/paste.m: New test.
2000-11-20 Joseph S. Myers <jsm28@cam.ac.uk>
* gcc.dg/c99-condexpr-1.c: New test.

6
gcc/testsuite/gcc.dg/cpp/paste2.c
View File

@ -106,10 +106,12 @@ int main ()
err ("Various operator pasting");
if (strcmp (hh, "%:%:"))
err ("Pasted digraph spelling");
if ((glue (., 1) glue (!, =) .1))
err ("Pasted numbers 1");
/* glue3 here will only work if we paste left-to-right. If a
future implementation does not do this, change the test. */
if ((glue (., 0) glue (=, =) .0) + (glue3 (1.0e, +, 1) == 10.0) != 2)
err ("Pasted numbers");
if (glue3 (1.0e, +, 1) != 10.0)
err ("Pasted numbers 2");
}
return 0;

21
gcc/testsuite/objc/execute/paste.m Normal file
View File

@ -0,0 +1,21 @@
/* Copyright (C) 2000 Free Software Foundation, Inc. */
/* { dg-do run } */
/* { dg-options "" } */
#define str(x) #x
#define xstr(x) str(x)
#define glue(x, y) x ## y
extern int strcmp (const char *, const char *);
extern int puts (const char *);
extern void abort (void);
#define err(str) do { puts(str); abort(); } while (0)
int
main ()
{
/* Test Objective C names. */
if (strcmp (xstr (glue (@, ident)), "@ident"))
err ("Objective C names");
return 0;
}