diff options
| author | Karl Williamson <public@khwilliamson.com> | 2010-09-23 15:40:21 -0600 |
|---|---|---|
| committer | Steffen Mueller <smueller@cpan.org> | 2010-09-25 11:15:31 +0200 |
| commit | 9916188f758353d7b157c834575d20ebe16a2174 (patch) | |
| tree | 4abe3a43f0ee7b0b9b4d744ff9428232ee8c51e1 /handy.h | |
| parent | 6515cb768b9ba9ee45adf10632fd8708c91ee5fe (diff) | |
| download | perl-9916188f758353d7b157c834575d20ebe16a2174.tar.gz | |
handy.h: should use EBCDIC libc isdigit()
as is better optimized and suitable for the purpose.
Diffstat (limited to 'handy.h')
| -rw-r--r-- | handy.h | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -529,7 +529,6 @@ patched there. The file as of this writing is cpan/Devel-PPPort/parts/inc/misc /* continuation character for legal NAME in \N{NAME} */ #define isCHARNAME_CONT(c) (isALNUMU(c) || (c) == ' ' || (c) == '-' || (c) == '(' || (c) == ')' || (c) == ':' || NATIVE_TO_UNI((U8) c) == 0xA0) -#define isDIGIT(c) ((c) >= '0' && (c) <= '9') #define isIDFIRST(c) (isALPHA(c) || (c) == '_') #define isOCTAL(c) ((c) >= '0' && (c) <= '7') #define isSPACE_L1(c) (isSPACE(c) \ @@ -541,6 +540,7 @@ patched there. The file as of this writing is cpan/Devel-PPPort/parts/inc/misc # define isALNUMC(c) isalnum(c) # define isBLANK(c) ((c) == ' ' || (c) == '\t' || NATIVE_TO_UNI(c) == 0xA0) # define isCNTRL(c) iscntrl(c) +# define isDIGIT(c) isdigit(c) # define isGRAPH(c) isgraph(c) # define isLOWER(c) islower(c) # define isPRINT(c) isprint(c) @@ -555,6 +555,7 @@ patched there. The file as of this writing is cpan/Devel-PPPort/parts/inc/misc # define isALNUMC(c) (isALPHA(c) || isDIGIT(c)) # define isBLANK(c) ((c) == ' ' || (c) == '\t') # define isCNTRL(c) ((U8) (c) < ' ' || (c) == 127) +# define isDIGIT(c) ((c) >= '0' && (c) <= '9') # define isGRAPH(c) (isALNUM(c) || isPUNCT(c)) # define isLOWER(c) ((c) >= 'a' && (c) <= 'z') # define isPRINT(c) (((c) >= 32 && (c) < 127)) |