#!/bin/sh

set -e

if [ $# -ne 1 ]
then
    echo "Usage: milawa2-sbcl.sh file.events"
    exit 1
fi

SBCL=`which sbcl`

EVENTS=$1

CMDS="
(load \"cl-run.lisp\")
(MILAWA::milawa-main
 (car (milawa-read-file \"$EVENTS\")))"

# I felt like 55000 was excessive but SBCL hit problems when trying to
# allocate the hash tables even at 48000.
# Hrmn, 55000 doesn't seem to be enough for level2.events

exec echo $CMDS | $SBCL --dynamic-space-size 64000 --control-stack-size 1024