summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-03-01 06:52:26 +0000
committerGurusamy Sarathy <gsar@cpan.org>1998-03-01 06:52:26 +0000
commitfbbbcc485c1d03c76a91f998e1e4492c8ad56b38 (patch)
tree3b1a893d2288b11451c4d4419edd75f4f85d2481 /op.c
parentc69f6586a27b86846a13e0177336730d72b33c95 (diff)
parent1c1c7f20b839aeb1c04942d0884c3efb087d3e4a (diff)
downloadperl-fbbbcc485c1d03c76a91f998e1e4492c8ad56b38.tar.gz
[asperl] integrate mainline changes
p4raw-id: //depot/asperl@607
Diffstat (limited to 'op.c')
-rw-r--r--op.c35
1 files changed, 0 insertions, 35 deletions
diff --git a/op.c b/op.c
index c0b1124d30..0213d54e40 100644
--- a/op.c
+++ b/op.c
@@ -156,16 +156,7 @@ pad_allocmy(char *name)
}
STATIC PADOFFSET
-#ifndef CAN_PROTOTYPE
-pad_findlex(name, newoff, seq, startcv, cx_ix)
-char *name;
-PADOFFSET newoff;
-U32 seq;
-CV* startcv;
-I32 cx_ix;
-#else
pad_findlex(char *name, PADOFFSET newoff, U32 seq, CV* startcv, I32 cx_ix)
-#endif
{
dTHR;
CV *cv;
@@ -409,12 +400,7 @@ pad_alloc(I32 optype, U32 tmptype)
}
SV *
-#ifndef CAN_PROTOTYPE
-pad_sv(po)
-PADOFFSET po;
-#else
pad_sv(PADOFFSET po)
-#endif /* CAN_PROTOTYPE */
{
dTHR;
#ifdef USE_THREADS
@@ -430,12 +416,7 @@ pad_sv(PADOFFSET po)
}
void
-#ifndef CAN_PROTOTYPE
-pad_free(po)
-PADOFFSET po;
-#else
pad_free(PADOFFSET po)
-#endif /* CAN_PROTOTYPE */
{
dTHR;
if (!curpad)
@@ -458,12 +439,7 @@ pad_free(PADOFFSET po)
}
void
-#ifndef CAN_PROTOTYPE
-pad_swipe(po)
-PADOFFSET po;
-#else
pad_swipe(PADOFFSET po)
-#endif /* CAN_PROTOTYPE */
{
dTHR;
if (AvARRAY(comppad) != curpad)
@@ -2931,18 +2907,7 @@ newWHILEOP(I32 flags, I32 debuggable, LOOP *loop, I32 whileline, OP *expr, OP *b
}
OP *
-#ifndef CAN_PROTOTYPE
-newFOROP(flags,label,forline,sv,expr,block,cont)
-I32 flags;
-char *label;
-line_t forline;
-OP* sv;
-OP* expr;
-OP*block;
-OP*cont;
-#else
newFOROP(I32 flags,char *label,line_t forline,OP *sv,OP *expr,OP *block,OP *cont)
-#endif /* CAN_PROTOTYPE */
{
LOOP *loop;
OP *wop;