diff options
author | Nicholas Clark <nick@ccl4.org> | 2007-09-17 20:19:51 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2007-09-17 20:19:51 +0000 |
commit | 63cce26687370b3ba78dbefdce4cf6886ac91900 (patch) | |
tree | cc93a2c40a2761334444ab25d9a7757069787429 /mathoms.c | |
parent | 539f2c5426314080e02054800a435b5de46b293e (diff) | |
download | perl-63cce26687370b3ba78dbefdce4cf6886ac91900.tar.gz |
Remove dead code surrounded by #if 0 from mathoms.c
p4raw-id: //depot/perl@31888
Diffstat (limited to 'mathoms.c')
-rw-r--r-- | mathoms.c | 20 |
1 files changed, 0 insertions, 20 deletions
@@ -533,16 +533,6 @@ Perl_hv_magic(pTHX_ HV *hv, GV *gv, int how) sv_magic((SV*)hv, (SV*)gv, how, NULL, 0); } -#if 0 /* use the macro from hv.h instead */ - -char* -Perl_sharepvn(pTHX_ const char *sv, I32 len, U32 hash) -{ - return HEK_KEY(share_hek(sv, len, hash)); -} - -#endif - AV * Perl_av_fake(pTHX_ register I32 size, register SV **strp) { @@ -673,16 +663,6 @@ Perl_save_hints(pTHX) Perl_croak(aTHX_ "internal error: obsolete function save_hints() called"); } -#if 0 -OP * -Perl_ck_retarget(pTHX_ OP *o) -{ - Perl_croak(aTHX_ "NOT IMPL LINE %d",__LINE__); - /* STUB */ - return o; -} -#endif - OP * Perl_oopsCV(pTHX_ OP *o) { |