Diff for /gforth/environ.fs between versions 1.20 and 1.25

version 1.20, 1999/12/03 18:24:23 version 1.25, 2000/09/23 15:46:52
Line 1 Line 1
 \ environmental queries  \ environmental queries
   
 \ Copyright (C) 1995,1996,1997,1998 Free Software Foundation, Inc.  \ Copyright (C) 1995,1996,1997,1998,2000 Free Software Foundation, Inc.
   
 \ This file is part of Gforth.  \ This file is part of Gforth.
   
Line 16 Line 16
   
 \ You should have received a copy of the GNU General Public License  \ You should have received a copy of the GNU General Public License
 \ along with this program; if not, write to the Free Software  \ along with this program; if not, write to the Free Software
 \ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  \ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA.
   
 \ wordlist constant environment-wordlist  \ wordlist constant environment-wordlist
   
Line 71  true constant CORE-EXT ( -- f ) \ enviro Line 71  true constant CORE-EXT ( -- f ) \ enviro
 \G True if the complete core extension word set is present. Always true for Gforth.  \G True if the complete core extension word set is present. Always true for Gforth.
   
 1 -3 mod 0< constant FLOORED ( -- f ) \ environment  1 -3 mod 0< constant FLOORED ( -- f ) \ environment
 \G True if division is floored by default.  \G True if @code{/} etc. perform floored division
   
 1 ADDRESS-UNIT-BITS cells 1- lshift 1- constant MAX-N ( -- n ) \ environment  1 ADDRESS-UNIT-BITS cells 1- lshift 1- constant MAX-N ( -- n ) \ environment
 \G Largest usable signed integer.  \G Largest usable signed integer.
Line 86  true constant CORE-EXT ( -- f ) \ enviro Line 86  true constant CORE-EXT ( -- f ) \ enviro
 \G Largest usable unsigned double.  \G Largest usable unsigned double.
   
 version-string 2constant gforth ( -- c-addr u ) \ gforth-environment  version-string 2constant gforth ( -- c-addr u ) \ gforth-environment
 \G Counted string representing a version string for this version of Gforth  \G Counted string representing a version string for this version of
 \G (for versions>0.3.0).  \G Gforth (for versions>0.3.0).  The version strings of the various
 \ the version strings of the various versions are guaranteed to be  \G versions are guaranteed to be ordered lexicographically.
 \ sorted lexicographically  
   
 : return-stack-cells ( -- n ) \ environment  : return-stack-cells ( -- n ) \ environment
     \G Maximum size of the return stack, in cells.      \G Maximum size of the return stack, in cells.

Removed from v.1.20  
changed lines
  Added in v.1.25


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>