Annotation of gforth/gforthmi.in, revision 1.19
1.16 pazsan 1: #! @SH@
1.1 anton 2: # @configure_input@
1.15 anton 3: #Copyright (C) 1997,1998,2000,2002,2003,2004,2007 Free Software Foundation, Inc.
1.1 anton 4:
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
1.14 anton 9: #as published by the Free Software Foundation, either version 3
1.1 anton 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
1.14 anton 18: #along with this program; if not, see http://www.gnu.org/licenses/.
1.1 anton 19:
1.16 pazsan 20: startup="-i @kernel_fi@ exboot.fs startup.fs @asm_fs@ @disasm_fs@"
1.1 anton 21: prefix=@prefix@
22: exec_prefix=@exec_prefix@
1.16 pazsan 23: if [ -f "@libdir@/gforth/@PACKAGE_VERSION@/gforth.fi" ]
24: then
25: helper=""
26: else
27: helper="$startup"
28: fi
1.19 ! pazsan 29: test "x$GFORTHD" != x || GFORTHD="@bindir@/gforth-ditc-@PACKAGE_VERSION@@ARCH@ --die-on-signal"
! 30: test "x$GFORTH" != x || GFORTH="@bindir@/gforth-@PACKAGE_VERSION@@ARCH@ --die-on-signal $helper"
1.1 anton 31: if test $# = 0 || test $1 = --help || test $1 = -h; then
1.4 anton 32: echo "usage: `basename $0` [--application] target-name [gforth-options]"
1.1 anton 33: echo "creates a relocatable image 'target-name'"
34: echo "environment:"
35: echo " \$GFORTHD (default: $GFORTHD): Engine used for creating the fixed images"
36: echo " \$GFORTH (default: $GFORTH): Engine used for computing the relocatable image"
37: test $# != 0 || exit 1
38: exit 0
39: elif test $1 = --version || test $1 = -v; then
1.9 anton 40: echo "gforthmi (@PACKAGE_NAME@) @PACKAGE_VERSION@"
1.1 anton 41: $GFORTH --version
1.15 anton 42: echo 'Copyright (C) 1998,2002,2003,2004,2007 Free Software Foundation, Inc.'
1.1 anton 43: echo 'This program is part of Gforth'
44: $GFORTH -e "license bye"
45: exit 0
1.4 anton 46: elif test $1 = --application; then
47: application=yes
48: shift
1.17 pazsan 49: outfile=$1; shift
1.16 pazsan 50: generate="$@"
51: elif test $1 = --system; then
52: shift
53: generate=$startup
54: outfile="@libdir@/gforth/@PACKAGE_VERSION@/gforth.fi"
1.18 pazsan 55: export libccdir="@libexecdir@/gforth/@PACKAGE_VERSION@/libcc-named"
1.5 anton 56: else
1.17 pazsan 57: outfile=$1; shift
1.16 pazsan 58: generate="$@"
1.1 anton 59: fi
60: tmpfile=./temp-image.fi
1.16 pazsan 61: $GFORTHD --clear-dictionary --no-offset-im --die-on-signal $generate -e "savesystem $tmpfile"1" bye"
62: $GFORTHD --clear-dictionary --offset-image --die-on-signal $generate -e "savesystem $tmpfile"2" bye"
1.3 anton 63: $GFORTH comp-i.fs -e "comp-image $tmpfile"1" $tmpfile"2" $outfile bye"
1.1 anton 64: chmod +x $outfile
65: #gforth-0.2.1 -m 100000 comp-i.fs -e "comp-image $tmpfile"1" $tmpfile"2" $outfile bye"
66: rm $tmpfile"1" $tmpfile"2"
1.4 anton 67: if test x$application = xyes; then
1.12 anton 68: $GFORTH -e "s\" $outfile\"" make-app.fs
1.5 anton 69: else
70: true #old shells require this
1.4 anton 71: fi
72:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>