diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-09-06 19:10:41 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-09-06 19:10:41 +0000 |
commit | 1291a1920c36dc45039a0acbf53957ff30304657 (patch) | |
tree | 34c5ac548cb86f35402650f061611e64bb5debc1 /perlapi.c | |
parent | 982ce1809751a8e19a5bbe5feaae6f223efd3485 (diff) | |
parent | 661cc6a69914a4799f8042e90d1df51291595d57 (diff) | |
download | perl-1291a1920c36dc45039a0acbf53957ff30304657.tar.gz |
Integrate with Sarathy.
p4raw-id: //depot/cfgperl@4091
Diffstat (limited to 'perlapi.c')
-rwxr-xr-x | perlapi.c | 14 |
1 files changed, 14 insertions, 0 deletions
@@ -4981,6 +4981,13 @@ Perl_ck_index(pTHXo_ OP *o) return ((CPerlObj*)pPerl)->Perl_ck_index(o); } +#undef Perl_ck_join +OP * +Perl_ck_join(pTHXo_ OP *o) +{ + return ((CPerlObj*)pPerl)->Perl_ck_join(o); +} + #undef Perl_ck_lengthconst OP * Perl_ck_lengthconst(pTHXo_ OP *o) @@ -6304,6 +6311,13 @@ Perl_pp_leavesub(pTHXo) return ((CPerlObj*)pPerl)->Perl_pp_leavesub(); } +#undef Perl_pp_leavesublv +OP * +Perl_pp_leavesublv(pTHXo) +{ + return ((CPerlObj*)pPerl)->Perl_pp_leavesublv(); +} + #undef Perl_pp_leavetry OP * Perl_pp_leavetry(pTHXo) |