--- gforth/Attic/machpc.fs 2000/09/23 15:06:01 1.7 +++ 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. @@ -16,7 +17,7 @@ \ 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. +\ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA. true DefaultValue NIL \ relocating @@ -26,29 +27,41 @@ true DefaultValue file \ controls the p \ 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 +true DefaultValue floating \ floating point wordset is present -true DefaultValue glocals \ gforth locals are present +true DefaultValue glocals \ gforth locals are present \ will be loaded -true DefaultValue dcomps \ double number comparisons +true DefaultValue dcomps \ double number comparisons true DefaultValue hash \ hashing primitives are loaded/present -true DefaultValue xconds \ used together with glocals, +true DefaultValue xconds \ used together with glocals, \ special conditionals supporting gforths' \ local variables -true DefaultValue header \ save a header information +true DefaultValue header \ save a header information + +true DefaultValue backtrace \ enables backtrace code + +true DefaultValue new-input \ enables object oriented input + +true DefaultValue peephole \ enables peephole optimizer + + +true DefaultValue abranch \ enables absolute branches -true DefaultValue backtrace \ enables backtrace code +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