URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [cpp/] [paste10.c] - Blame information for rev 801

Go to most recent revision | Details | Compare with Previous | View Log


/* Copyright (C) 2000 Free Software Foundation, Inc.  */
 
/* { dg-do preprocess } */
/* { dg-options "" } */
 
/* This testcase used to produce a bogus "invalid paste" warning, owing
   to not clearing a PASTE_LEFT flag.  */
 
#define strcpy(src) __strcpy_small (src)
 
#define __strcpy_small(src) src
 
#define tprintf(format, args...) sprintf(format, ## args)
 
strcpy(tprintf("<%s>", test))

Line No.	Rev	Author	Line
1	689	jeremybenn	`/* 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))`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [cpp/] [paste10.c] - Blame information for rev 801