From 13dcffc60adeca175c32a1ea11ec8756d4853ad2 Mon Sep 17 00:00:00 2001 From: Chip Salzenberg Date: Wed, 19 Feb 2003 03:54:45 +0000 Subject: Support one-parameter unpack(), which unpacks $_. p4raw-id: //depot/perl@18751 --- opcode.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'opcode.h') diff --git a/opcode.h b/opcode.h index b77c0a831c..62bf30dd15 100644 --- a/opcode.h +++ b/opcode.h @@ -1614,7 +1614,7 @@ EXT U32 PL_opargs[] = { 0x00000248, /* rv2hv */ 0x00028404, /* helem */ 0x00048801, /* hslice */ - 0x00022800, /* unpack */ + 0x00122800, /* unpack */ 0x0004280d, /* pack */ 0x00222808, /* split */ 0x0004280d, /* join */ -- cgit v1.2.1