diff options
Diffstat (limited to 'lambda-calcul/haskell/test/Minilang/IOSpec.hs')
| -rw-r--r-- | lambda-calcul/haskell/test/Minilang/IOSpec.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lambda-calcul/haskell/test/Minilang/IOSpec.hs b/lambda-calcul/haskell/test/Minilang/IOSpec.hs index c4ae13e..14d279d 100644 --- a/lambda-calcul/haskell/test/Minilang/IOSpec.hs +++ b/lambda-calcul/haskell/test/Minilang/IOSpec.hs @@ -16,7 +16,7 @@ spec = parallel $ it "evaluates a simple MiniLang 'program' and dumps result" $ \fileName -> do let outputFileName = fileName <> ".out" program = - [ "((lam (x) x) y)" + [ "((lam (x y) x) z t)" ] writeFile fileName (unlines program) @@ -27,7 +27,7 @@ spec = parallel $ out <- readFile outputFileName - out `shouldBe` "Var \"y\"\n" + out `shouldBe` "Var \"z\"\n" withTempFile :: (String -> IO ()) -> IO () withTempFile = |