--- gforth/startup.fs 1995/04/20 09:42:58 1.10 +++ gforth/startup.fs 1997/02/06 21:23:06 1.21 @@ -1,8 +1,31 @@ -#! /usr/stud/paysan/bin/forth \ startup file +\ Copyright (C) 1995 Free Software Foundation, Inc. + +\ This file is part of Gforth. + +\ Gforth is free software; you can redistribute it and/or +\ modify it under the terms of the GNU General Public License +\ as published by the Free Software Foundation; either version 2 +\ of the License, or (at your option) any later version. + +\ This program is distributed in the hope that it will be useful, +\ but WITHOUT ANY WARRANTY; without even the implied warranty of +\ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +\ GNU General Public License for more details. + +\ You should have received a copy of the GNU General Public License +\ along with this program; if not, write to the Free Software +\ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. + warnings off +include errors.fs +include extend.fs \ load core-extended +\ include tools.fs \ load tools ( .s dump ) +\ include toolsext.fs + +\ require interpretation.fs \ include float.fs \ include search-order.fs include glocals.fs @@ -12,17 +35,18 @@ include wordinfo.fs include vt100.fs \ include colorize.fs include see.fs +include see-ext.fs include bufio.fs include debug.fs +require stuff.fs include history.fs \ include doskey.fs include vt100key.fs require debugging.fs require assert.fs require blocks.fs - -0 Value $? -: sh '# parse cr system to $? ; +require intcomp.fs +require dumpimage.fs \ define the environmental queries for all the loaded wordsets \ since the blocks wordset is loaded in a single file, its queries @@ -55,3 +79,5 @@ set-current warnings on + +require site-init.fs