This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Refactor the two uses of SHIFT{16,32} not followed by DO_BO_UNPACK().
authorNicholas Clark <nick@ccl4.org>
Tue, 7 May 2013 08:08:53 +0000 (10:08 +0200)
committerNicholas Clark <nick@ccl4.org>
Mon, 20 May 2013 19:19:43 +0000 (21:19 +0200)
commite396d2357dcec18c01b1cc78d9edc80a3aa4066d
tree786b536af0941250070ec67dc7a8df18d5c64294
parent2b4ad5699f46c7f63185ad4e7d1f61e16aaa73f6
Refactor the two uses of SHIFT{16,32} not followed by DO_BO_UNPACK().

There is one place where SHIFT16() is not immediately followed by
DO_BO_UNPACK() ('n!' and 'v!'), and one place where SHIFT32() is not
immediately followed by DO_BO_UNPACK() ('N!' and 'V!'). Every other use of
either macro is followed by DO_BO_UNPACK(). For the two locations that don't
have DO_BO_UNPACK(), the modifiers '<' and '>' are illegal, hence
DO_BO_UNPACK() will always be a no-op. Hence add DO_BO_UNPACK() to both
(which permits refactoring to simplify things), and add assert()s that the
assumptions are true.
pp_pack.c