[gforth] / gforth / startup.fs  

gforth: gforth/startup.fs


1 : anton 1.1 \ startup file
2 :    
3 : pazsan 1.48 \ Copyright (C) 1995-2003 Free Software Foundation, Inc.
4 : anton 1.12
5 :     \ This file is part of Gforth.
6 :    
7 :     \ Gforth is free software; you can redistribute it and/or
8 :     \ modify it under the terms of the GNU General Public License
9 :     \ as published by the Free Software Foundation; either version 2
10 :     \ of the License, or (at your option) any later version.
11 :    
12 :     \ This program is distributed in the hope that it will be useful,
13 :     \ but WITHOUT ANY WARRANTY; without even the implied warranty of
14 :     \ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 :     \ GNU General Public License for more details.
16 :    
17 :     \ You should have received a copy of the GNU General Public License
18 :     \ along with this program; if not, write to the Free Software
19 : anton 1.38 \ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA.
20 : anton 1.12
21 : anton 1.36 \ don't require except.fs, because except.fs is not in included-files
22 :     \ (see exboot.fs)
23 : jwilke 1.41 [IFUNDEF] try
24 :     require except.fs \ included on command line
25 :     [THEN]
26 : pazsan 1.35
27 : anton 1.1 warnings off
28 : jwilke 1.23 include search.fs
29 :     include environ.fs
30 : jwilke 1.24 include envos.fs
31 : pazsan 1.21 include errors.fs
32 :     include extend.fs \ load core-extended
33 : jwilke 1.23 include hash.fs
34 : pazsan 1.21
35 : pazsan 1.19 \ require interpretation.fs
36 : pazsan 1.6 \ include float.fs
37 : anton 1.22 \ include search.fs
38 : anton 1.46 require compat/strcomp.fs
39 : anton 1.39 include glocals.fs
40 : anton 1.28 require stuff.fs
41 : anton 1.1 include wordinfo.fs
42 : pazsan 1.2 include vt100.fs
43 : anton 1.1 \ include colorize.fs
44 :     include bufio.fs
45 : pazsan 1.7 include history.fs
46 : anton 1.45 s" os-class" environment? dup [IF] drop s" unix" str= [THEN]
47 : jwilke 1.24 [IF]
48 : pazsan 1.26 include vt100key.fs
49 :     [ELSE]
50 : jwilke 1.24 include doskey.fs
51 :     [THEN]
52 : anton 1.22 require debugs.fs
53 : anton 1.9 require assert.fs
54 : anton 1.10 require blocks.fs
55 : anton 1.20 require intcomp.fs
56 : anton 1.22 require savesys.fs
57 : anton 1.25 require table.fs
58 : anton 1.45 s" os-class" environment? dup [IF] drop s" unix" str= [THEN]
59 : pazsan 1.42 [IF]
60 : anton 1.30 require ekey.fs
61 : pazsan 1.42 [ELSE]
62 :     require dosekey.fs
63 :     [THEN]
64 : anton 1.47 require quotes.fs
65 :     require see.fs
66 :     require see-ext.fs
67 : pazsan 1.34 require backtrac.fs
68 : anton 1.47 require simp-see.fs
69 :     require debug.fs
70 : anton 1.33 require code.fs
71 : anton 1.1
72 : anton 1.10 \ define the environmental queries for all the loaded wordsets
73 :     \ since the blocks wordset is loaded in a single file, its queries
74 :     \ are defined there
75 :     \ queries for other things than presence of a wordset are answered
76 :     \ in environ.fs
77 :     get-current environment-wordlist set-current
78 :     true constant double
79 :     true constant double-ext
80 :     true constant exception
81 :     true constant exception-ext
82 :     true constant facility
83 : pazsan 1.43 true constant facility-ext
84 : anton 1.10 true constant file
85 :     true constant file-ext
86 :     true constant floating
87 :     true constant floating-ext
88 :     true constant locals
89 :     true constant locals-ext
90 :     true constant memory-alloc
91 :     true constant memory-alloc-ext
92 :     true constant tools
93 : pazsan 1.43 true constant tools-ext
94 : anton 1.10 true constant search-order
95 :     true constant search-order-ext
96 :     true constant string
97 :     true constant string-ext
98 :     set-current
99 : anton 1.1
100 :     warnings on
101 : anton 1.13
102 : anton 1.22 require siteinit.fs

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help