1: \ machpc.fs is generated; source: machpc.fs.in
2: \ generic mach file for pc gforth 03sep97jaw
3:
4: \ Copyright (C) 1995,1996,1997,2000,2003,2005,2007,2008,2010,2011 Free Software Foundation, Inc.
5:
6: \ This file is part of Gforth.
7:
8: \ Gforth is free software; you can redistribute it and/or
9: \ modify it under the terms of the GNU General Public License
10: \ as published by the Free Software Foundation, either version 3
11: \ of the License, or (at your option) any later version.
12:
13: \ This program is distributed in the hope that it will be useful,
14: \ but WITHOUT ANY WARRANTY; without even the implied warranty of
15: \ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16: \ GNU General Public License for more details.
17:
18: \ You should have received a copy of the GNU General Public License
19: \ along with this program. If not, see http://www.gnu.org/licenses/.
20:
21: true DefaultValue NIL \ relocating
22:
23: >ENVIRON
24:
25: @EC_MODE@ DefaultValue ec
26:
27: T has? ec H 0= [IF]
28: true DefaultValue file \ controls the presence of the
29: \ file access wordset
30: true DefaultValue OS \ flag to indicate a operating system
31:
32: true DefaultValue prims \ true: primitives are c-code
33:
34: true DefaultValue floating \ floating point wordset is present
35:
36: true DefaultValue glocals \ gforth locals are present
37: \ will be loaded
38: true DefaultValue dcomps \ double number comparisons
39:
40: true DefaultValue hash \ hashing primitives are loaded/present
41:
42: true DefaultValue xconds \ used together with glocals,
43: \ special conditionals supporting gforths'
44: \ local variables
45: true DefaultValue header \ save a header information
46:
47: true DefaultValue backtrace \ enables backtrace code
48:
49: true DefaultValue new-input \ enables object oriented input
50:
51: @PEEPHOLEFLAG@ DefaultValue peephole \ enables peephole optimizer
52:
53: true DefaultValue primcentric \ enables primcentric code
54:
55: true DefaultValue abranch \ enables absolute branches
56:
57: false DefaultValue control-rack \ disable return stack use for control flow
58:
59: false DefaultValue crlf
60:
61: true DefaultValue recognizer
62:
63: $100 DefaultValue kernel-start
64: cell 2 = [IF] &32 KB [ELSE] $100000 cells [THEN] DefaultValue kernel-size
65:
66: &16 KB DefaultValue stack-size
67: &16 KB DefaultValue fstack-size
68: &15 KB DefaultValue rstack-size
69: &14 KB &512 + DefaultValue lstack-size
70: [ELSE]
71: false DefaultValue file \ controls the presence of the
72: \ file access wordset
73: false DefaultValue OS \ flag to indicate a operating system
74:
75: true SetValue relocate
76:
77: false DefaultValue ffcall \ Foreign Function Calls
78:
79: false DefaultValue libffi \ Foreign Function Calls
80:
81: false DefaultValue oldcall \ old Foreign Function Calls
82:
83: true DefaultValue prims \ true: primitives are c-code
84:
85: false DefaultValue floating \ floating point wordset is present
86:
87: false DefaultValue glocals \ gforth locals are present
88: \ will be loaded
89: true DefaultValue dcomps \ double number comparisons
90:
91: false DefaultValue hash \ hashing primitives are loaded/present
92:
93: false DefaultValue xconds \ used together with glocals,
94: \ special conditionals supporting gforths'
95: \ local variables
96: true DefaultValue header \ save a header information
97:
98: false DefaultValue backtrace \ enables backtrace code
99:
100: false DefaultValue new-input \ enables object oriented input
101:
102: false DefaultValue peephole \ enables peephole optimizer
103:
104: true DefaultValue primcentric \ enables primcentric code
105:
106: true DefaultValue f83headerstring
107:
108: true DefaultValue abranch \ enables absolute branches
109:
110: true DefaultValue control-rack \ disable return stack use for control flow
111:
112: false DefaultValue crlf
113:
114: false DefaultValue recognizer
115:
116: false DefaultValue flash
117:
118: $10 DefaultValue kernel-start \ no artificial offset
119: &48 KB DefaultValue kernel-size
120:
121: &1 KB DefaultValue stack-size
122: &0 KB DefaultValue fstack-size
123: &1 KB DefaultValue rstack-size
124: &1 KB DefaultValue lstack-size
125: [THEN]
126:
127: T cell H 8 = DefaultValue 64bit
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>