From e8665a6bc271654de993e8cfca08164717236cd1 Mon Sep 17 00:00:00 2001 From: akr Date: Thu, 18 Feb 2010 12:53:31 +0000 Subject: * pack.c (pack_unpack): call PACK_ITEM_ADJUST for 'Q'. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@26705 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- pack.c | 3 +++ 1 file changed, 3 insertions(+) (limited to 'pack.c') diff --git a/pack.c b/pack.c index 80b6ab5137..cec5e46b9f 100644 --- a/pack.c +++ b/pack.c @@ -1605,6 +1605,7 @@ pack_unpack(VALUE str, VALUE fmt) } PACK_ITEM_ADJUST(); break; + case 'L': PACK_LENGTH_ADJUST(unsigned long,4); while (len-- > 0) { @@ -1625,6 +1626,7 @@ pack_unpack(VALUE str, VALUE fmt) } PACK_ITEM_ADJUST(); break; + case 'Q': PACK_LENGTH_ADJUST_SIZE(QUAD_SIZE); while (len-- > 0) { @@ -1632,6 +1634,7 @@ pack_unpack(VALUE str, VALUE fmt) s += QUAD_SIZE; UNPACK_PUSH(rb_quad_unpack(tmp, 0)); } + PACK_ITEM_ADJUST(); break; case 'n': -- cgit v1.2.3