--- gforth/startup.fs 2002/01/17 12:02:55 1.43 +++ gforth/startup.fs 2002/09/14 08:20:20 1.45 @@ -46,7 +46,7 @@ require simp-see.fs include bufio.fs include debug.fs include history.fs -s" os-class" environment? dup [IF] drop s" unix" compare 0= [THEN] +s" os-class" environment? dup [IF] drop s" unix" str= [THEN] [IF] include vt100key.fs [ELSE] @@ -58,13 +58,14 @@ require blocks.fs require intcomp.fs require savesys.fs require table.fs -s" os-class" environment? dup [IF] drop s" unix" compare 0= [THEN] +s" os-class" environment? dup [IF] drop s" unix" str= [THEN] [IF] require ekey.fs [ELSE] require dosekey.fs [THEN] require backtrac.fs +require quotes.fs require code.fs \ define the environmental queries for all the loaded wordsets