summaryrefslogtreecommitdiff
path: root/perlapi.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-02-20 16:07:38 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-02-20 16:07:38 +0000
commit14dd3ad8c9bf82cf09798a22cc89a9862dfd6d1a (patch)
treee4a7db15d6f3f866de5e2a5881c5b1ec10c3f883 /perlapi.c
parentc9fcc6c44229e7c36dee08e5d883d12284a44f17 (diff)
downloadperl-14dd3ad8c9bf82cf09798a22cc89a9862dfd6d1a.tar.gz
make change#3386 a build-time option (avoids problems due to
perl_run() longjmping out) p4raw-link: @3386 on //depot/perl: 312caa8e97f1c7ee342a9895c2f0e749625b4929 p4raw-id: //depot/perl@5162
Diffstat (limited to 'perlapi.c')
-rw-r--r--perlapi.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/perlapi.c b/perlapi.c
index f0824984b3..c4653ccc14 100644
--- 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