gforth/environ.fs - diff

Return to environ.fs CVS log

Up to [gforth] / gforth

version 1.8, 1995/11/07 18:06:38	version 1.9, 1996/10/25 17:09:43
Line 42 MAX-CHAR constant /COUNTED-STRING	Line 42 MAX-CHAR constant /COUNTED-STRING
ADDRESS-UNIT-BITS cells 2* 2 + constant /HOLD	ADDRESS-UNIT-BITS cells 2* 2 + constant /HOLD
&84 constant /PAD	&84 constant /PAD
true constant CORE	true constant CORE
true constant CORE-EXT?	true constant CORE-EXT
1 -3 mod 0< constant FLOORED	1 -3 mod 0< constant FLOORED

1 ADDRESS-UNIT-BITS cells 1- lshift 1- constant MAX-N	1 ADDRESS-UNIT-BITS cells 1- lshift 1- constant MAX-N