diff options
| author | Nicholas Clark <nick@ccl4.org> | 2007-12-28 09:59:06 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2007-12-28 09:59:06 +0000 |
| commit | 5c35adbb8fc4c988807097c4d379e2485ada5865 (patch) | |
| tree | 68cb0d31f61fbabefe05d3673ae29eefe3550118 /universal.c | |
| parent | 662f1f9e0a1bbee45e1e02386151364c8517604e (diff) | |
| download | perl-5c35adbb8fc4c988807097c4d379e2485ada5865.tar.gz | |
First class regexps.
p4raw-id: //depot/perl@32751
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/universal.c b/universal.c index fa0ccd309b..7fc2ad367c 100644 --- a/universal.c +++ b/universal.c @@ -205,7 +205,6 @@ XS(XS_Internals_SvREADONLY); XS(XS_Internals_SvREFCNT); XS(XS_Internals_hv_clear_placehold); XS(XS_PerlIO_get_layers); -XS(XS_Regexp_DESTROY); XS(XS_Internals_hash_seed); XS(XS_Internals_rehash_seed); XS(XS_Internals_HvREHASH); @@ -269,7 +268,6 @@ Perl_boot_core_UNIVERSAL(pTHX) XS_Internals_hv_clear_placehold, file, "\\%"); newXSproto("PerlIO::get_layers", XS_PerlIO_get_layers, file, "*;@"); - newXS("Regexp::DESTROY", XS_Regexp_DESTROY, file); newXSproto("Internals::hash_seed",XS_Internals_hash_seed, file, ""); newXSproto("Internals::rehash_seed",XS_Internals_rehash_seed, file, ""); newXSproto("Internals::HvREHASH", XS_Internals_HvREHASH, file, "\\%"); @@ -881,12 +879,6 @@ XS(XS_Internals_hv_clear_placehold) } } -XS(XS_Regexp_DESTROY) -{ - PERL_UNUSED_CONTEXT; - PERL_UNUSED_ARG(cv); -} - XS(XS_PerlIO_get_layers) { dVAR; |