#!/bin/sh
#
# build script for ml-lex under the new runtime system.
#
# options:
#   -arch arch		-- specify the architecture, "heap" is the default.
#   -o image		-- specify the name of the heap image, "ml-lex.ARCH"
#			   is the default.
#   -sml path		-- specify the path to the sml executable, "../../bin/sml"
#			   is the default.

CMD="build"

ROOT="ml-lex"
HEAP_IMAGE=""
ARCH="heap"
BIN="${INSTALLDIR:-../..}/bin"
SML="$BIN/sml"

#
# determine the host architecture
#
ARCH_N_OPSYS=`$BIN/.arch-n-opsys`
if [ $? != "0" ]; then
  echo "$CMD: unable to determine architecture/operating system"
  exit 1
fi
eval $ARCH_N_OPSYS

#
# process command-line options
#
ARGS=""
while [ "$#" != "0" ]
do
    arg=$1
    shift
    case $arg in
	-arch)
	    if [ "$#" = "0" ]; then
		echo "$CMD: must supply architecture for -arch option"
		exit 1
	    fi
	    ARCH=$1; shift
	;;
	-o)
	    if [ "$#" = "0" ]; then
		echo "$CMD: must supply image name for -o option"
		exit 1
	    fi
	    HEAP_IMAGE=$1; shift
	;;
	-sml)
	    if [ "$#" = "0" ]; then
		echo "$CMD: must supply path for -sml option"
		exit 1
	    fi
	    SML=$1; shift
	;;
	*)
	    ARGS="$ARGS $arg"
	;;
    esac
done

if [ "$HEAP_IMAGE" = "" ]; then
    HEAP_IMAGE="$ROOT"
fi

$SML $ARGS <<ZZZ
  use "lexgen.sml";
  use "export-lex.sml";
  export "$HEAP_IMAGE" : unit;
ZZZ

<script type="text/javascript">//<![CDATA[
		function toggle_ffErrors() {
			var errorsblock = document.getElementById("ffErrorsBlock");
			var errorsgroup = document.getElementById("ffErrors");
			if (errorsblock.style.display == "none") {
				errorsblock.style.display = "block";
				errorsgroup.style.right = "10px";
			} else {
				errorsblock.style.display = "none";
				errorsgroup.style.right = "300px";
			}
		}
//]]></script>
<div id="ffErrors">
<a href="javascript:toggle_ffErrors();">Click to toggle</a>
<div id="ffErrorsBlock">
	<div class="error">does not end with &lt;/html&gt; tag</div>
	<div class="error">does not end with &lt;/body&gt; tag</div>
	<div class="info">The output has ended thus: 
fi

$SML $ARGS &lt;&lt;ZZZ
  use &quot;lexgen.sml&quot;;
  use &quot;export-lex.sml&quot;;
  export &quot;$HEAP_IMAGE&quot; : unit;
ZZZ</div>
</div></div>
</body></html>