diff options
| -rw-r--r-- | usr/src/boot/sys/boot/common/interp_forth.c | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/usr/src/boot/sys/boot/common/interp_forth.c b/usr/src/boot/sys/boot/common/interp_forth.c index 1e6dbb6a5d..d1154e4946 100644 --- a/usr/src/boot/sys/boot/common/interp_forth.c +++ b/usr/src/boot/sys/boot/common/interp_forth.c @@ -63,7 +63,6 @@ extern char bootprog_rev[]; ficlSystemInformation *fsi; ficlSystem *bf_sys; ficlVm *bf_vm; -ficlWord *pInterp; /* * Shim for taking commands from BF and passing them out to 'standard' @@ -311,8 +310,6 @@ bf_init(char *rc) ficlDictionarySetConstant(env, "loader_version", (bootprog_rev[0] - '0') * 10 + (bootprog_rev[2] - '0')); - pInterp = ficlSystemLookup(bf_sys, "interpret"); - /* try to load and run init file if present */ if (rc == NULL) rc = "/boot/forth/boot.4th"; @@ -323,9 +320,6 @@ bf_init(char *rc) close(fd); } } - - /* Do this again, so that interpret can be redefined. */ - pInterp = ficlSystemLookup(bf_sys, "interpret"); } /* |