diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-04-16 12:13:07 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-04-16 12:13:07 +0000 |
| commit | 9d569fce7e05dcd53624075ce9247bfbc6ef263e (patch) | |
| tree | e385d21c7ccde9dc69b0f0820985490ee507b3fa /universal.c | |
| parent | 2ae85e5961e1ee7057020436524ffba6c7125d25 (diff) | |
| download | perl-9d569fce7e05dcd53624075ce9247bfbc6ef263e.tar.gz | |
Use the right prototype and a glob is fine (from Rafael).
p4raw-id: //depot/perl@19235
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/universal.c b/universal.c index cecf17b64b..39a724df47 100644 --- a/universal.c +++ b/universal.c @@ -219,7 +219,8 @@ Perl_boot_core_UNIVERSAL(pTHX) newXSproto("Internals::SvREFCNT",XS_Internals_SvREFCNT, file, "\\[$%@];$"); newXSproto("Internals::hv_clear_placeholders", XS_Internals_hv_clear_placehold, file, "\\%"); - newXS("PerlIO::get_layers", XS_PerlIO_get_layers, file); + newXSproto("PerlIO::get_layers", + XS_PerlIO_get_layers, file, "*;@"); } |