From: Gurusamy Sarathy <gsar@cpan.org>
Date: Wed, 4 Mar 1998 04:13:23 +0000 (+0000)
Subject: [win32] missing s/op/o/ from one of the mainpatches
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7766148a84514045e76c63eb79dcff7b7c84702d;p=p5sagit%2Fp5-mst-13.2.git

[win32] missing s/op/o/ from one of the mainpatches

p4raw-id: //depot/win32/perl@727
---

diff --git a/op.c b/op.c
index b07c9ae..e30e874 100644
--- a/op.c
+++ b/op.c
@@ -1400,7 +1400,7 @@ my(OP *o)
 	for (kid = cLISTOPo->op_first; kid; kid = kid->op_sibling)
 	    my(kid);
     } else if (type == OP_UNDEF) {
-	return op;
+	return o;
     } else if (type != OP_PADSV &&
 	     type != OP_PADAV &&
 	     type != OP_PADHV &&
@@ -4743,7 +4743,7 @@ peep(register OP *o)
 	    goto nothin;
 	case OP_NULL:
 	    if (o->op_targ == OP_NEXTSTATE || o->op_targ == OP_DBSTATE)
-		curcop = ((COP*)op);
+		curcop = ((COP*)o);
 	    goto nothin;
 	case OP_SCALAR:
 	case OP_LINESEQ: