Re: $, and say

[perl5.git] / opcode.pl

diff --git a/opcode.pl b/opcode.pl
index 7857c09..6988f88 100755 (executable)
--- a/opcode.pl
+++ b/opcode.pl
@@ -1045,7 +1045,7 @@ break             break                   ck_null         0
 continue       continue                ck_null         0
 smartmatch     smart match             ck_smartmatch   s2
 
-say            say                     ck_say          ims@    F? L
+say            say                     ck_listiob      ims@    F? L
 
 # Add new ops before this, the custom operator.