#! /bin/sh

biff n
unset notify
while read test_len test_args ; do
  ( echo '(load "load4")'
    echo '(setf *display-on* nil)'
    echo '(setf *historyfile* "~/tile/kehoe/history.data")'
    echo '(setf *exprfile* "~/tile/kehoe/expr.data")'
    echo "(setf *game-length* $test_len)"
    echo "(experiment $test_args)"
    echo '(quit)'
  ) | /usr/local/bin/lisp-4-0-base
done
