Re: [PATCH] Copy on write for $& and $1...

Message-ID: <20030216230950.GB276@Bagpuss.unfortu.net>

p4raw-id: //depot/perl@18736

diff --git a/sv.c b/sv.c
index 5c7ccec..98d70a4 100644 (file)
--- a/sv.c
+++ b/sv.c
@@ -11187,7 +11187,7 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags,
     PL_reg_oldsaved    = Nullch;
     PL_reg_oldsavedlen = 0;
 #ifdef PERL_COPY_ON_WRITE
-    PL_nrs             = NullSv;
+    PL_nrs             = Nullsv;
 #endif
     PL_reg_maxiter     = 0;
     PL_reg_leftiter    = 0;