diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-08-02 15:04:47 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-08-14 11:14:58 -0700 |
commit | 9927957a90b2fe6bdb0e2be889b2edcddadea174 (patch) | |
tree | e265b03cc962927ef503bb225e5e78414349fcf8 /embed.h | |
parent | e058c50ad847ead283c43829ad8b0b73f59ef9db (diff) | |
download | perl-9927957a90b2fe6bdb0e2be889b2edcddadea174.tar.gz |
Make core_prototype provide the op number as well
Since it has to calculate it, it might as well provide it, so callers
do not have to go through that while(i < MAXO) loop yet again.
(The &CORE::foo feature will use this.)
Diffstat (limited to 'embed.h')
-rw-r--r-- | embed.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1008,7 +1008,7 @@ #define ck_trunc(a) Perl_ck_trunc(aTHX_ a) #define ck_unpack(a) Perl_ck_unpack(aTHX_ a) #define convert(a,b,c) Perl_convert(aTHX_ a,b,c) -#define core_prototype(a,b,c,d) Perl_core_prototype(aTHX_ a,b,c,d) +#define core_prototype(a,b,c,d,e) Perl_core_prototype(aTHX_ a,b,c,d,e) #define create_eval_scope(a) Perl_create_eval_scope(aTHX_ a) #define cv_ckproto_len(a,b,c,d) Perl_cv_ckproto_len(aTHX_ a,b,c,d) #define cvgv_set(a,b) Perl_cvgv_set(aTHX_ a,b) |