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>