This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
applied patch, regen headers
[perl5.git] / opcode.pl
index 4ee7efe..a97bb16 100755 (executable)
--- a/opcode.pl
+++ b/opcode.pl
@@ -277,7 +277,7 @@ regcmaybe   regexp comp once        ck_fun          s1      S
 regcreset      regexp reset interpolation flag ck_fun          s1      S
 regcomp                regexp compilation      ck_null         s|      S
 match          pattern match           ck_match        d/
-qr             pattern quote           ck_match        s0
+qr             pattern quote           ck_match        s/
 subst          substitution            ck_null         dis/    S
 substcont      substitution cont       ck_null         dis|    
 trans          character translation   ck_null         is"     S