summaryrefslogtreecommitdiff
path: root/mathoms.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2007-09-17 20:19:51 +0000
committerNicholas Clark <nick@ccl4.org>2007-09-17 20:19:51 +0000
commit63cce26687370b3ba78dbefdce4cf6886ac91900 (patch)
treecc93a2c40a2761334444ab25d9a7757069787429 /mathoms.c
parent539f2c5426314080e02054800a435b5de46b293e (diff)
downloadperl-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.c20
1 files changed, 0 insertions, 20 deletions
diff --git a/mathoms.c b/mathoms.c
index 4f8ee56926..05be2baec6 100644
--- a/mathoms.c
+++ b/mathoms.c
@@ -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)
{