diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-23 12:14:15 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-23 12:14:15 +0000 |
| commit | f79b30955198f840af4394fc38877ab5d06cc758 (patch) | |
| tree | 029bccd91dcdaa40b997dfb38eac2242f6b5156a /handy.h | |
| parent | 36a80aa941133b2d90c7d598f79e7baefcfaf8f4 (diff) | |
| download | perl-f79b30955198f840af4394fc38877ab5d06cc758.tar.gz | |
Fix for ID 20010619.003, the [[:print:]] is not supposed
to match the whole isprint(), only the space character.
p4raw-id: //depot/perl@10855
Diffstat (limited to 'handy.h')
| -rw-r--r-- | handy.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -343,7 +343,7 @@ Converts the specified character to lowercase. # define isASCII(c) ((c) <= 127) # define isCNTRL(c) ((c) < ' ') # define isGRAPH(c) (isALNUM(c) || isPUNCT(c)) -# define isPRINT(c) (((c) > 32 && (c) < 127) || isSPACE(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)) # define isXDIGIT(c) (isdigit(c) || ((c) >= 'a' && (c) <= 'f') || ((c) >= 'A' && (c) <= 'F')) # define toUPPER(c) (isLOWER(c) ? (c) - ('a' - 'A') : (c)) |