This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
PATCH (5.005_57): defined(@a) now deprecated
[perl5.git] / opcode.h
index a4efb5a..b6143ea 100644 (file)
--- a/opcode.h
+++ b/opcode.h
@@ -1482,7 +1482,7 @@ EXT OP * (CPERLscope(*PL_check)[]) _((OP *op)) = {
        ck_null,        /* schop */
        ck_spair,       /* chomp */
        ck_null,        /* schomp */
-       ck_rfun,        /* defined */
+       ck_defined,     /* defined */
        ck_lfun,        /* undef */
        ck_fun,         /* study */
        ck_lfun,        /* pos */