summaryrefslogtreecommitdiff
path: root/embed.h
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-09-20 15:22:22 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-09-20 15:22:22 +0000
commit5458a98a294861b5056e599fe9e1cbe7c1f7b678 (patch)
treee932c1ea2c55b975f3988796370bff692aab5897 /embed.h
parent564914cd4f6b4bf8bd455752588c80fe2e116eb0 (diff)
downloadperl-5458a98a294861b5056e599fe9e1cbe7c1f7b678.tar.gz
prototype() wasn't working to get the prototype of optional core
keywords (like say, err, given.) Fix this by adding a parameter to Perl_keyword to always get the keyword number, even if the feature isn't in effect. p4raw-id: //depot/perl@28874
Diffstat (limited to 'embed.h')
-rw-r--r--embed.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/embed.h b/embed.h
index fa43f4b12e..4ae5706658 100644
--- a/embed.h
+++ b/embed.h
@@ -2573,7 +2573,7 @@
#define is_utf8_mark(a) Perl_is_utf8_mark(aTHX_ a)
#ifdef PERL_CORE
#define jmaybe(a) Perl_jmaybe(aTHX_ a)
-#define keyword(a,b) Perl_keyword(aTHX_ a,b)
+#define keyword(a,b,c) Perl_keyword(aTHX_ a,b,c)
#endif
#define leave_scope(a) Perl_leave_scope(aTHX_ a)
#ifdef PERL_CORE