diff options
author | Karl Williamson <khw@cpan.org> | 2019-10-02 21:10:36 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2019-12-26 14:02:25 -0700 |
commit | 0860e09008fc680efc179c7667586a9f5b634077 (patch) | |
tree | 68ff25c8dc1a71daa3f0715bf69550ac1e6a16bb /pp_pack.c | |
parent | 9c35352692462eae5f6e2078f2ee69870a9042a2 (diff) | |
download | perl-0860e09008fc680efc179c7667586a9f5b634077.tar.gz |
pp_pack.c: Use inRANGE macro
which is more efficient
Diffstat (limited to 'pp_pack.c')
-rw-r--r-- | pp_pack.c | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -212,8 +212,9 @@ S_mul128(pTHX_ SV *sv, U8 m) /* Explosives and implosives. */ -#define ISUUCHAR(ch) (NATIVE_TO_LATIN1(ch) >= NATIVE_TO_LATIN1(' ') \ - && NATIVE_TO_LATIN1(ch) < NATIVE_TO_LATIN1('a')) +#define ISUUCHAR(ch) inRANGE(NATIVE_TO_LATIN1(ch), \ + NATIVE_TO_LATIN1(' '), \ + NATIVE_TO_LATIN1('a') - 1) /* type modifiers */ #define TYPE_IS_SHRIEKING 0x100 |