Change 12072 by ams@ams-lustre on 2001/09/18 18:44:59
OP_RCATLINE is an SVOP, not a BASEOP.
Affected files ...
... //depot/perl/opcode.h#76 edit
... //depot/perl/opcode.pl#86 edit
Differences ...
==== //depot/perl/opcode.h#76 (text+w) ====
Index: perl/opcode.h
--- perl/opcode.h.~1~ Tue Sep 18 13:00:05 2001
+++ perl/opcode.h Tue Sep 18 13:00:05 2001
@@ -1488,7 +1488,7 @@
0x00001608, /* backtick */
0x00012808, /* glob */
0x0001d608, /* readline */
- 0x00001608, /* rcatline */
+ 0x00000c08, /* rcatline */
0x00002204, /* regcmaybe */
0x00002204, /* regcreset */
0x00002604, /* regcomp */
==== //depot/perl/opcode.pl#86 (xtext) ====
Index: perl/opcode.pl
--- perl/opcode.pl.~1~ Tue Sep 18 13:00:05 2001
+++ perl/opcode.pl Tue Sep 18 13:00:05 2001
@@ -451,7 +451,7 @@
# glob defaults its first arg to $_
glob glob ck_glob t@ S?
readline <HANDLE> ck_null t% F?
-rcatline append I/O operator ck_null t%
+rcatline append I/O operator ck_null t$
# Bindable operators.
End of Patch.
