--- gforth/environ.fs 1999/12/03 18:24:23 1.20 +++ gforth/environ.fs 2000/09/23 15:05:59 1.24 @@ -1,6 +1,6 @@ \ 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. @@ -71,7 +71,7 @@ true constant CORE-EXT ( -- f ) \ enviro \G True if the complete core extension word set is present. Always true for Gforth. 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 \G Largest usable signed integer. @@ -86,10 +86,9 @@ true constant CORE-EXT ( -- f ) \ enviro \G Largest usable unsigned double. version-string 2constant gforth ( -- c-addr u ) \ gforth-environment -\G Counted string representing a version string for this version of Gforth -\G (for versions>0.3.0). -\ the version strings of the various versions are guaranteed to be -\ sorted lexicographically +\G Counted string representing a version string for this version of +\G Gforth (for versions>0.3.0). The version strings of the various +\G versions are guaranteed to be ordered lexicographically. : return-stack-cells ( -- n ) \ environment \G Maximum size of the return stack, in cells.