repo.or.cz
/
gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Fortran: Fix PR 47485.
[gcc.git]
/
gcc
/
testsuite
/
g++.dg
/
torture
/
pushpop_macro.C
blob
98065e6ee79e0dc84398516a16fb73a4d96acaac
1
/* Do the preprocessor push_macro/pop_macro test. */
2
3
/* { dg-do run } */
4
5
extern "C" void abort ();
6
7
#define _ 2
8
#pragma push_macro("_")
9
#undef _
10
#define _ 1
11
#pragma pop_macro("_")
12
13
int main ()
14
{
15
if (_ != 2)
16
abort ();
17
return 0;
18
}
19