summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2008-12-01 11:27:31 +0000
committerNicholas Clark <nick@ccl4.org>2008-12-01 11:27:31 +0000
commitbe84297eef8d269e574a1aac0dbf18f3c3b7341d (patch)
tree5d9d8f823e02dd8bd4e9645a1f486b82ab9095dc /embed.fnc
parentda8315f8f4d9d4df8cbebe108ef0ddb4795856d7 (diff)
downloadperl-be84297eef8d269e574a1aac0dbf18f3c3b7341d.tar.gz
Add S_save_pushptri32ptr() and use it to re-implement Perl_save_hints()
and Perl_save_aelem(). p4raw-id: //depot/perl@34966
Diffstat (limited to 'embed.fnc')
-rw-r--r--embed.fnc4
1 files changed, 4 insertions, 0 deletions
diff --git a/embed.fnc b/embed.fnc
index 1e4d31533e..4c735c3192 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -929,6 +929,10 @@ p |void |save_pushi32ptr|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
+#if defined(PERL_IN_SCOPE_C) || defined(PERL_DECL_PROT)
+s |void |save_pushptri32ptr|NULLOK void *const ptr1|const I32 i \
+ |NULLOK void *const ptr2|const int type
+#endif
: Used in perly.y
p |OP* |sawparens |NULLOK OP* o
: Used in perly.y