Updated. See opcode.pl.
Perl 5 Porters [Thu, 29 Aug 1996 09:28:26 +0000 (09:28 +0000)]
opcode.h

index 01dd521..b13849d 100644 (file)
--- a/opcode.h
+++ b/opcode.h
@@ -2344,7 +2344,7 @@ EXT U32 opargs[] = {
        0x00000e14,     /* eof */
        0x00000e0c,     /* tell */
        0x00011604,     /* seek */
-       0x00001614,     /* truncate */
+       0x00001114,     /* truncate */
        0x0001160c,     /* fcntl */
        0x0001160c,     /* ioctl */
        0x0000161c,     /* flock */