version 1.11, 2001/09/12 14:45:39
|
version 1.22, 2003/08/23 20:16:08
|
Line 1
|
Line 1
|
|
\ machpc.fs is generated; source: machpc.fs.in |
\ generic mach file for pc gforth 03sep97jaw |
\ 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. |
\ This file is part of Gforth. |
|
|
Line 18
|
Line 19
|
\ along with this program; if not, write to the Free Software |
\ along with this program; if not, write to the Free Software |
\ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA. |
\ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA. |
|
|
|
true DefaultValue NIL \ relocating |
|
|
>ENVIRON |
>ENVIRON |
|
|
true DefaultValue relocate |
|
|
|
true DefaultValue file \ controls the presence of the |
true DefaultValue file \ controls the presence of the |
\ file access wordset |
\ file access wordset |
true DefaultValue OS \ flag to indicate a operating system |
true DefaultValue OS \ flag to indicate a operating system |
|
|
|
true DefaultValue ffcall \ Foreign Function Calls |
|
|
|
false DefaultValue oldcall \ old Foreign Function Calls |
|
|
true DefaultValue prims \ true: primitives are c-code |
true DefaultValue prims \ true: primitives are c-code |
|
|
true DefaultValue floating \ floating point wordset is present |
true DefaultValue floating \ floating point wordset is present |
Line 48 true DefaultValue new-input \ enables ob
|
Line 52 true DefaultValue new-input \ enables ob
|
|
|
true DefaultValue peephole \ enables peephole optimizer |
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 ec |
false DefaultValue crlf |
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 |
&16 KB DefaultValue stack-size |
&15 KB &512 + DefaultValue fstack-size |
&16 KB DefaultValue fstack-size |
&15 KB DefaultValue rstack-size |
&15 KB DefaultValue rstack-size |
&14 KB &512 + DefaultValue lstack-size |
&14 KB &512 + DefaultValue lstack-size |