version 1.1, 2001/05/01 15:07:04
|
version 1.4, 2002/12/27 12:32:53
|
Line 20
|
Line 20
|
|
|
prefix=@prefix@ |
prefix=@prefix@ |
test "x$GFORTHDIR" != x || GFORTHDIR=@exec_prefix@/bin |
test "x$GFORTHDIR" != x || GFORTHDIR=@exec_prefix@/bin |
test "x$GFORTHDATADIR" != x || GFORTHDATADIR=$prefix/share/gforth/@VERSION@ |
test "x$GFORTHDATADIR" != x || GFORTHDATADIR=$prefix/share/gforth/@PACKAGE_VERSION@ |
GFORTH=$GFORTHDIR/gforth-fast |
GFORTH=$GFORTHDIR/gforth-fast |
if test $# = 0 || test $1 = --help || test $1 = -h; then |
if test $# = 0 || test $1 = --help || test $1 = -h; then |
echo "usage: `basename $0` <file>.vmg" |
echo "usage: `basename $0` <file>.vmg" |
exit 0 |
exit 0 |
elif test $1 = --version || test $1 = -v; then |
elif test $1 = --version || test $1 = -v; then |
echo "vmgen (@PACKAGE@) @VERSION@" |
echo "vmgen (@PACKAGE_NAME@) @PACKAGE_VERSION@" |
$GFORTH --version |
$GFORTH --version |
echo 'Copyright (C) 2001 Free Software Foundation, Inc.' |
echo 'Copyright (C) 2001 Free Software Foundation, Inc.' |
echo 'This program is part of Gforth' |
echo 'This program is part of Gforth' |
Line 36 else
|
Line 36 else
|
true #old shells require this |
true #old shells require this |
fi |
fi |
file=`basename $1 .vmg` |
file=`basename $1 .vmg` |
$GFORTH -m 1000000 $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-c ' output-c-combined process-file bye" > $file-vm.i && |
$GFORTH -m 1000000 -e "create vmgen" $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $file-vm.i\" out-filename 2! s\" $1\" ' output-c ' output-c-combined process-file bye" > $file-vm.i && |
$GFORTH -m 1000000 $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-disasm dup process-file bye" > $file-disasm.i && |
$GFORTH -m 1000000 -e "create vmgen" $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-disasm dup process-file bye" > $file-disasm.i && |
$GFORTH -m 1000000 $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-gen ' noop process-file bye" > $file-gen.i && |
$GFORTH -m 1000000 -e "create vmgen" $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-gen ' noop process-file bye" > $file-gen.i && |
$GFORTH -m 1000000 $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-label dup process-file bye" > $file-labels.i && |
$GFORTH -m 1000000 -e "create vmgen" $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-label dup process-file bye" > $file-labels.i && |
$GFORTH -m 1000000 $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-profile dup process-file bye" > $file-profile.i && |
$GFORTH -m 1000000 -e "create vmgen" $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' output-profile dup process-file bye" > $file-profile.i && |
$GFORTH -m 1000000 $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' noop ' output-peephole process-file bye" > $file-peephole.i |
$GFORTH -m 1000000 -e "create vmgen" $GFORTHDATADIR/prims2x.fs -e "c-flag on s\" $1\" ' noop ' output-peephole process-file bye" > $file-peephole.i |