upstream/opnsense-src
1
0
Fork 0
mirror of https://github.com/opnsense/src.git synced 2026-06-09 00:32:25 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix vocabulary juggling so that builtins voc is always searched before

Browse source 
forth vocabulary when initially creating the builtins. FICL 2.05 has a
better way to do this, but this works for now.

Fixes "?".
This commit is contained in:
Daniel C. Sobral 2000-06-16 05:04:05 +00:00
parent 625cc84808
commit f102f87438
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/common/interp_forth.c
View file

@ -244,10 +244,10 @@ bf_init(void)
/* make all commands appear as Forth words */
SET_FOREACH(cmdp, Xcommand_set) {
ficlBuild((*cmdp)->c_name, bf_command, FW_DEFAULT);
ficlExec(bf_vm, "also forth definitions");
ficlExec(bf_vm, "forth definitions builtins");
sprintf(create_buf, "builtin: %s", (*cmdp)->c_name);
ficlExec(bf_vm, create_buf);
ficlExec(bf_vm, "previous definitions");
ficlExec(bf_vm, "builtins definitions");
}
ficlExec(bf_vm, "only forth definitions");