This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
basic.t: Provide descriptions for all unit tests
[perl5.git] / regen / opcodes
index 037ac89..b4bf904 100644 (file)
@@ -175,11 +175,9 @@ i_negate   integer negation (-)    ck_null         ifst1   S
 not            not                     ck_null         ifs1    S
 complement     1's complement (~)      ck_bitop        fst1    S
 ncomplement    numeric 1's complement (~)      ck_bitop        fsT1    S
-# scomplement uses ck_bitop only for the experimental warning.  Once the
-# warning is gone, this can change to ck_null.
-scomplement    string 1's complement (~)       ck_bitop        fsT1    S
+scomplement    string 1's complement (~)       ck_null fsT1    S
 
-smartmatch     smart match             ck_null         ifs2    S S
+smartmatch     smart match             ck_smartmatch   s2
 
 # High falutin' math.
 
@@ -328,10 +326,11 @@ method_super      super with known name   ck_null         d.
 method_redir   redirect method with known name ck_null d.
 method_redir_super     redirect super method with known name   ck_null d.
 
-entergiven     given()                 ck_null         d{
+entergiven     given()                 ck_null         d|
 leavegiven     leave given block       ck_null         1
 enterwhen      when()                  ck_null         d|
 leavewhen      leave when block        ck_null         1
+break          break                   ck_null         0
 continue       continue                ck_null         0
 
 # I/O.