#!/bin/sh
echo > dotest.result
for x in case continue facit fac or funcall block inline facsum nplus1 nplus2
do
	echo ---- $x
	is -l $x
	echo $x >> dotest.result
	./$x >> dotest.result
	rm $x
done

cmp dotest.modele dotest.result
