diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

use const char *

Browse Source
This commit is contained in:
Vítor Santos Costa 2014-12-14 11:52:07 +00:00
parent bed14749f8
commit f5ef30563b
3 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
C/qlyr.c
View File

@ -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)

1
C/qlyw.c
View File

@ -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)

4
C/save.c
View File

@ -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) {