SCM Repository
View of /sml/trunk/src/system/testml
Parent Directory
| 
Revision Log
Revision 669 -
(download)
(annotate)
Fri Jun 16 22:22:10 2000 UTC (20 years, 10 months ago) by monnier
File size: 529 byte(s)
Fri Jun 16 22:22:10 2000 UTC (20 years, 10 months ago) by monnier
File size: 529 byte(s)
Avoid the [^..] construct that some shells don't seem to understand.
#!/bin/sh
case "$1" in
@*) HEAP_IMAGE=sml ;;
?*) HEAP_IMAGE=$1; shift ;;
*) HEAP_IMAGE=sml ;;
esac
cmddir=`dirname $0`
cmddir=`cd $cmddir; pwd`
bin=../../bin
[ -x "$bin/.arch-n-opsys" ] || bin="$cmddir/$bin"
eval `$bin/.arch-n-opsys`
heapdir=`dirname $HEAP_IMAGE`
[ -f "$heapdir/$HEAP_IMAGE.$HEAP_SUFFIX" ] || heapdir="$cmddir/$heapdir"
HEAP_IMAGE=`cd $heapdir; pwd`/$HEAP_IMAGE
LIB_DIR=${HEAP_IMAGE}.lib
CM_PATHCONFIG=$LIB_DIR/pathconfig CM_LOCAL_PATHCONFIG=/dev/null \
$bin/sml @SMLload=$HEAP_IMAGE "$@"
| root@smlnj-gforge.cs.uchicago.edu | ViewVC Help |
| Powered by ViewVC 1.0.0 |
