summaryrefslogtreecommitdiff
path: root/handy.h
diff options
context:
space:
mode:
authorJeffrey Friedl <jfriedl@regex.info>2001-07-13 16:25:12 -0700
committerJarkko Hietaniemi <jhi@iki.fi>2001-07-14 09:18:09 +0000
commit7be5a6cf23d140a25c85e50799cf50395576a4e8 (patch)
treec5b67320865db71c971364ddde90b1ee0f229466 /handy.h
parent80b3ef997d1e7ec82fb63942a04027d0ec078dc2 (diff)
downloadperl-7be5a6cf23d140a25c85e50799cf50395576a4e8.tar.gz
patch to add DEL to [:cntrl:]
Message-Id: <200107140625.XAA01517@ventrue.corp.yahoo.com> p4raw-id: //depot/perl@11371
Diffstat (limited to 'handy.h')
-rw-r--r--handy.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/handy.h b/handy.h
index 9fd6de8b7b..c7bdf3cca7 100644
--- a/handy.h
+++ b/handy.h
@@ -341,7 +341,7 @@ Converts the specified character to lowercase.
# define isLOWER(c) ((c) >= 'a' && (c) <= 'z')
# define isALNUMC(c) (isALPHA(c) || isDIGIT(c))
# define isASCII(c) ((c) <= 127)
-# define isCNTRL(c) ((c) < ' ')
+# define isCNTRL(c) ((c) < ' ' || (c) == 127)
# define isGRAPH(c) (isALNUM(c) || isPUNCT(c))
# define isPRINT(c) (((c) > 32 && (c) < 127) || (c) == ' ')
# define isPUNCT(c) (((c) >= 33 && (c) <= 47) || ((c) >= 58 && (c) <= 64) || ((c) >= 91 && (c) <= 96) || ((c) >= 123 && (c) <= 126))