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.