Change 18600: Retract the %_/SVf change (part of #18456) for PROTOTYPE (CV)

[Jarkko Hietaniemi]

Change 18600 by jhi@kosh on 2003/01/29 05:37:12

        Retract the %_/SVf change (part of #18456) for PROTOTYPE (CV)
        dumping (but now use SvPV_nolen).  (This change made an empty
        prototype to show up as "_" under -Uuseperlio.)

Affected files ...

... //depot/perl/dump.c#134 edit

Differences ...

==== //depot/perl/dump.c#134 (text) ====
Index: perl/dump.c
--- perl/dump.c#133~18558~      Wed Jan 22 05:05:27 2003
+++ perl/dump.c Tue Jan 28 21:37:12 2003
@@ -1299,7 +1299,7 @@
        break;
     case SVt_PVCV:
        if (SvPOK(sv))
-           Perl_dump_indent(aTHX_ level, file, "  PROTOTYPE = \"%"SVf"\"\n", sv);
+           Perl_dump_indent(aTHX_ level, file, "  PROTOTYPE = \"%s\"\n", 
+SvPV_nolen(sv));
        /* FALL THROUGH */
     case SVt_PVFM:
        do_hv_dump(level, file, "  COMP_STASH", CvSTASH(sv));
End of Patch.