Mercurial > hg > octave-kai > gnulib-hg
annotate lib/c-ctype.h @ 16366:bb182ee4a09d
maint: replace FSF snail-mail addresses with URLs
* config/argz.mk, lib/accept4.c, lib/alignof.h, lib/alloca.in.h:
* lib/alphasort.c, lib/arcfour.c, lib/arcfour.h, lib/arctwo.c:
* lib/arctwo.h, lib/argz.c, lib/arpa_inet.in.h, lib/asnprintf.c:
* lib/asprintf.c, lib/assert.in.h, lib/base32.c, lib/base32.h:
* lib/base64.c, lib/base64.h, lib/c-ctype.c, lib/c-ctype.h:
* lib/c-strcase.h, lib/c-strcasecmp.c, lib/c-strncasecmp.c:
* lib/check-version.c, lib/check-version.h, lib/config.charset:
* lib/ctype.in.h, lib/des.c, lib/des.h, lib/dup3.c, lib/errno.in.h:
* lib/float+.h, lib/fnmatch.c, lib/fnmatch.in.h, lib/fnmatch_loop.c:
* lib/fseeko.c, lib/gai_strerror.c, lib/gc-gnulib.c:
* lib/gc-libgcrypt.c, lib/gc-pbkdf2-sha1.c, lib/gc.h:
* lib/getaddrinfo.c, lib/getdelim.c, lib/getfilecon.c, lib/getline.c:
* lib/getlogin_r.c, lib/getpass.c, lib/getpass.h, lib/gettext.h:
* lib/gettimeofday.c, lib/glob.in.h, lib/glthread/cond.c:
* lib/glthread/cond.h, lib/glthread/lock.c, lib/glthread/lock.h:
* lib/glthread/thread.c, lib/glthread/thread.h:
* lib/glthread/threadlib.c, lib/glthread/yield.h, lib/hmac-md5.c:
* lib/hmac-sha1.c, lib/hmac.h, lib/iconv.c, lib/iconv.in.h:
* lib/iconv_close.c, lib/iconv_open.c, lib/inet_ntop.c, lib/isfinite.c:
* lib/isinf.c, lib/iswblank.c, lib/langinfo.in.h, lib/link.c:
* lib/localcharset.c, lib/localcharset.h, lib/lseek.c, lib/malloc.c:
* lib/malloca.c, lib/malloca.h, lib/md2.c, lib/md2.h, lib/md4.c:
* lib/md4.h, lib/md5.c, lib/md5.h, lib/memmem.c, lib/mempcpy.c:
* lib/memset.c, lib/memxor.c, lib/memxor.h, lib/minmax.h, lib/mktime.c:
* lib/msvc-inval.c, lib/msvc-inval.h, lib/msvc-nothrow.c:
* lib/msvc-nothrow.h, lib/netdb.in.h, lib/netinet_in.in.h, lib/nproc.c:
* lib/nproc.h, lib/obstack_printf.c, lib/pathmax.h, lib/pipe.c:
* lib/pipe2.c, lib/poll.c, lib/poll.in.h, lib/printf-args.c:
* lib/printf-args.h, lib/printf-parse.c, lib/printf-parse.h:
* lib/pselect.c, lib/pthread.in.h, lib/pty-private.h, lib/pty.in.h:
* lib/read-file.c, lib/read-file.h, lib/ref-add.sin, lib/ref-del.sin:
* lib/regcomp.c, lib/regex.c, lib/regex.h, lib/regex_internal.c:
* lib/regex_internal.h, lib/regexec.c, lib/rijndael-alg-fst.c:
* lib/rijndael-alg-fst.h, lib/rijndael-api-fst.c:
* lib/rijndael-api-fst.h, lib/rint.c, lib/rintf.c, lib/rintl.c:
* lib/round.c, lib/roundf.c, lib/roundl.c, lib/scandir.c, lib/select.c:
* lib/sha1.c, lib/sha1.h, lib/size_max.h, lib/snprintf.c:
* lib/stdalign.in.h, lib/stdarg.in.h, lib/stdbool.in.h:
* lib/stddef.in.h, lib/stdint.in.h, lib/stdio.in.h, lib/str-kmp.h:
* lib/str-two-way.h, lib/strcasecmp.c, lib/strcasestr.c, lib/strdup.c:
* lib/striconv.c, lib/striconv.h, lib/string.in.h, lib/strings.in.h:
* lib/strncasecmp.c, lib/strndup.c, lib/strnlen.c, lib/strpbrk.c:
* lib/strptime.c, lib/strsep.c, lib/strstr.c, lib/strverscmp.c:
* lib/sys_file.in.h, lib/sys_ioctl.in.h, lib/sys_select.in.h:
* lib/sys_socket.in.h, lib/sys_stat.in.h, lib/sys_time.in.h:
* lib/sys_times.in.h, lib/sys_types.in.h, lib/sys_uio.in.h:
* lib/sys_utsname.in.h, lib/sys_wait.in.h, lib/tcgetsid.c:
* lib/termios.in.h, lib/time.in.h, lib/time_r.c, lib/timegm.c:
* lib/times.c, lib/unictype/3level.h, lib/unictype/3levelbit.h:
* lib/unistd.in.h, lib/vasnprintf.c, lib/vasnprintf.h, lib/vasprintf.c:
* lib/vsnprintf.c, lib/waitpid.c, lib/wchar.in.h, lib/wctype.in.h:
* lib/xsize.h, tests/test-closein.c, tests/test-des.c:
* tests/test-fclose.c, tests/test-fgetc.c, tests/test-filevercmp.c:
* tests/test-fputc.c, tests/test-fread.c, tests/test-fwrite.c:
* tests/test-gc-arcfour.c, tests/test-gc-arctwo.c, tests/test-gc-des.c:
* tests/test-gc-hmac-md5.c, tests/test-gc-hmac-sha1.c:
* tests/test-gc-md2.c, tests/test-gc-md4.c, tests/test-gc-md5.c:
* tests/test-gc-pbkdf2-sha1.c, tests/test-gc-rijndael.c:
* tests/test-gc-sha1.c, tests/test-gc.c, tests/test-getdelim.c:
* tests/test-getline.c, tests/test-getndelim2.c, tests/test-md2.c:
* tests/test-md4.c, tests/test-parse-datetime.c, tests/test-perror.c:
* tests/test-perror2.c, tests/test-pipe.c, tests/test-pipe2.c:
* tests/test-poll.c, tests/test-quotearg-simple.c:
* tests/test-quotearg.c, tests/test-quotearg.h:
* tests/test-round-ieee.c, tests/test-round1.c:
* tests/test-roundf-ieee.c, tests/test-roundf1.c:
* tests/test-roundl-ieee.c, tests/test-roundl.c:
* tests/test-safe-alloc.c, tests/test-sigpipe.c:
* tests/test-spawn-pipe-child.c, tests/test-spawn-pipe-main.c:
* tests/test-strerror.c, tests/test-strerror_r.c:
* tests/test-strsignal.c, tests/test-strverscmp.c:
* tests/test-xmemdup0.c:
Replace FSF snail mail addresses with URLs, as per GNU coding
standards. See glibc bug
<http://sourceware.org/bugzilla/show_bug.cgi?id=13673>.
| author | Paul Eggert <eggert@cs.ucla.edu> |
|---|---|
| date | Thu, 09 Feb 2012 21:39:05 -0800 |
| parents | 8250f2777afc |
| children | e542fd46ad6f |
| rev | line source |
|---|---|
| 4218 | 1 /* Character handling in C locale. |
| 2 | |
| 3 These functions work like the corresponding functions in <ctype.h>, | |
| 4 except that they have the C (POSIX) locale hardwired, whereas the | |
| 5 <ctype.h> functions' behaviour depends on the current locale set via | |
| 6 setlocale. | |
| 7 | |
|
16201
8250f2777afc
maint: update all copyright year number ranges
Jim Meyering <meyering@redhat.com>
parents:
16128
diff
changeset
|
8 Copyright (C) 2000-2003, 2006, 2008-2012 Free Software Foundation, Inc. |
| 4218 | 9 |
| 10 This program is free software; you can redistribute it and/or modify | |
| 11 it under the terms of the GNU General Public License as published by | |
| 12 the Free Software Foundation; either version 2 of the License, or | |
| 13 (at your option) any later version. | |
| 14 | |
| 15 This program is distributed in the hope that it will be useful, | |
| 16 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 18 GNU General Public License for more details. | |
| 19 | |
| 20 You should have received a copy of the GNU General Public License | |
|
16366
bb182ee4a09d
maint: replace FSF snail-mail addresses with URLs
Paul Eggert <eggert@cs.ucla.edu>
parents:
16201
diff
changeset
|
21 along with this program; if not, see <http://www.gnu.org/licenses/>. */ |
| 4218 | 22 |
| 23 #ifndef C_CTYPE_H | |
| 24 #define C_CTYPE_H | |
| 25 | |
| 26 #include <stdbool.h> | |
| 27 | |
| 28 | |
|
7602
adf3720ff325
Avoid name mangling in C++ mode.
Bruno Haible <bruno@clisp.org>
parents:
7471
diff
changeset
|
29 #ifdef __cplusplus |
|
adf3720ff325
Avoid name mangling in C++ mode.
Bruno Haible <bruno@clisp.org>
parents:
7471
diff
changeset
|
30 extern "C" { |
|
adf3720ff325
Avoid name mangling in C++ mode.
Bruno Haible <bruno@clisp.org>
parents:
7471
diff
changeset
|
31 #endif |
|
adf3720ff325
Avoid name mangling in C++ mode.
Bruno Haible <bruno@clisp.org>
parents:
7471
diff
changeset
|
32 |
|
adf3720ff325
Avoid name mangling in C++ mode.
Bruno Haible <bruno@clisp.org>
parents:
7471
diff
changeset
|
33 |
| 4219 | 34 /* The functions defined in this file assume the "C" locale and a character |
| 35 set without diacritics (ASCII-US or EBCDIC-US or something like that). | |
| 36 Even if the "C" locale on a particular system is an extension of the ASCII | |
| 37 character set (like on BeOS, where it is UTF-8, or on AmigaOS, where it | |
| 38 is ISO-8859-1), the functions in this file recognize only the ASCII | |
| 39 characters. */ | |
| 40 | |
| 41 | |
| 4218 | 42 /* Check whether the ASCII optimizations apply. */ |
| 43 | |
| 44 /* ANSI C89 (and ISO C99 5.2.1.3 too) already guarantees that | |
| 45 '0', '1', ..., '9' have consecutive integer values. */ | |
| 46 #define C_CTYPE_CONSECUTIVE_DIGITS 1 | |
| 47 | |
| 48 #if ('A' <= 'Z') \ | |
| 49 && ('A' + 1 == 'B') && ('B' + 1 == 'C') && ('C' + 1 == 'D') \ | |
| 50 && ('D' + 1 == 'E') && ('E' + 1 == 'F') && ('F' + 1 == 'G') \ | |
| 51 && ('G' + 1 == 'H') && ('H' + 1 == 'I') && ('I' + 1 == 'J') \ | |
| 52 && ('J' + 1 == 'K') && ('K' + 1 == 'L') && ('L' + 1 == 'M') \ | |
| 53 && ('M' + 1 == 'N') && ('N' + 1 == 'O') && ('O' + 1 == 'P') \ | |
| 54 && ('P' + 1 == 'Q') && ('Q' + 1 == 'R') && ('R' + 1 == 'S') \ | |
| 55 && ('S' + 1 == 'T') && ('T' + 1 == 'U') && ('U' + 1 == 'V') \ | |
| 56 && ('V' + 1 == 'W') && ('W' + 1 == 'X') && ('X' + 1 == 'Y') \ | |
| 57 && ('Y' + 1 == 'Z') | |
| 58 #define C_CTYPE_CONSECUTIVE_UPPERCASE 1 | |
| 59 #endif | |
| 60 | |
| 61 #if ('a' <= 'z') \ | |
| 62 && ('a' + 1 == 'b') && ('b' + 1 == 'c') && ('c' + 1 == 'd') \ | |
| 63 && ('d' + 1 == 'e') && ('e' + 1 == 'f') && ('f' + 1 == 'g') \ | |
| 64 && ('g' + 1 == 'h') && ('h' + 1 == 'i') && ('i' + 1 == 'j') \ | |
| 65 && ('j' + 1 == 'k') && ('k' + 1 == 'l') && ('l' + 1 == 'm') \ | |
| 66 && ('m' + 1 == 'n') && ('n' + 1 == 'o') && ('o' + 1 == 'p') \ | |
| 67 && ('p' + 1 == 'q') && ('q' + 1 == 'r') && ('r' + 1 == 's') \ | |
| 68 && ('s' + 1 == 't') && ('t' + 1 == 'u') && ('u' + 1 == 'v') \ | |
| 69 && ('v' + 1 == 'w') && ('w' + 1 == 'x') && ('x' + 1 == 'y') \ | |
| 70 && ('y' + 1 == 'z') | |
| 71 #define C_CTYPE_CONSECUTIVE_LOWERCASE 1 | |
| 72 #endif | |
| 73 | |
| 74 #if (' ' == 32) && ('!' == 33) && ('"' == 34) && ('#' == 35) \ | |
| 75 && ('%' == 37) && ('&' == 38) && ('\'' == 39) && ('(' == 40) \ | |
| 76 && (')' == 41) && ('*' == 42) && ('+' == 43) && (',' == 44) \ | |
| 77 && ('-' == 45) && ('.' == 46) && ('/' == 47) && ('0' == 48) \ | |
| 78 && ('1' == 49) && ('2' == 50) && ('3' == 51) && ('4' == 52) \ | |
| 79 && ('5' == 53) && ('6' == 54) && ('7' == 55) && ('8' == 56) \ | |
| 80 && ('9' == 57) && (':' == 58) && (';' == 59) && ('<' == 60) \ | |
| 81 && ('=' == 61) && ('>' == 62) && ('?' == 63) && ('A' == 65) \ | |
| 82 && ('B' == 66) && ('C' == 67) && ('D' == 68) && ('E' == 69) \ | |
| 83 && ('F' == 70) && ('G' == 71) && ('H' == 72) && ('I' == 73) \ | |
| 84 && ('J' == 74) && ('K' == 75) && ('L' == 76) && ('M' == 77) \ | |
| 85 && ('N' == 78) && ('O' == 79) && ('P' == 80) && ('Q' == 81) \ | |
| 86 && ('R' == 82) && ('S' == 83) && ('T' == 84) && ('U' == 85) \ | |
| 87 && ('V' == 86) && ('W' == 87) && ('X' == 88) && ('Y' == 89) \ | |
| 88 && ('Z' == 90) && ('[' == 91) && ('\\' == 92) && (']' == 93) \ | |
| 89 && ('^' == 94) && ('_' == 95) && ('a' == 97) && ('b' == 98) \ | |
| 90 && ('c' == 99) && ('d' == 100) && ('e' == 101) && ('f' == 102) \ | |
| 91 && ('g' == 103) && ('h' == 104) && ('i' == 105) && ('j' == 106) \ | |
| 92 && ('k' == 107) && ('l' == 108) && ('m' == 109) && ('n' == 110) \ | |
| 93 && ('o' == 111) && ('p' == 112) && ('q' == 113) && ('r' == 114) \ | |
| 94 && ('s' == 115) && ('t' == 116) && ('u' == 117) && ('v' == 118) \ | |
| 95 && ('w' == 119) && ('x' == 120) && ('y' == 121) && ('z' == 122) \ | |
| 96 && ('{' == 123) && ('|' == 124) && ('}' == 125) && ('~' == 126) | |
| 4219 | 97 /* The character set is ASCII or one of its variants or extensions, not EBCDIC. |
| 4218 | 98 Testing the value of '\n' and '\r' is not relevant. */ |
| 99 #define C_CTYPE_ASCII 1 | |
| 100 #endif | |
| 101 | |
| 102 | |
| 103 /* Function declarations. */ | |
| 104 | |
| 10572 | 105 /* Unlike the functions in <ctype.h>, which require an argument in the range |
| 106 of the 'unsigned char' type, the functions here operate on values that are | |
| 107 in the 'unsigned char' range or in the 'char' range. In other words, | |
| 108 when you have a 'char' value, you need to cast it before using it as | |
| 109 argument to a <ctype.h> function: | |
| 110 | |
| 111 const char *s = ...; | |
| 112 if (isalpha ((unsigned char) *s)) ... | |
| 113 | |
| 114 but you don't need to cast it for the functions defined in this file: | |
| 115 | |
| 116 const char *s = ...; | |
| 117 if (c_isalpha (*s)) ... | |
| 118 */ | |
| 119 | |
|
16128
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
120 extern bool c_isascii (int c) _GL_ATTRIBUTE_CONST; /* not locale dependent */ |
| 4218 | 121 |
|
16128
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
122 extern bool c_isalnum (int c) _GL_ATTRIBUTE_CONST; |
|
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
123 extern bool c_isalpha (int c) _GL_ATTRIBUTE_CONST; |
|
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
124 extern bool c_isblank (int c) _GL_ATTRIBUTE_CONST; |
|
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
125 extern bool c_iscntrl (int c) _GL_ATTRIBUTE_CONST; |
|
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
126 extern bool c_isdigit (int c) _GL_ATTRIBUTE_CONST; |
|
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
127 extern bool c_islower (int c) _GL_ATTRIBUTE_CONST; |
|
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
128 extern bool c_isgraph (int c) _GL_ATTRIBUTE_CONST; |
|
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
129 extern bool c_isprint (int c) _GL_ATTRIBUTE_CONST; |
|
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
130 extern bool c_ispunct (int c) _GL_ATTRIBUTE_CONST; |
|
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
131 extern bool c_isspace (int c) _GL_ATTRIBUTE_CONST; |
|
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
132 extern bool c_isupper (int c) _GL_ATTRIBUTE_CONST; |
|
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
133 extern bool c_isxdigit (int c) _GL_ATTRIBUTE_CONST; |
| 4218 | 134 |
|
16128
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
135 extern int c_tolower (int c) _GL_ATTRIBUTE_CONST; |
|
6beadb731202
mark functions with const and pure attributes
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
136 extern int c_toupper (int c) _GL_ATTRIBUTE_CONST; |
| 4218 | 137 |
| 138 | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
139 #if defined __GNUC__ && defined __OPTIMIZE__ && !defined __OPTIMIZE_SIZE__ && !defined NO_C_CTYPE_MACROS |
| 4218 | 140 |
| 141 /* ASCII optimizations. */ | |
| 142 | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
143 #undef c_isascii |
| 4218 | 144 #define c_isascii(c) \ |
| 145 ({ int __c = (c); \ | |
| 4219 | 146 (__c >= 0x00 && __c <= 0x7f); \ |
| 4218 | 147 }) |
| 148 | |
| 149 #if C_CTYPE_CONSECUTIVE_DIGITS \ | |
| 150 && C_CTYPE_CONSECUTIVE_UPPERCASE && C_CTYPE_CONSECUTIVE_LOWERCASE | |
| 151 #if C_CTYPE_ASCII | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
152 #undef c_isalnum |
| 4218 | 153 #define c_isalnum(c) \ |
| 154 ({ int __c = (c); \ | |
| 155 ((__c >= '0' && __c <= '9') \ | |
| 156 || ((__c & ~0x20) >= 'A' && (__c & ~0x20) <= 'Z')); \ | |
| 157 }) | |
| 158 #else | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
159 #undef c_isalnum |
| 4218 | 160 #define c_isalnum(c) \ |
| 161 ({ int __c = (c); \ | |
| 162 ((__c >= '0' && __c <= '9') \ | |
| 163 || (__c >= 'A' && __c <= 'Z') \ | |
| 164 || (__c >= 'a' && __c <= 'z')); \ | |
| 165 }) | |
| 166 #endif | |
| 167 #endif | |
| 168 | |
| 169 #if C_CTYPE_CONSECUTIVE_UPPERCASE && C_CTYPE_CONSECUTIVE_LOWERCASE | |
| 170 #if C_CTYPE_ASCII | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
171 #undef c_isalpha |
| 4218 | 172 #define c_isalpha(c) \ |
| 173 ({ int __c = (c); \ | |
| 174 ((__c & ~0x20) >= 'A' && (__c & ~0x20) <= 'Z'); \ | |
| 175 }) | |
| 176 #else | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
177 #undef c_isalpha |
| 4218 | 178 #define c_isalpha(c) \ |
| 179 ({ int __c = (c); \ | |
| 180 ((__c >= 'A' && __c <= 'Z') || (__c >= 'a' && __c <= 'z')); \ | |
| 181 }) | |
| 182 #endif | |
| 183 #endif | |
| 184 | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
185 #undef c_isblank |
| 4218 | 186 #define c_isblank(c) \ |
| 187 ({ int __c = (c); \ | |
| 188 (__c == ' ' || __c == '\t'); \ | |
| 189 }) | |
| 190 | |
| 191 #if C_CTYPE_ASCII | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
192 #undef c_iscntrl |
| 4218 | 193 #define c_iscntrl(c) \ |
| 194 ({ int __c = (c); \ | |
| 195 ((__c & ~0x1f) == 0 || __c == 0x7f); \ | |
| 196 }) | |
| 197 #endif | |
| 198 | |
| 199 #if C_CTYPE_CONSECUTIVE_DIGITS | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
200 #undef c_isdigit |
| 4218 | 201 #define c_isdigit(c) \ |
| 202 ({ int __c = (c); \ | |
| 203 (__c >= '0' && __c <= '9'); \ | |
| 204 }) | |
| 205 #endif | |
| 206 | |
| 207 #if C_CTYPE_CONSECUTIVE_LOWERCASE | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
208 #undef c_islower |
| 4218 | 209 #define c_islower(c) \ |
| 210 ({ int __c = (c); \ | |
| 211 (__c >= 'a' && __c <= 'z'); \ | |
| 212 }) | |
| 213 #endif | |
| 214 | |
| 215 #if C_CTYPE_ASCII | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
216 #undef c_isgraph |
| 4218 | 217 #define c_isgraph(c) \ |
| 218 ({ int __c = (c); \ | |
| 219 (__c >= '!' && __c <= '~'); \ | |
| 220 }) | |
| 221 #endif | |
| 222 | |
| 223 #if C_CTYPE_ASCII | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
224 #undef c_isprint |
| 4218 | 225 #define c_isprint(c) \ |
| 226 ({ int __c = (c); \ | |
| 227 (__c >= ' ' && __c <= '~'); \ | |
| 228 }) | |
| 229 #endif | |
| 230 | |
| 231 #if C_CTYPE_ASCII | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
232 #undef c_ispunct |
| 4218 | 233 #define c_ispunct(c) \ |
| 234 ({ int _c = (c); \ | |
| 235 (c_isgraph (_c) && ! c_isalnum (_c)); \ | |
| 236 }) | |
| 237 #endif | |
| 238 | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
239 #undef c_isspace |
| 4218 | 240 #define c_isspace(c) \ |
| 241 ({ int __c = (c); \ | |
| 242 (__c == ' ' || __c == '\t' \ | |
| 243 || __c == '\n' || __c == '\v' || __c == '\f' || __c == '\r'); \ | |
| 244 }) | |
| 245 | |
| 246 #if C_CTYPE_CONSECUTIVE_UPPERCASE | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
247 #undef c_isupper |
| 4218 | 248 #define c_isupper(c) \ |
| 249 ({ int __c = (c); \ | |
| 250 (__c >= 'A' && __c <= 'Z'); \ | |
| 251 }) | |
| 252 #endif | |
| 253 | |
| 254 #if C_CTYPE_CONSECUTIVE_DIGITS \ | |
| 255 && C_CTYPE_CONSECUTIVE_UPPERCASE && C_CTYPE_CONSECUTIVE_LOWERCASE | |
| 256 #if C_CTYPE_ASCII | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
257 #undef c_isxdigit |
| 4218 | 258 #define c_isxdigit(c) \ |
| 259 ({ int __c = (c); \ | |
| 260 ((__c >= '0' && __c <= '9') \ | |
| 261 || ((__c & ~0x20) >= 'A' && (__c & ~0x20) <= 'F')); \ | |
| 262 }) | |
| 263 #else | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
264 #undef c_isxdigit |
| 4218 | 265 #define c_isxdigit(c) \ |
| 266 ({ int __c = (c); \ | |
| 267 ((__c >= '0' && __c <= '9') \ | |
| 268 || (__c >= 'A' && __c <= 'F') \ | |
| 269 || (__c >= 'a' && __c <= 'f')); \ | |
| 270 }) | |
| 271 #endif | |
| 272 #endif | |
| 273 | |
| 274 #if C_CTYPE_CONSECUTIVE_UPPERCASE && C_CTYPE_CONSECUTIVE_LOWERCASE | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
275 #undef c_tolower |
| 4218 | 276 #define c_tolower(c) \ |
| 277 ({ int __c = (c); \ | |
| 278 (__c >= 'A' && __c <= 'Z' ? __c - 'A' + 'a' : __c); \ | |
| 279 }) | |
|
7471
49b97d5983be
Make it possible to #define c_isascii etc. to aliases.
Bruno Haible <bruno@clisp.org>
parents:
7009
diff
changeset
|
280 #undef c_toupper |
| 4218 | 281 #define c_toupper(c) \ |
| 282 ({ int __c = (c); \ | |
| 283 (__c >= 'a' && __c <= 'z' ? __c - 'a' + 'A' : __c); \ | |
| 284 }) | |
| 285 #endif | |
| 286 | |
| 287 #endif /* optimizing for speed */ | |
| 288 | |
|
7602
adf3720ff325
Avoid name mangling in C++ mode.
Bruno Haible <bruno@clisp.org>
parents:
7471
diff
changeset
|
289 |
|
adf3720ff325
Avoid name mangling in C++ mode.
Bruno Haible <bruno@clisp.org>
parents:
7471
diff
changeset
|
290 #ifdef __cplusplus |
|
adf3720ff325
Avoid name mangling in C++ mode.
Bruno Haible <bruno@clisp.org>
parents:
7471
diff
changeset
|
291 } |
|
adf3720ff325
Avoid name mangling in C++ mode.
Bruno Haible <bruno@clisp.org>
parents:
7471
diff
changeset
|
292 #endif |
|
adf3720ff325
Avoid name mangling in C++ mode.
Bruno Haible <bruno@clisp.org>
parents:
7471
diff
changeset
|
293 |
| 4218 | 294 #endif /* C_CTYPE_H */ |