Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] View of /sml/trunk/system/testml
ViewVC logotype

View of /sml/trunk/system/testml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 662 - (download) (annotate)
Thu Jun 15 22:44:37 2000 UTC (19 years, 6 months ago) by monnier
Original Path: sml/trunk/src/system/testml
File size: 506 byte(s)
Allow @SMLfoo arguments without an explicit heap image.
#!/bin/sh

case "$1" in
    [^@]*) 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