d/freebsd-skq
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Use proper literal names.

Browse Source
This commit is contained in:
jkh 1998-11-06 04:01:32 +00:00
parent 49cc339a79
commit f867ac1646
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
sys/boot/ficl/words.c
View File

@ -4040,7 +4040,7 @@ static void fload(FICL_VM *pVM)
if (pVM->state == COMPILE) if (pVM->state == COMPILE)
{ {
dictAppendCell(dp, LVALUEtoCELL(pStringLit)); dictAppendCell(dp, LVALUEtoCELL(fload));
dp->here = PTRtoCELL vmGetString(pVM, (FICL_STRING *)dp->here, '\"'); dp->here = PTRtoCELL vmGetString(pVM, (FICL_STRING *)dp->here, '\"');
dictAlign(dp); dictAlign(dp);
return; return;
@ -4109,7 +4109,7 @@ static void fexists(FICL_VM *pVM)
if (pVM->state == COMPILE) if (pVM->state == COMPILE)
{ {
dictAppendCell(dp, LVALUEtoCELL(pStringLit)); dictAppendCell(dp, LVALUEtoCELL(fexists));
dp->here = PTRtoCELL vmGetString(pVM, (FICL_STRING *)dp->here, '\"'); dp->here = PTRtoCELL vmGetString(pVM, (FICL_STRING *)dp->here, '\"');
dictAlign(dp); dictAlign(dp);
return; return;