From ebc4b7c4fb263740c8144d89930e0953d7e0fc3a Mon Sep 17 00:00:00 2001 From: "Jordan K. Hubbard" Date: Fri, 6 Nov 1998 23:50:08 +0000 Subject: [PATCH] switch words to default mode. --- sys/boot/ficl/words.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/sys/boot/ficl/words.c b/sys/boot/ficl/words.c index 886b429739bc..1d993a888208 100644 --- a/sys/boot/ficl/words.c +++ b/sys/boot/ficl/words.c @@ -4037,7 +4037,7 @@ static void fload(FICL_VM *pVM) CELL id; pFilename->count = stackPopINT32(pVM->pStack); - pFilename->text = stackPopPtr(pVM->pStack); + bcopy(stackPopPtr(pVM->pStack), &pFilename->text, sizeof(char *)); fd = open(pFilename->text, O_RDONLY); if (fd == -1) { @@ -4090,7 +4090,7 @@ static void fexists(FICL_VM *pVM) int fd; pFilename->count = stackPopINT32(pVM->pStack); - pFilename->text = stackPopPtr(pVM->pStack); + bcopy(stackPopPtr(pVM->pStack), &pFilename->text, sizeof(char *)); fd = open(pFilename->text, O_RDONLY); if (fd > 0) { stackPushINT32(pVM->pStack, TRUE); @@ -4283,8 +4283,8 @@ void ficlCompileCore(FICL_DICT *dp) dictAppendWord(dp, "\\", commentLine, FW_IMMEDIATE); /* FreeBSD extention words */ - dictAppendWord(dp, "fload", fload, FW_IMMEDIATE); - dictAppendWord(dp, "fexists", fexists, FW_IMMEDIATE); + dictAppendWord(dp, "fload", fload, FW_DEFAULT); + dictAppendWord(dp, "fexists", fexists, FW_DEFAULT); dictAppendWord(dp, "key", key, FW_DEFAULT); /*