Change 34982 by [EMAIL PROTECTED] on 2008/12/02 17:47:19
Silence a compiler warning introduced by 34963
Affected files ...
... //depot/perl/embed.fnc#665 edit
... //depot/perl/proto.h#996 edit
Differences ...
==== //depot/perl/embed.fnc#665 (text) ====
Index: perl/embed.fnc
--- perl/embed.fnc#664~34972~ 2008-12-01 13:28:13.000000000 -0800
+++ perl/embed.fnc 2008-12-02 09:47:19.000000000 -0800
@@ -925,7 +925,7 @@
Ap |SV* |save_svref |NN SV** sptr
Ap |void |save_pushptr |NULLOK void *const ptr|const int type
: Used by SAVECOPARYBASE() in op.c
-p |void |save_pushi32ptr|I32 i|NULLOK void *const ptr|const int type
+p |void |save_pushi32ptr|const I32 i|NULLOK void *const ptr|const int
type
: Used by SAVESWITCHSTACK() in pp.c
p |void |save_pushptrptr|NULLOK void *const ptr1 \
|NULLOK void *const ptr2|const int type
==== //depot/perl/proto.h#996 (text+w) ====
Index: perl/proto.h
--- perl/proto.h#995~34972~ 2008-12-01 13:28:13.000000000 -0800
+++ perl/proto.h 2008-12-02 09:47:19.000000000 -0800
@@ -2914,7 +2914,7 @@
assert(sptr)
PERL_CALLCONV void Perl_save_pushptr(pTHX_ void *const ptr, const int
type);
-PERL_CALLCONV void Perl_save_pushi32ptr(pTHX_ I32 i, void *const ptr,
const int type);
+PERL_CALLCONV void Perl_save_pushi32ptr(pTHX_ const I32 i, void *const
ptr, const int type);
PERL_CALLCONV void Perl_save_pushptrptr(pTHX_ void *const ptr1, void
*const ptr2, const int type);
#if defined(PERL_IN_SCOPE_C) || defined(PERL_DECL_PROT)
STATIC void S_save_pushptri32ptr(pTHX_ void *const ptr1, const I32 i, void
*const ptr2, const int type);
End of Patch.
