Change 33276 by [EMAIL PROTECTED] on 2008/02/11 08:54:16
The "pointer" argument to S_restore_magic() is not not NULL, because
it's actually an integer index wedged into a pointer. (To fit within
the existing save stack API.)
Affected files ...
... //depot/perl/embed.fnc#576 edit
... //depot/perl/proto.h#910 edit
Differences ...
==== //depot/perl/embed.fnc#576 (text) ====
Index: perl/embed.fnc
--- perl/embed.fnc#575~33273~ 2008-02-10 11:17:13.000000000 -0800
+++ perl/embed.fnc 2008-02-11 00:54:16.000000000 -0800
@@ -1167,7 +1167,7 @@
s |int |magic_methpack |NN SV *sv|NN const MAGIC *mg|NN const char
*meth
s |int |magic_methcall |NN SV *sv|NN const MAGIC *mg|NN const char
*meth|I32 f \
|int n|NULLOK SV *val
-s |void |restore_magic |NN const void *p
+s |void |restore_magic |NULLOK const void *p
s |void |unwind_handler_stack|NN const void *p
#endif
==== //depot/perl/proto.h#910 (text+w) ====
Index: perl/proto.h
--- perl/proto.h#909~33273~ 2008-02-10 11:17:13.000000000 -0800
+++ perl/proto.h 2008-02-11 00:54:16.000000000 -0800
@@ -3086,9 +3086,7 @@
__attribute__nonnull__(pTHX_2)
__attribute__nonnull__(pTHX_3);
-STATIC void S_restore_magic(pTHX_ const void *p)
- __attribute__nonnull__(pTHX_1);
-
+STATIC void S_restore_magic(pTHX_ const void *p);
STATIC void S_unwind_handler_stack(pTHX_ const void *p)
__attribute__nonnull__(pTHX_1);
End of Patch.
