Revert "Make scalar() propagate lvalueness"

[perl5.git] / opcode.h

diff --git a/opcode.h b/opcode.h
index d747d9a..709e92c 100644 (file)
--- a/opcode.h
+++ b/opcode.h
@@ -1545,8 +1545,8 @@ EXT Perl_check_t PL_check[] /* or perlvars.h */
        Perl_ck_fun,            /* sysread */
        Perl_ck_fun,            /* syswrite */
        Perl_ck_eof,            /* eof */
-       Perl_ck_fun,            /* tell */
-       Perl_ck_fun,            /* seek */
+       Perl_ck_tell,           /* tell */
+       Perl_ck_tell,           /* seek */
        Perl_ck_trunc,          /* truncate */
        Perl_ck_fun,            /* fcntl */
        Perl_ck_fun,            /* ioctl */