Change 34968 by [EMAIL PROTECTED] on 2008/12/01 13:19:41
Implement Perl_save_delete() using save_pushptri32ptr().
Affected files ...
... //depot/perl/scope.c#246 edit
Differences ...
==== //depot/perl/scope.c#246 (text) ====
Index: perl/scope.c
--- perl/scope.c#245~34967~ 2008-12-01 03:54:42.000000000 -0800
+++ perl/scope.c 2008-12-01 05:19:41.000000000 -0800
@@ -505,11 +505,7 @@
PERL_ARGS_ASSERT_SAVE_DELETE;
- SSCHECK(4);
- SSPUSHPTR(key);
- SSPUSHINT(klen);
- SSPUSHPTR(SvREFCNT_inc_simple(hv));
- SSPUSHINT(SAVEt_DELETE);
+ save_pushptri32ptr(key, klen, SvREFCNT_inc_simple(hv), SAVEt_DELETE);
}
void
End of Patch.
