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: true DefaultValue objects
64:
65: $100 DefaultValue kernel-start
66: cell 2 = [IF] &32 KB [ELSE] $100000 cells [THEN] DefaultValue kernel-size
67:
68: &16 KB DefaultValue stack-size
69: &16 KB DefaultValue fstack-size
70: &15 KB DefaultValue rstack-size
71: &14 KB &512 + DefaultValue lstack-size
72: [ELSE]
73: false DefaultValue file \ controls the presence of the
74: \ file access wordset
75: false DefaultValue OS \ flag to indicate a operating system
76:
77: true SetValue relocate
78:
79: false DefaultValue ffcall \ Foreign Function Calls
80:
81: false DefaultValue libffi \ Foreign Function Calls
82:
83: false DefaultValue oldcall \ old Foreign Function Calls
84:
85: true DefaultValue prims \ true: primitives are c-code
86:
87: false DefaultValue floating \ floating point wordset is present
88:
89: false DefaultValue glocals \ gforth locals are present
90: \ will be loaded
91: true DefaultValue dcomps \ double number comparisons
92:
93: false DefaultValue hash \ hashing primitives are loaded/present
94:
95: false DefaultValue xconds \ used together with glocals,
96: \ special conditionals supporting gforths'
97: \ local variables
98: true DefaultValue header \ save a header information
99:
100: false DefaultValue backtrace \ enables backtrace code
101:
102: false DefaultValue new-input \ enables object oriented input
103:
104: false DefaultValue peephole \ enables peephole optimizer
105:
106: true DefaultValue primcentric \ enables primcentric code
107:
108: true DefaultValue f83headerstring
109:
110: true DefaultValue abranch \ enables absolute branches
111:
112: true DefaultValue control-rack \ disable return stack use for control flow
113:
114: false DefaultValue crlf
115:
116: false DefaultValue recognizer
117:
118: false DefaultValue flash
119:
120: false DefaultValue objects
121:
122: $10 DefaultValue kernel-start \ no artificial offset
123: &48 KB DefaultValue kernel-size
124:
125: &1 KB DefaultValue stack-size
126: &0 KB DefaultValue fstack-size
127: &1 KB DefaultValue rstack-size
128: &1 KB DefaultValue lstack-size
129: [THEN]
130:
131: T cell H 8 = DefaultValue 64bit
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>