two tweaks for clean build and test on Solaris

p4raw-id: //depot/perl@1877

1 files changed, 1 insertions, 0 deletions

diff --git a/op.c b/op.c
index 9b2284db94..b6e2499b42 100644
--- a/op.c
+++ b/op.c
@@ -131,6 +131,7 @@ pad_allocmy(char *name)
 	for (off = AvFILLp(PL_comppad_name); off > PL_comppad_name_floor; off--) {
 	    if ((sv = svp[off])
 		&& sv != &PL_sv_undef
+		&& (SvIVX(sv) == 999999999 || SvIVX(sv) == 0)
 		&& strEQ(name, SvPVX(sv)))
 	    {
 		warner(WARN_UNSAFE,