--- gforth/Attic/machpc.fs 2001/09/12 14:45:39 1.11 +++ gforth/Attic/machpc.fs 2003/08/04 20:32:35 1.21 @@ -1,6 +1,7 @@ +\ machpc.fs is generated; source: machpc.fs.in \ generic mach file for pc gforth 03sep97jaw -\ Copyright (C) 1995,1996,1997,2000 Free Software Foundation, Inc. +\ Copyright (C) 1995,1996,1997,2000,2003 Free Software Foundation, Inc. \ This file is part of Gforth. @@ -18,15 +19,16 @@ \ along with this program; if not, write to the Free Software \ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA. +true DefaultValue NIL \ relocating >ENVIRON -true DefaultValue relocate - true DefaultValue file \ controls the presence of the \ file access wordset true DefaultValue OS \ flag to indicate a operating system +true DefaultValue FFCALL \ Foreign Function Calls + true DefaultValue prims \ true: primitives are c-code true DefaultValue floating \ floating point wordset is present @@ -48,12 +50,18 @@ true DefaultValue new-input \ enables ob true DefaultValue peephole \ enables peephole optimizer + +true DefaultValue abranch \ enables absolute branches + +false DefaultValue control-rack \ disable return stack use for control flow + false DefaultValue ec false DefaultValue crlf -cell 2 = [IF] &32 [ELSE] &256 [THEN] KB DefaultValue kernel-size +$100 DefaultValue kernel-start +cell 2 = [IF] &32 KB [ELSE] $100000 cells [THEN] DefaultValue kernel-size &16 KB DefaultValue stack-size -&15 KB &512 + DefaultValue fstack-size +&16 KB DefaultValue fstack-size &15 KB DefaultValue rstack-size &14 KB &512 + DefaultValue lstack-size