diff options
| author | David Mitchell <davem@iabyn.com> | 2017-08-04 16:40:15 +0100 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2017-08-04 16:45:02 +0100 |
| commit | ce5a07d9cd0cec76841f293b1e6146a52b8da8de (patch) | |
| tree | 60c07eca1ed9ee09902a527f8ce528d13ea2d67d /opcode.h | |
| parent | 02960b52b40b494fa4f6e1be81db5f3459ab91a9 (diff) | |
| download | perl-ce5a07d9cd0cec76841f293b1e6146a52b8da8de.tar.gz | |
merge Perl_ck_cmp() and Perl_ck_eq()
I added ck_eq() recently; it's used for the EQ and NE ops, while ck_cmp()
is used for LT, GT, LE, GE.
This commit eliminates the ck_eq() function and makes ck_cmp() handle
EQ/NE too.
This will will make it easier to extend the index() == -1 optimisation
to handle index() >= 0 etc too.
At the moment there should be no functional differences.
Diffstat (limited to 'opcode.h')
| -rw-r--r-- | opcode.h | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -1460,10 +1460,10 @@ EXT Perl_check_t PL_check[] /* or perlvars.h */ Perl_ck_cmp, /* i_le */ Perl_ck_cmp, /* ge */ Perl_ck_cmp, /* i_ge */ - Perl_ck_eq, /* eq */ - Perl_ck_eq, /* i_eq */ - Perl_ck_eq, /* ne */ - Perl_ck_eq, /* i_ne */ + Perl_ck_cmp, /* eq */ + Perl_ck_cmp, /* i_eq */ + Perl_ck_cmp, /* ne */ + Perl_ck_cmp, /* i_ne */ Perl_ck_null, /* ncmp */ Perl_ck_null, /* i_ncmp */ Perl_ck_null, /* slt */ |