diff options
Diffstat (limited to 'Build/source/texk/web2c/cwebdir/comm-w2c.h')
-rw-r--r-- | Build/source/texk/web2c/cwebdir/comm-w2c.h | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/Build/source/texk/web2c/cwebdir/comm-w2c.h b/Build/source/texk/web2c/cwebdir/comm-w2c.h index 73598ddddd9..02f9477a926 100644 --- a/Build/source/texk/web2c/cwebdir/comm-w2c.h +++ b/Build/source/texk/web2c/cwebdir/comm-w2c.h @@ -2,7 +2,7 @@ % This program by Silvio Levy and Donald E. Knuth % is based on a program by Knuth. % It is distributed WITHOUT ANY WARRANTY, express or implied. -% Version 4.4 --- June 2021 (works also with later versions) +% Version 4.5 --- July 2021 (works also with later versions) % Copyright (C) 1987,1990,1993 Silvio Levy and Donald E. Knuth @@ -30,8 +30,8 @@ First comes general stuff: @i iso_types.w +@s boolean bool @<Common code...@>= -typedef bool boolean; typedef uint8_t eight_bits; typedef uint16_t sixteen_bits; typedef enum { @@ -60,7 +60,7 @@ internationalization. #endif @# #include <ctype.h> /* definition of |@!isalpha|, |@!isdigit| and so on */ -#include <stdbool.h> /* definition of |@!bool|, |@!true| and |@!false| */ +#include <kpathsea/simpletypes.h> /* |@!boolean|, |@!true| and |@!false| */ #include <stddef.h> /* definition of |@!ptrdiff_t| */ #include <stdint.h> /* definition of |@!uint8_t| and |@!uint16_t| */ #include <stdlib.h> /* definition of |@!getenv| and |@!exit| */ @@ -95,12 +95,12 @@ extern char *id_first; /* where the current identifier begins in the buffer */ extern char *id_loc; /* just after the current identifier in the buffer */ @ Code related to input routines: -@d xisalpha(c) (isalpha((eight_bits)(c))&&((eight_bits)(c)<0200)) -@d xisdigit(c) (isdigit((eight_bits)(c))&&((eight_bits)(c)<0200)) -@d xisspace(c) (isspace((eight_bits)(c))&&((eight_bits)(c)<0200)) -@d xislower(c) (islower((eight_bits)(c))&&((eight_bits)(c)<0200)) -@d xisupper(c) (isupper((eight_bits)(c))&&((eight_bits)(c)<0200)) -@d xisxdigit(c) (isxdigit((eight_bits)(c))&&((eight_bits)(c)<0200)) +@d xisalpha(c) (isalpha((int)(c))&&((eight_bits)(c)<0200)) +@d xisdigit(c) (isdigit((int)(c))&&((eight_bits)(c)<0200)) +@d xisspace(c) (isspace((int)(c))&&((eight_bits)(c)<0200)) +@d xislower(c) (islower((int)(c))&&((eight_bits)(c)<0200)) +@d xisupper(c) (isupper((int)(c))&&((eight_bits)(c)<0200)) +@d xisxdigit(c) (isxdigit((int)(c))&&((eight_bits)(c)<0200)) @d isxalpha(c) ((c)=='_' || (c)=='$') /* non-alpha characters allowed in identifier */ @d ishigh(c) ((eight_bits)(c)>0177) @@ -183,7 +183,7 @@ extern hash_pointer h; /* index into hash-head array */ @ @<Predecl...@>= extern boolean names_match(name_pointer,const char *,size_t,eight_bits);@/ -extern name_pointer id_lookup(const char *,const char *,char); +extern name_pointer id_lookup(const char *,const char *,eight_bits); /* looks up a string in the identifier table */ extern name_pointer section_lookup(char *,char *,boolean); /* finds section name */ extern void init_node(name_pointer);@/ |