From: Perl 5 Porters <perl5-porters@africa.nicoh.com>
Date: Thu, 29 Aug 1996 09:28:26 +0000 (+0000)
Subject: Updated.  See opcode.pl.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b5470100d305ad04c1e682dd4b1a313c58003e2a;p=p5sagit%2Fp5-mst-13.2.git

Updated.  See opcode.pl.
---

diff --git a/opcode.h b/opcode.h
index 01dd521..b13849d 100644
--- 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 */