18 lines
248 B
Haskell
18 lines
248 B
Haskell
import WhileInterp
|
|
|
|
test f = do
|
|
putStrLn $ "***Testing " ++ f
|
|
--showParsedExp f
|
|
runFile f
|
|
putStrLn ""
|
|
|
|
main :: IO ()
|
|
main = do
|
|
test "abs.imp"
|
|
--test "extra.imp"
|
|
test "fact.imp"
|
|
test "times.imp"
|
|
test "test.imp"
|
|
test "error.imp"
|
|
|