diff options
| -rw-r--r-- | sys/boot/common/interp.c | 2 | ||||
| -rw-r--r-- | sys/boot/common/interp_forth.c | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/sys/boot/common/interp.c b/sys/boot/common/interp.c index d53a7ee..7ebab61 100644 --- a/sys/boot/common/interp.c +++ b/sys/boot/common/interp.c @@ -118,7 +118,7 @@ interact(void) if (getenv("prompt") == NULL) setenv("prompt", "${interpret}", 1); if (getenv("interpret") == NULL) - setenv("interpret", "ok", 1); + setenv("interpret", "OK", 1); for (;;) { diff --git a/sys/boot/common/interp_forth.c b/sys/boot/common/interp_forth.c index a77fb6c..b4604d9 100644 --- a/sys/boot/common/interp_forth.c +++ b/sys/boot/common/interp_forth.c @@ -299,7 +299,7 @@ bf_run(char *line) if (result == VM_USEREXIT) panic("interpreter exit"); - setenv("interpret", bf_vm->state ? "" : "ok", 1); + setenv("interpret", bf_vm->state ? "" : "OK", 1); return result; } |
