diff options
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/universal.c b/universal.c index 6b011cf27b..cecf17b64b 100644 --- a/universal.c +++ b/universal.c @@ -726,6 +726,7 @@ XS(XS_PerlIO_get_layers) dXSARGS; if (items < 1 || items % 2 == 0) Perl_croak(aTHX_ "Usage: PerlIO_get_layers(filehandle[,args])"); +#ifdef USE_PERLIO { SV * sv; GV * gv; @@ -841,6 +842,7 @@ XS(XS_PerlIO_get_layers) XSRETURN(nitem); } } +#endif XSRETURN(0); } |