[gforth] / gforth / preforth.in

gforth: gforth/preforth.in

1 :	anton	1.1	#!/bin/sh
2 :
3 :	anton	1.9	#Copyright (C) 2008,2011 Free Software Foundation, Inc.
4 :	anton	1.2
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 3
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, see http://www.gnu.org/licenses/.
19 :
20 :	pazsan	1.8	@NO_CROSS@test -z "$ENGINE" && ENGINE=./gforth
21 :			@NO_CROSS@test -f "@srcdir@/@kernel_fi@" && KERNEL="@srcdir@/@kernel_fi@"
22 :			@NO_CROSS@test -f "@kernel_fi@" && KERNEL="@kernel_fi@"
23 :	pazsan	1.7	if test -f "$ENGINE" -a -f "$KERNEL"; then
24 :	anton	1.1	path1="$1"
25 :			path2="$2"
26 :			shift; shift
27 :	anton	1.3	# set -x -v
28 :	pazsan	1.4	$ENGINE --die-on-signal -i @kernel_fi@ $path1 $path2 exboot.fs startup.fs "$@"
29 :	anton	1.1	else
30 :			@PREFORTH@ "$@"
31 :			fi