diff options
Diffstat (limited to 'sys/boot/forth/loader.4th')
| -rw-r--r-- | sys/boot/forth/loader.4th | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/sys/boot/forth/loader.4th b/sys/boot/forth/loader.4th index 437533a..e252cfe 100644 --- a/sys/boot/forth/loader.4th +++ b/sys/boot/forth/loader.4th @@ -40,6 +40,7 @@ s" arch-i386" environment? [if] [if] 2048 dictincrease ! \ 2048 additional cells each time include /boot/support.4th +include /boot/color.4th only forth also support-functions also builtins definitions @@ -64,6 +65,12 @@ only forth also support-functions also builtins definitions : boot 0= if ( interpreted ) get_arguments then + loader_color? if + ." [37;44mBooting...[0m" cr + else + ." Booting..." cr + then + \ Unload only if a path was passed dup if >r over r> swap |
