summaryrefslogtreecommitdiff
path: root/pp_sort.c
diff options
context:
space:
mode:
authorSADAHIRO Tomoyuki <BQW10602@nifty.com>2005-11-05 05:54:00 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-11-05 10:10:09 +0000
commitb59aed6733cbdee6d898449f638bd7a17e772993 (patch)
tree3d79c82df1f02445212eb9d4c3b748081c667794 /pp_sort.c
parent2bd49cfcbebe5157c802aba335cb6f76b1afa6fd (diff)
downloadperl-b59aed6733cbdee6d898449f638bd7a17e772993.tar.gz
Re: A surprising segfault
Message-Id: <20051105135053.27D7.BQW10602@nifty.com> p4raw-id: //depot/perl@26011
Diffstat (limited to 'pp_sort.c')
-rw-r--r--pp_sort.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/pp_sort.c b/pp_sort.c
index 68ad610f10..245426e891 100644
--- a/pp_sort.c
+++ b/pp_sort.c
@@ -1504,6 +1504,7 @@ PP(pp_sort)
if (gimme != G_ARRAY) {
SP = MARK;
+ EXTEND(SP,1);
RETPUSHUNDEF;
}