diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2014-06-19 22:03:25 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2014-06-20 07:09:12 -0400 |
| commit | c1d6452f050377e0a41737b56b61d63ea95b3abe (patch) | |
| tree | bd2485b4ee00ec0f5544a2accc9a6dffdd859e04 /inline.h | |
| parent | dd791c72c136e634557810ed390db9ed30f1576f (diff) | |
| download | perl-c1d6452f050377e0a41737b56b61d63ea95b3abe.tar.gz | |
GCC_DIAG_IGNORE/RESTORE whine in non-gcc if at file level.
Diffstat (limited to 'inline.h')
| -rw-r--r-- | inline.h | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -188,13 +188,17 @@ S_sv_or_pv_pos_u2b(pTHX_ SV *sv, const char *pv, STRLEN pos, STRLEN *lenp) /* ------------------------------- handy.h ------------------------------- */ /* saves machine code for a common noreturn idiom typically used in Newx*() */ +#ifdef GCC_DIAG_PRAGMA GCC_DIAG_IGNORE(-Wunused-function); +#endif static void S_croak_memory_wrap(void) { Perl_croak_nocontext("%s",PL_memory_wrap); } +#ifdef GCC_DIAG_PRAGMA GCC_DIAG_RESTORE; +#endif /* ------------------------------- utf8.h ------------------------------- */ |