#!/bin/sh
# Usage: gsc file options
HOST=t
EXT=.mo
DIR=/users/feeley/gambit
HERE=$DIR/GSC/$HOST
t -h 8000000 << eof
(scheme-reset)(define host-system '$HOST)(load "$HERE/host$EXT")(load "$HERE/utils$EXT")(load "$HERE/parms$EXT")(load "$HERE/scheme$EXT")(load "$HERE/source$EXT")(load "$HERE/env$EXT")(load "$HERE/ptree1$EXT")(load "$HERE/ptree2$EXT")(load "$HERE/pvm$EXT")(load "$HERE/back$EXT")(load "$HERE/front$EXT")(load "$HERE/target-m68000-3$EXT")(load "$HERE/target-m68000-2$EXT")(load "$HERE/target-m68000-1$EXT")(apply cf '("$1" m68000 $2 $3 $4 $5 $6 $7 $8 $9))(exit)
eof
