summaryrefslogtreecommitdiff
path: root/perlapi.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2000-02-21 01:37:35 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2000-02-21 01:37:35 +0000
commitd0bc94aab7477307ee6c7ddb7187bcfc2e5c5fc2 (patch)
tree2e109be0afc317ca5046aaa6a4228e92162d9a4d /perlapi.c
parent99819a14977e25f4ffd5fe19db3f3e492417275e (diff)
parent2ba999ece4e8727143f109b401921cec33e5b6dc (diff)
downloadperl-d0bc94aab7477307ee6c7ddb7187bcfc2e5c5fc2.tar.gz
Integrate with Sarathy.
p4raw-id: //depot/cfgperl@5176
Diffstat (limited to 'perlapi.c')
-rwxr-xr-xperlapi.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/perlapi.c b/perlapi.c
index f0824984b3..c4653ccc14 100755
--- a/perlapi.c
+++ b/perlapi.c
@@ -3589,6 +3589,7 @@ Perl_magic_dump(pTHXo_ MAGIC *mg)
{
((CPerlObj*)pPerl)->Perl_magic_dump(mg);
}
+#if defined(PERL_FLEXIBLE_EXCEPTIONS)
#undef Perl_default_protect
void*
@@ -3609,6 +3610,7 @@ Perl_vdefault_protect(pTHXo_ volatile JMPENV *je, int *excpt, protect_body_t bod
{
return ((CPerlObj*)pPerl)->Perl_vdefault_protect(je, excpt, body, args);
}
+#endif
#undef Perl_reginitcolors
void
@@ -3864,12 +3866,16 @@ Perl_ptr_table_split(pTHXo_ PTR_TBL_t *tbl)
#if defined(PERL_IN_PERL_C) || defined(PERL_DECL_PROT)
# if defined(IAMSUID)
# endif
+#if defined(PERL_FLEXIBLE_EXCEPTIONS)
+#endif
# if defined(USE_THREADS)
# endif
#endif
#if defined(PERL_IN_PP_C) || defined(PERL_DECL_PROT)
#endif
#if defined(PERL_IN_PP_CTL_C) || defined(PERL_DECL_PROT)
+#if defined(PERL_FLEXIBLE_EXCEPTIONS)
+#endif
#endif
#if defined(PERL_IN_PP_HOT_C) || defined(PERL_DECL_PROT)
#endif