18 lines
246 B
Haskell
18 lines
246 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"
|
|
|