From f5ef30563b092f229502f10323bb5c05b5b9bb94 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?V=C3=ADtor=20Santos=20Costa?= Date: Sun, 14 Dec 2014 11:52:07 +0000 Subject: [PATCH] use const char * --- C/qlyr.c | 1 + C/qlyw.c | 1 + C/save.c | 4 ++-- 3 files changed, 4 insertions(+), 2 deletions(-) diff --git a/C/qlyr.c b/C/qlyr.c index 2728c543b..cdebef60f 100755 --- a/C/qlyr.c +++ b/C/qlyr.c @@ -625,6 +625,7 @@ XAdjust__ (wamreg reg USES_REGS) #define YAdjust(X) (X) #define HoldEntryAdjust(P) (P) #define CodeCharPAdjust(P) (P) +#define CodeConstCharPAdjust(P) (P) #define CodeVoidPAdjust(P) (P) #define HaltHookAdjust(P) (P) diff --git a/C/qlyw.c b/C/qlyw.c index b68175696..12506fc6c 100755 --- a/C/qlyw.c +++ b/C/qlyw.c @@ -498,6 +498,7 @@ DBRefAdjust__ (DBRef dbt USES_REGS) #define YAdjust(P) (P) #define HoldEntryAdjust(P) (P) #define CodeCharPAdjust(P) (P) +#define CodeConstCharPAdjust(P) (P) #define CodeVoidPAdjust(P) (P) #define HaltHookAdjust(P) (P) diff --git a/C/save.c b/C/save.c index 839bb61b3..43f41980c 100755 --- a/C/save.c +++ b/C/save.c @@ -1427,7 +1427,7 @@ commit_to_saved_state(char *s, CELL *Astate, CELL *ATrail, CELL *AStack, CELL *A } static void -cat_file_name(char *s, char *prefix, char *name, unsigned int max_length) +cat_file_name(char *s, const char *prefix, char *name, unsigned int max_length) { strncpy(s, prefix, max_length); #if _MSC_VER || defined(__MINGW32__) @@ -1517,7 +1517,7 @@ OpenRestore(char *inpf, char *YapLibDir, CELL *Astate, CELL *ATrail, CELL *AStac } #if HAVE_GETENV { - char *yap_env = getenv("YAPLIBDIR"); + const char *yap_env = getenv("YAPLIBDIR"); if (yap_env != NULL) { cat_file_name(LOCAL_FileNameBuf, yap_env, inpf, YAP_FILENAME_MAX); if ((mode = try_open(LOCAL_FileNameBuf,Astate,ATrail,AStack,AHeap,save_buffer,streamp)) != FAIL_RESTORE) {