Fix windows start to be delayed correctly.

This commit is contained in:
Brad Nelson
2022-02-11 20:45:57 -08:00
parent b64e43f701
commit 3ae415b513
2 changed files with 6 additions and 2 deletions

View File

@ -30,5 +30,4 @@ forth definitions ansi
: at-xy ( x y -- ) esc ." [" 1+ n. ." ;" 1+ n. ." H" ;
: page esc ." [2J" esc ." [H" ;
: set-title ( a n -- ) esc ." ]0;" type bel ;
s" uEforth" set-title
forth

View File

@ -17,4 +17,9 @@ forth definitions internals
: argc ( -- n ) 'argc @ ;
: argv ( n -- a n ) cells 'argv @ + @ z>s ;
forth
internals definitions also ansi
: boot-set-title s" uEforth" set-title ;
' boot-set-title boot-prompt !
only forth definitions