This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
One more Win32 compilation clean-up (for when using -DDEBUGGING)
authorSteve Hay <SteveHay@planit.com>
Thu, 31 Mar 2005 07:55:12 +0000 (07:55 +0000)
committerSteve Hay <SteveHay@planit.com>
Thu, 31 Mar 2005 07:55:12 +0000 (07:55 +0000)
p4raw-id: //depot/perl@24109

sv.c

diff --git a/sv.c b/sv.c
index 51c9c74..73aed10 100644 (file)
--- a/sv.c
+++ b/sv.c
@@ -11583,7 +11583,7 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags,
 #  ifdef DEBUGGING
     Poison(my_perl, 1, PerlInterpreter);
     PL_op = Nullop;
-    PL_curcop = Nullop;
+    PL_curcop = (COP *)Nullop;
     PL_markstack = 0;
     PL_scopestack = 0;
     PL_savestack = 0;
@@ -11617,7 +11617,7 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags,
 #    ifdef DEBUGGING
     Poison(my_perl, 1, PerlInterpreter);
     PL_op = Nullop;
-    PL_curcop = Nullop;
+    PL_curcop = (COP *)Nullop;
     PL_markstack = 0;
     PL_scopestack = 0;
     PL_savestack = 0;