File:
[gforth] /
gforth /
vmgen.in
Revision
1.2:
download - view:
text,
annotated -
select for diffs
Tue Aug 20 07:59:01 2002 UTC (21 years, 8 months ago) by
anton
Branches:
MAIN
CVS tags:
HEAD
prims2x.fs changes: now supports C code delimited by braces;
Forth or C names for primitives depending on [ifdef] vmgen
Documentation changes
adapted vmgen-ex* to earlier prims2x.fs changes
1: #! /bin/sh
2: # @configure_input@
3: #Copyright (C) 2001 Free Software Foundation, Inc.
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
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: #Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA.
20:
21: prefix=@prefix@
22: test "x$GFORTHDIR" != x || GFORTHDIR=@exec_prefix@/bin
23: test "x$GFORTHDATADIR" != x || GFORTHDATADIR=$prefix/share/gforth/@VERSION@
24: GFORTH=$GFORTHDIR/gforth-fast
25: if test $# = 0 || test $1 = --help || test $1 = -h; then
26: echo "usage: `basename $0` <file>.vmg"
27: exit 0
28: elif test $1 = --version || test $1 = -v; then
29: echo "vmgen (@PACKAGE@) @VERSION@"
30: $GFORTH --version
31: echo 'Copyright (C) 2001 Free Software Foundation, Inc.'
32: echo 'This program is part of Gforth'
33: $GFORTH -e "license bye"
34: exit 0
35: else
36: true #old shells require this
37: fi
38: file=`basename $1 .vmg`
39: $GFORTH -m 1000000 -e "create vmgen" $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-c ' output-c-combined process-file bye" > $file-vm.i &&
40: $GFORTH -m 1000000 -e "create vmgen" $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-disasm dup process-file bye" > $file-disasm.i &&
41: $GFORTH -m 1000000 -e "create vmgen" $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-gen ' noop process-file bye" > $file-gen.i &&
42: $GFORTH -m 1000000 -e "create vmgen" $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-label dup process-file bye" > $file-labels.i &&
43: $GFORTH -m 1000000 -e "create vmgen" $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-profile dup process-file bye" > $file-profile.i &&
44: $GFORTH -m 1000000 -e "create vmgen" $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' noop ' output-peephole process-file bye" > $file-peephole.i
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>