summaryrefslogtreecommitdiff
path: root/scope.h
diff options
context:
space:
mode:
authorAdrian M. Enache <enache@rdslink.ro>2003-03-29 01:53:09 +0200
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2003-05-05 20:07:33 +0000
commit4b3c1a47dc0fd4f1dba8913d1d8984fe79997756 (patch)
treed9997bad58e169c9c44a18aa34a1eb1bd6a214c0 /scope.h
parent048912995c485d977c9d43b63b517de870c722d5 (diff)
downloadperl-4b3c1a47dc0fd4f1dba8913d1d8984fe79997756.tar.gz
[patch] Re: [perl #21728] regexp SEGV
Message-ID: <20030328215309.GA6413@ratsnest.hole> (with minor tweaks) p4raw-id: //depot/perl@19431
Diffstat (limited to 'scope.h')
-rw-r--r--scope.h3
1 files changed, 2 insertions, 1 deletions
diff --git a/scope.h b/scope.h
index 31528fcb09..e2150e87c0 100644
--- a/scope.h
+++ b/scope.h
@@ -52,7 +52,8 @@
#define SCOPE_SAVES_SIGNAL_MASK 0
#endif
-#define SSCHECK(need) if (PL_savestack_ix + need > PL_savestack_max) savestack_grow()
+#define SSCHECK(need) if (PL_savestack_ix + (need) > PL_savestack_max) savestack_grow()
+#define SSGROW(need) if (PL_savestack_ix + (need) > PL_savestack_max) savestack_grow_cnt(need)
#define SSPUSHINT(i) (PL_savestack[PL_savestack_ix++].any_i32 = (I32)(i))
#define SSPUSHLONG(i) (PL_savestack[PL_savestack_ix++].any_long = (long)(i))
#define SSPUSHBOOL(p) (PL_savestack[PL_savestack_ix++].any_bool = (p))