This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Integrate:
[perl5.git] / reentr.pl
index a15d288..daf5380 100644 (file)
--- a/reentr.pl
+++ b/reentr.pl
@@ -644,7 +644,7 @@ EOF
        push @wrap, $ifdef;
 
        push @wrap, <<EOF;
-#  if defined(PERL_REENTR_API) && (PERL_REENTR_API == 1)
+#  if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1)
 #   undef $func
 EOF
 
@@ -762,7 +762,7 @@ EOF
                }
            }
            push @wrap, <<EOF;
-#  endif /* if defined(PERL_REENTR_API) && (PERL_REENTR_API == 1) */
+#  endif /* if defined(PERL_REENTR_API) && (PERL_REENTR_API+0 == 1) */
 EOF
        }