diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-10-14 22:11:36 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-10-14 22:11:36 +0000 |
commit | 0dfe9c83689186a0e3a524a49bf51fc000daba95 (patch) | |
tree | b75252947a0df60ea6bad7c4aa6a2b2eddad2021 /perlapi.c | |
parent | 1028017ab8b9674cf749da3584eec9f032360d33 (diff) | |
parent | 62d10b704aa877d24f326d3b46b7eceb38549c98 (diff) | |
download | perl-0dfe9c83689186a0e3a524a49bf51fc000daba95.tar.gz |
Integrate with Sarathy.
p4raw-id: //depot/cfgperl@4381
Diffstat (limited to 'perlapi.c')
-rwxr-xr-x | perlapi.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -4754,12 +4754,12 @@ Perl_magic_dump(pTHXo_ MAGIC *mg) #undef Perl_default_protect void* -Perl_default_protect(pTHXo_ int *excpt, protect_body_t body, ...) +Perl_default_protect(pTHXo_ volatile JMPENV *je, int *excpt, protect_body_t body, ...) { void* retval; va_list args; va_start(args, body); - retval = ((CPerlObj*)pPerl)->Perl_vdefault_protect(excpt, body, &args); + retval = ((CPerlObj*)pPerl)->Perl_vdefault_protect(je, excpt, body, &args); va_end(args); return retval; @@ -4767,9 +4767,9 @@ Perl_default_protect(pTHXo_ int *excpt, protect_body_t body, ...) #undef Perl_vdefault_protect void* -Perl_vdefault_protect(pTHXo_ int *excpt, protect_body_t body, va_list *args) +Perl_vdefault_protect(pTHXo_ volatile JMPENV *je, int *excpt, protect_body_t body, va_list *args) { - return ((CPerlObj*)pPerl)->Perl_vdefault_protect(excpt, body, args); + return ((CPerlObj*)pPerl)->Perl_vdefault_protect(je, excpt, body, args); } #undef Perl_reginitcolors |