diff options
author | Jonathan Kew <jfkthame@googlemail.com> | 2008-03-27 09:14:58 +0000 |
---|---|---|
committer | Jonathan Kew <jfkthame@googlemail.com> | 2008-03-27 09:14:58 +0000 |
commit | 8fa331c4a7ed20194a81c2a9c5a9511ca2ab66dd (patch) | |
tree | ee493d30c99ceb5c734a159563bede09e88fe6be /Build/source/texk/web2c/cpascal.h | |
parent | ee5049fdbb8acbbac0e06dd1450e94a3ccdba59f (diff) |
clean up some const-string warnings
git-svn-id: svn://tug.org/texlive/trunk@7184 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/cpascal.h')
-rw-r--r-- | Build/source/texk/web2c/cpascal.h | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/Build/source/texk/web2c/cpascal.h b/Build/source/texk/web2c/cpascal.h index 4ee02aac7fc..9330f0695cb 100644 --- a/Build/source/texk/web2c/cpascal.h +++ b/Build/source/texk/web2c/cpascal.h @@ -124,6 +124,7 @@ typedef FILE *text; /* To work around casting problems. */ #define intcast(x) ((integer) (x)) #define stringcast(x) ((string) (x)) +#define conststringcast(x) ((const_string) (x)) /* For throwing away input from the file F. */ #define vgetc(f) (void) getc (f) @@ -177,6 +178,8 @@ typedef unsigned char *pointertobyte; -- var2 lacks the *. */ #define cstring string +#define constcstring const_string + /* Not all C libraries have fabs, so we'll roll our own. */ #undef fabs #define fabs(x) ((x) >= 0.0 ? (x) : -(x)) @@ -200,11 +203,11 @@ typedef unsigned char *pointertobyte; /* We use this rather than a simple fputs so that the string will end up in the .log file, too. */ -#define printcstring(STR) \ - do { \ - char *ch_ptr = (STR); \ - while (*ch_ptr) \ - printchar(*(ch_ptr++)); \ +#define printcstring(STR) \ + do { \ + const_string ch_ptr = (STR); \ + while (*ch_ptr) \ + printchar(*(ch_ptr++)); \ } while (0) |