diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2018-01-08 08:29:26 -0800 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2018-01-09 19:30:57 -0800 |
| commit | 90a59ee553fbce0cfcef9ae57ed0705fe279de0a (patch) | |
| tree | e853db33a9c2f0ec5044e9d74b9747e120f185f0 | |
| parent | 824e6cc6e3be8a1a8732f7813ae75bfa4094e8f9 (diff) | |
| download | perl-90a59ee553fbce0cfcef9ae57ed0705fe279de0a.tar.gz | |
Use ck_null for ~.
It no longer needs ck_bitop, which it only used before for the
experimental warning that has been removed.
| -rw-r--r-- | opcode.h | 2 | ||||
| -rw-r--r-- | regen/opcodes | 4 |
2 files changed, 2 insertions, 4 deletions
@@ -1487,7 +1487,7 @@ EXT Perl_check_t PL_check[] /* or perlvars.h */ Perl_ck_null, /* not */ Perl_ck_bitop, /* complement */ Perl_ck_bitop, /* ncomplement */ - Perl_ck_bitop, /* scomplement */ + Perl_ck_null, /* scomplement */ Perl_ck_smartmatch, /* smartmatch */ Perl_ck_fun, /* atan2 */ Perl_ck_fun, /* sin */ diff --git a/regen/opcodes b/regen/opcodes index 5aa8a94fa5..b4bf904fdc 100644 --- a/regen/opcodes +++ b/regen/opcodes @@ -175,9 +175,7 @@ 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_smartmatch s2 |