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 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 2
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, write to the Free Software
20: \ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA.
21:
22: true DefaultValue NIL \ relocating
23:
24: >ENVIRON
25:
26: true DefaultValue file \ controls the presence of the
27: \ file access wordset
28: true DefaultValue OS \ flag to indicate a operating system
29:
30: @FFCALLFLAG@ DefaultValue ffcall \ Foreign Function Calls
31:
32: @OLDCALLFLAG@ DefaultValue oldcall \ old Foreign Function Calls
33:
34: true DefaultValue prims \ true: primitives are c-code
35:
36: true DefaultValue floating \ floating point wordset is present
37:
38: true DefaultValue glocals \ gforth locals are present
39: \ will be loaded
40: true DefaultValue dcomps \ double number comparisons
41:
42: true DefaultValue hash \ hashing primitives are loaded/present
43:
44: true DefaultValue xconds \ used together with glocals,
45: \ special conditionals supporting gforths'
46: \ local variables
47: true DefaultValue header \ save a header information
48:
49: true DefaultValue backtrace \ enables backtrace code
50:
51: true DefaultValue new-input \ enables object oriented input
52:
53: @PEEPHOLEFLAG@ DefaultValue peephole \ enables peephole optimizer
54:
55:
56: true DefaultValue abranch \ enables absolute branches
57:
58: false DefaultValue control-rack \ disable return stack use for control flow
59:
60: false DefaultValue ec
61: false DefaultValue crlf
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
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>