Annotation of gforth/machpc.fs.in, revision 1.13
1.2 anton 1: \ machpc.fs is generated; source: machpc.fs.in
1.1 pazsan 2: \ generic mach file for pc gforth 03sep97jaw
3:
1.12 anton 4: \ Copyright (C) 1995,1996,1997,2000,2003,2005 Free Software Foundation, Inc.
1.1 pazsan 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:
1.13 ! pazsan 26: @EC_MODE@ DefaultValue ec
! 27:
! 28: has? ec 0= [IF]
1.1 pazsan 29: true DefaultValue file \ controls the presence of the
30: \ file access wordset
31: true DefaultValue OS \ flag to indicate a operating system
32:
1.10 pazsan 33: @FFCALLFLAG@ DefaultValue ffcall \ Foreign Function Calls
34:
1.11 pazsan 35: @LIBFFIFLAG@ DefaultValue libffi \ Foreign Function Calls
36:
1.10 pazsan 37: @OLDCALLFLAG@ DefaultValue oldcall \ old Foreign Function Calls
1.9 pazsan 38:
1.1 pazsan 39: true DefaultValue prims \ true: primitives are c-code
40:
41: true DefaultValue floating \ floating point wordset is present
42:
43: true DefaultValue glocals \ gforth locals are present
44: \ will be loaded
45: true DefaultValue dcomps \ double number comparisons
46:
47: true DefaultValue hash \ hashing primitives are loaded/present
48:
49: true DefaultValue xconds \ used together with glocals,
50: \ special conditionals supporting gforths'
51: \ local variables
52: true DefaultValue header \ save a header information
53:
54: true DefaultValue backtrace \ enables backtrace code
55:
56: true DefaultValue new-input \ enables object oriented input
57:
58: @PEEPHOLEFLAG@ DefaultValue peephole \ enables peephole optimizer
1.9 pazsan 59:
1.1 pazsan 60:
1.3 jwilke 61: true DefaultValue abranch \ enables absolute branches
62:
1.4 pazsan 63: false DefaultValue control-rack \ disable return stack use for control flow
64:
1.1 pazsan 65: false DefaultValue crlf
66:
1.5 anton 67: $100 DefaultValue kernel-start
1.2 anton 68: cell 2 = [IF] &32 KB [ELSE] $100000 cells [THEN] DefaultValue kernel-size
1.1 pazsan 69:
70: &16 KB DefaultValue stack-size
1.2 anton 71: &16 KB DefaultValue fstack-size
1.1 pazsan 72: &15 KB DefaultValue rstack-size
73: &14 KB &512 + DefaultValue lstack-size
1.13 ! pazsan 74: [ELSE]
! 75: false DefaultValue file \ controls the presence of the
! 76: \ file access wordset
! 77: false DefaultValue OS \ flag to indicate a operating system
! 78:
! 79: @FFCALLFLAG@ DefaultValue ffcall \ Foreign Function Calls
! 80:
! 81: @LIBFFIFLAG@ DefaultValue libffi \ Foreign Function Calls
! 82:
! 83: @OLDCALLFLAG@ 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: true DefaultValue glocals \ gforth locals are present
! 90: \ will be loaded
! 91: true DefaultValue dcomps \ double number comparisons
! 92:
! 93: true DefaultValue hash \ hashing primitives are loaded/present
! 94:
! 95: true DefaultValue xconds \ used together with glocals,
! 96: \ special conditionals supporting gforths'
! 97: \ local variables
! 98: true DefaultValue header \ save a header information
! 99:
! 100: true DefaultValue backtrace \ enables backtrace code
! 101:
! 102: true DefaultValue new-input \ enables object oriented input
! 103:
! 104: @PEEPHOLEFLAG@ DefaultValue peephole \ enables peephole optimizer
! 105:
! 106:
! 107: true DefaultValue abranch \ enables absolute branches
! 108:
! 109: false DefaultValue control-rack \ disable return stack use for control flow
! 110:
! 111: false DefaultValue crlf
! 112:
! 113: $100 DefaultValue kernel-start
! 114: cell 2 = [IF] &32 KB [ELSE] &64 KB [THEN] DefaultValue kernel-size
! 115:
! 116: &1 KB DefaultValue stack-size
! 117: &0 KB DefaultValue fstack-size
! 118: &1 KB DefaultValue rstack-size
! 119: &1 KB DefaultValue lstack-size
! 120: [THEN]
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>