summaryrefslogtreecommitdiff
path: root/dump.c
diff options
context:
space:
mode:
authorJan Dubois <jand@activestate.com>1999-01-24 02:12:00 +0100
committerGurusamy Sarathy <gsar@cpan.org>1999-02-12 13:25:59 +0000
commit9e7bc3e8c0a5a5a357a2bda9981a86c5a61092c1 (patch)
treedc6c1d0c460cd55c7d2b7b74378919964cf50799 /dump.c
parent01e22528c2c3f941ba946b303423dfa59ea39444 (diff)
downloadperl-9e7bc3e8c0a5a5a357a2bda9981a86c5a61092c1.tar.gz
remove OVERLOAD conditionals
Message-ID: <36b66479.62756298@smtp1.ibm.net> p4raw-id: //depot/perl@2903
Diffstat (limited to 'dump.c')
-rw-r--r--dump.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/dump.c b/dump.c
index 77b3604706..baf3b40f3e 100644
--- a/dump.c
+++ b/dump.c
@@ -632,10 +632,8 @@ do_magic_dump(I32 level, PerlIO *file, MAGIC *mg, I32 nest, I32 maxnest, bool du
#ifdef USE_LOCALE_COLLATE
else if (v == &PL_vtbl_collxfrm) s = "collxfrm";
#endif
-#ifdef OVERLOAD
else if (v == &PL_vtbl_amagic) s = "amagic";
else if (v == &PL_vtbl_amagicelem) s = "amagicelem";
-#endif
if (s)
dump_indent(level, file, " MG_VIRTUAL = &PL_vtbl_%s\n", s);
else
@@ -769,9 +767,7 @@ do_sv_dump(I32 level, PerlIO *file, SV *sv, I32 nest, I32 maxnest, bool dumpops,
if (flags & SVf_FAKE) sv_catpv(d, "FAKE,");
if (flags & SVf_READONLY) sv_catpv(d, "READONLY,");
-#ifdef OVERLOAD
if (flags & SVf_AMAGIC) sv_catpv(d, "OVERLOAD,");
-#endif /* OVERLOAD */
if (flags & SVp_IOK) sv_catpv(d, "pIOK,");
if (flags & SVp_NOK) sv_catpv(d, "pNOK,");
if (flags & SVp_POK) sv_catpv(d, "pPOK,");