summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-01-17 11:23:37 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-01-17 11:23:37 +0000
commitbda4119bc5ac877809e21a4c89ea66d3512e38b8 (patch)
tree43c3c136d8855a8366f15040e6ff678c47f10d7e /op.c
parenteb1ab10a22402f281618389d37c3ca06ba5f71b2 (diff)
downloadperl-bda4119bc5ac877809e21a4c89ea66d3512e38b8.tar.gz
PERL_OBJECTness for change#2595
p4raw-link: @2595 on //depot/cfgperl: 9c007264caa0e1aed57010dc2950fe35f9d8347e p4raw-id: //depot/perl@2627
Diffstat (limited to 'op.c')
-rw-r--r--op.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/op.c b/op.c
index 901995aa39..d50324aa7e 100644
--- a/op.c
+++ b/op.c
@@ -51,7 +51,7 @@ static PADOFFSET pad_findlex _((char* name, PADOFFSET newoff, U32 seq,
CV* startcv, I32 cx_ix, I32 saweval));
static OP *newDEFSVOP _((void));
static OP *new_logop _((I32 type, I32 flags, OP **firstp, OP **otherp));
-static void simplify_sort(OP *o);
+static void simplify_sort _((OP *o));
#endif
STATIC char*
@@ -5092,7 +5092,8 @@ ck_sort(OP *o)
return o;
}
-static void
+
+STATIC void
simplify_sort(OP *o)
{
register OP *kid = cLISTOPo->op_first->op_sibling; /* get past pushmark */