lambda-calcul/haskell/test/Minilang/Lambda/ParserSpec.hs


1
2
3
4
5
6
7
8
9

module Minilang.Lambda.ParserSpec where

import Minilang.Lambda.Parser (AST (..), parse)
import Test.Hspec (Spec, it, parallel, shouldBe)

spec :: Spec
spec = parallel $ do
  it "parses a variable" $ do
    parse "x" `shouldBe` Right (Sym "x")