diff options
author | Jan Dubois <jand@activestate.com> | 1999-01-24 02:12:00 +0100 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-02-12 13:25:59 +0000 |
commit | 9e7bc3e8c0a5a5a357a2bda9981a86c5a61092c1 (patch) | |
tree | dc6c1d0c460cd55c7d2b7b74378919964cf50799 /dump.c | |
parent | 01e22528c2c3f941ba946b303423dfa59ea39444 (diff) | |
download | perl-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.c | 4 |
1 files changed, 0 insertions, 4 deletions
@@ -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,"); |