--- gforth/Attic/envos.fs 1997/09/01 23:07:07 1.1 +++ gforth/Attic/envos.fs 2000/09/23 15:05:59 1.4 @@ -1,5 +1,25 @@ \ envos.fs set os-specific environmental queries 07jul97jaw +\ Copyright (C) 1997,1999 Free Software Foundation, Inc. + +\ This file is part of Gforth. + +\ Gforth is free software; you can redistribute it and/or +\ modify it under the terms of the GNU General Public License +\ as published by the Free Software Foundation; either version 2 +\ of the License, or (at your option) any later version. + +\ This program is distributed in the hope that it will be useful, +\ but WITHOUT ANY WARRANTY; without even the implied warranty of +\ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +\ GNU General Public License for more details. + +\ You should have received a copy of the GNU General Public License +\ along with this program; if not, write to the Free Software +\ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. + 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