--- gforth/history.fs 2001/09/17 09:19:22 1.28 +++ gforth/history.fs 2002/09/14 08:20:19 1.29 @@ -72,7 +72,7 @@ interpret/compile: ctrl ( "" -- c nip nip THEN ; -s" os-class" environment? [IF] s" unix" compare 0= [ELSE] true [THEN] +s" os-class" environment? [IF] s" unix" str= [ELSE] true [THEN] [IF] : history-file ( -- addr u ) s" GFORTHHIST" getenv dup 0= IF