Change 33626 by [EMAIL PROTECTED] on 2008/04/01 18:47:01

        Add the correct argument assertion macro to sv_insert_flags().
        Don't want anything wrongly marked as non-NULL slipping through.

Affected files ...

... //depot/perl/sv.c#1533 edit

Differences ...

==== //depot/perl/sv.c#1533 (text) ====
Index: perl/sv.c
--- perl/sv.c#1532~33618~       2008-03-31 12:48:26.000000000 -0700
+++ perl/sv.c   2008-04-01 11:47:01.000000000 -0700
@@ -5149,6 +5149,7 @@
 Perl_sv_insert(pTHX_ SV *const bigstr, const STRLEN offset, const STRLEN len, 
               const char *const little, const STRLEN littlelen)
 {
+    PERL_ARGS_ASSERT_SV_INSERT;
     sv_insert_flags(bigstr, offset, len, little, littlelen, SV_GMAGIC);
 }
 
@@ -5171,7 +5172,7 @@
     register I32 i;
     STRLEN curlen;
 
-    PERL_ARGS_ASSERT_SV_INSERT;
+    PERL_ARGS_ASSERT_SV_INSERT_FLAGS;
 
     if (!bigstr)
        Perl_croak(aTHX_ "Can't modify non-existent substring");
End of Patch.

Reply via email to