From 96e4d5b14cf2dfb0235faa8bc3f701c15b15bb05 Mon Sep 17 00:00:00 2001 From: Perl 5 Porters Date: Thu, 17 Apr 1997 00:00:00 +0000 Subject: [inseparable changes from match from perl-5.003_97e to perl-5.003_97f] CORE LANGUAGE CHANGES Subject: New operator systell() From: Chip Salzenberg Files: doio.c ext/Opcode/Opcode.pm keywords.pl opcode.pl pod/perldelta.pod pod/perldiag.pod pod/perlfunc.pod pp_sys.c t/op/sysio.t toke.c Subject: Allow constant sub to be optimized when called with parens From: Chip Salzenberg Files: toke.c Subject: Make {,un}pack fail on invalid pack types From: Chip Salzenberg Files: pod/perldiag.pod pp.c CORE PORTABILITY Subject: Fix bitwise ops and {,un}pack() on Cray CPUs From: Chip Salzenberg Files: pp.c Subject: VMS update From: Charles Bailey Files: lib/Cwd.pm lib/File/Path.pm lib/FindBin.pm vms/perly_c.vms vms/vms.c vms/writemain.pl Subject: Win32 update (three patches) From: Gurusamy Sarathy Files: lib/Cwd.pm lib/ExtUtils/MM_Unix.pm lib/ExtUtils/MM_Win32.pm lib/File/Basename.pm win32/Makefile win32/makedef.pl win32/perllib.c win32/win32.c win32/win32iop.h DOCUMENTATION Subject: Document size restrictions for packed integers From: Jarkko Hietaniemi Files: pod/perlfunc.pod LIBRARY AND EXTENSIONS Subject: Fix bug in Opcode when (maxo & 15) > 8 From: Chip Salzenberg Files: ext/Opcode/Makefile.PL ext/Opcode/Opcode.pm ext/Opcode/Opcode.xs --- pp_sys.c | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'pp_sys.c') diff --git a/pp_sys.c b/pp_sys.c index 4eca776a4d..712b003abb 100644 --- a/pp_sys.c +++ b/pp_sys.c @@ -1356,6 +1356,11 @@ PP(pp_eof) } PP(pp_tell) +{ + return pp_systell(ARGS); +} + +PP(pp_systell) { dSP; dTARGET; GV *gv; -- cgit v1.2.1