diff options
author | Jeffrey Friedl <jfriedl@regex.info> | 2001-07-13 16:25:12 -0700 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-07-14 09:18:09 +0000 |
commit | 7be5a6cf23d140a25c85e50799cf50395576a4e8 (patch) | |
tree | c5b67320865db71c971364ddde90b1ee0f229466 /handy.h | |
parent | 80b3ef997d1e7ec82fb63942a04027d0ec078dc2 (diff) | |
download | perl-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.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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)) |