skip conditionally defined symbols in change#5162

p4raw-link: @5162 on //depot/perl: 14dd3ad8c9bf82cf09798a22cc89a9862dfd6d1a

p4raw-id: //depot/perl@5171

diff --git a/makedef.pl b/makedef.pl
index 0d77076..e3b6fd6 100644 (file)
--- a/makedef.pl
+++ b/makedef.pl
@@ -341,6 +341,14 @@ else {
                    )];
 }
 
+unless ($define{'PERL_FLEXIBLE_EXCEPTIONS'}) {
+    skip_symbols [qw(
+                   PL_protect
+                   Perl_default_protect
+                   Perl_vdefault_protect
+                   )];
+}
+
 if ($define{'MYMALLOC'}) {
     emit_symbols [qw(
                    Perl_dump_mstats