#! /bin/sh
#|
exec racket -tm "$0" ${1+"$@"}
|#

#lang racket

;; ---------------------------------------------------------------------------------------------------
;; runs ./state-tester on all in<n>.xml files in state-tests and compares the output with out<n>.xml

(provide main)

(require "../xrun.rkt")

(test-directory "state-tests/")
(xml-diff       "../xdiff-xml - ~aout~a.xml")
(xclient        "./state-tester.rkt < ~ain~a.xml")

