1
0
mirror of https://git.FreeBSD.org/src.git synced 2024-12-18 10:35:55 +00:00

Fix ficlExecFD to take kern/9412 changes into account. Also modify it

not to vmThrow errors. This is not what the comments say it does, and
it doesn't work when there is no ficlExec environment (like it's only
use in sys/boot/common/interp_forth.c).

PR:		bin/9772
This commit is contained in:
Daniel C. Sobral 1999-02-04 13:28:56 +00:00
parent e08e812d7a
commit 15369f7e9f
Notes: svn2git 2020-12-20 02:59:44 +00:00
svn path=/head/; revision=43602

View File

@ -373,11 +373,11 @@ int ficlExecFD(FICL_VM *pVM, int fd)
break;
continue;
}
if ((rval = ficlExec(pVM, cp, i)) >= VM_ERREXIT)
rval = ficlExec(pVM, cp, i);
if(rval != VM_QUIT && rval != VM_USEREXIT && rval != VM_OUTOFTEXT)
{
pVM->sourceID = id;
vmThrowErr(pVM, "ficlExecFD: Error at line %d", nLine);
break;
return rval;
}
}
/*