In perl.git, the branch blead has been updated
<https://perl5.git.perl.org/perl.git/commitdiff/90a59ee553fbce0cfcef9ae57ed0705fe279de0a?hp=824e6cc6e3be8a1a8732f7813ae75bfa4094e8f9>
- Log -----------------------------------------------------------------
commit 90a59ee553fbce0cfcef9ae57ed0705fe279de0a
Author: Father Chrysostomos <spr...@cpan.org>
Date: Mon Jan 8 08:29:26 2018 -0800
Use ck_null for ~.
It no longer needs ck_bitop, which it only used before for the
experimental warning that has been removed.
-----------------------------------------------------------------------
Summary of changes:
opcode.h | 2 +-
regen/opcodes | 4 +---
2 files changed, 2 insertions(+), 4 deletions(-)
diff --git a/opcode.h b/opcode.h
index 2556a01e1e..ba3bd9e668 100644
--- a/opcode.h
+++ b/opcode.h
@@ -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
--
Perl5 Master Repository
