summaryrefslogtreecommitdiff
path: root/pp_pack.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2019-10-02 21:10:36 -0600
committerKarl Williamson <khw@cpan.org>2019-12-26 14:02:25 -0700
commit0860e09008fc680efc179c7667586a9f5b634077 (patch)
tree68ff25c8dc1a71daa3f0715bf69550ac1e6a16bb /pp_pack.c
parent9c35352692462eae5f6e2078f2ee69870a9042a2 (diff)
downloadperl-0860e09008fc680efc179c7667586a9f5b634077.tar.gz
pp_pack.c: Use inRANGE macro
which is more efficient
Diffstat (limited to 'pp_pack.c')
-rw-r--r--pp_pack.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/pp_pack.c b/pp_pack.c
index 6479398380..8ac5316e85 100644
--- a/pp_pack.c
+++ b/pp_pack.c
@@ -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