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
}
my $call = "${func}_r($v$w)";
+ if ($func eq 'localtime') {
+ $call = "L_R_TZSET $call";
+ }
# Must make OpenBSD happy
my $memzero = '';
}
}
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
}