From 344462d3dde55465e709768c0d1dbfa2a8198aa5 Mon Sep 17 00:00:00 2001 From: Gurusamy Sarathy Date: Thu, 24 Sep 1998 10:29:54 +0000 Subject: [PATCH] two tweaks for clean build and test on Solaris p4raw-id: //depot/perl@1877 --- op.c | 1 + t/op/subst.t | 2 ++ 2 files changed, 3 insertions(+) diff --git a/op.c b/op.c index 9b2284d..b6e2499 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, diff --git a/t/op/subst.t b/t/op/subst.t index 81cafec..d224165 100755 --- a/t/op/subst.t +++ b/t/op/subst.t @@ -1,5 +1,7 @@ #!./perl +BEGIN { @INC = ('../lib') } + print "1..71\n"; $x = 'foo'; -- 2.7.4