summaryrefslogtreecommitdiff
path: root/lambda-calcul/haskell/test/Minilang/REPLSpec.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lambda-calcul/haskell/test/Minilang/REPLSpec.hs')
-rw-r--r--lambda-calcul/haskell/test/Minilang/REPLSpec.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/lambda-calcul/haskell/test/Minilang/REPLSpec.hs b/lambda-calcul/haskell/test/Minilang/REPLSpec.hs
index bd64adf..e382df4 100644
--- a/lambda-calcul/haskell/test/Minilang/REPLSpec.hs
+++ b/lambda-calcul/haskell/test/Minilang/REPLSpec.hs
@@ -66,7 +66,7 @@ spec = parallel $
out
`shouldBe` [ "Bye!",
- "(lam (z s) (s ((lam (n z s) (s n)) (lam (z s) z)))) : <?>"
+ "(lam (z s) (s (lam (z s) (s (lam (z s) z))))) : <?>"
]
it "do typecheck term when language is set to 'Typed'" $ do
@@ -80,7 +80,7 @@ spec = parallel $
out
`shouldBe` [ "Bye!",
- "(lam (z s) (s ((lam (n z s) (s n)) (lam (z s) z)))) : a -> ((d -> ((g -> h -> g) -> f) -> f) -> j) -> j",
+ "(lam (z s) (s (lam (z s) (s (lam (z s) z))))) : a -> ((c -> ((e -> f -> e) -> g) -> g) -> h) -> h",
"Language set to Typed"
]