Return to envos.fs CVS log | Up to [gforth] / gforth |
version 1.2, 1998/12/08 22:02:40 | version 1.3, 1999/02/03 00:10:20 |
---|---|
Line 19 | Line 19 |
\ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. | \ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
get-current environment-wordlist set-current | get-current environment-wordlist set-current |
: os-class s" unix" ; | : os-class ( -- c-addr u ) \ gforth-environment |
\G Counted string representing a description of the host operating system. | |
s" unix" ; | |
set-current | set-current |