diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-10 20:38:39 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-10 20:38:39 +0000 |
| commit | 5dc8bdac4bb193458aa47dbb909b9b8f2afd9454 (patch) | |
| tree | efe51a78a8ea8e3e03208074fdb288045b2aa6bf /perl.h | |
| parent | 506c03b266d78b00129543635789e26faa9166fb (diff) | |
| download | perl-5dc8bdac4bb193458aa47dbb909b9b8f2afd9454.tar.gz | |
gcc -ansi -pedantic cleanup; and a seemingly forgotten
sv_placeholder hunk.
p4raw-id: //depot/perl@20605
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -207,6 +207,10 @@ register struct op *Perl_op asm(stringify(OP_IN_REGISTER)); # endif #endif +#if defined(__STRICT_ANSI__) && defined(PERL_GCC_PEDANTIC) +# define PERL_GCC_BRACE_GROUPS_FORBIDDEN +#endif + /* * STMT_START { statements; } STMT_END; * can be used as a single statement, as in @@ -215,7 +219,7 @@ register struct op *Perl_op asm(stringify(OP_IN_REGISTER)); * Trying to select a version that gives no warnings... */ #if !(defined(STMT_START) && defined(STMT_END)) -# if defined(__GNUC__) && !defined(__STRICT_ANSI__) && !defined(PERL_GCC_PEDANTIC) && !defined(__cplusplus) +# if defined(__GNUC__) && !defined(PERL_GCC_BRACE_GROUPS_FORBIDDEN) && !defined(__cplusplus) # define STMT_START (void)( /* gcc supports ``({ STATEMENTS; })'' */ # define STMT_END ) # else |