diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2011-04-18 06:34:01 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-04-18 06:34:33 -0700 |
| commit | d4fc4415aac96132fac5b1e43e73bcba33a41b79 (patch) | |
| tree | c87f1b9ea1ffc5720b8bd0a1132a5764f64a17ff /opcode.h | |
| parent | 87c7b53d0d7cc2f04915964e3d082adce6dac613 (diff) | |
| download | perl-d4fc4415aac96132fac5b1e43e73bcba33a41b79.tar.gz | |
Make push/shift $scalar accept only unblessed aryrefs
See ticket #80626.
Diffstat (limited to 'opcode.h')
| -rw-r--r-- | opcode.h | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1451,11 +1451,11 @@ EXT Perl_check_t PL_check[] /* or perlvars.h */ Perl_ck_null, /* lslice */ Perl_ck_fun, /* anonlist */ Perl_ck_fun, /* anonhash */ - Perl_ck_push, /* splice */ - Perl_ck_push, /* push */ + Perl_ck_fun, /* splice */ + Perl_ck_fun, /* push */ Perl_ck_shift, /* pop */ Perl_ck_shift, /* shift */ - Perl_ck_push, /* unshift */ + Perl_ck_fun, /* unshift */ Perl_ck_sort, /* sort */ Perl_ck_fun, /* reverse */ Perl_ck_grep, /* grepstart */ |