Rakarake/churf
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add bidirectional type checker, lambda lifter.

Browse source
This commit is contained in:
Martin Fredin 2023-02-18 14:49:33 +01:00
parent 2fa30faa87
commit ac3f222753
22 changed files with 2440 additions and 577 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/Auxiliary.hs
View file

@ -3,6 +3,7 @@ module Auxiliary (module Auxiliary) where
import Control.Monad.Error.Class (liftEither)
import Control.Monad.Except (MonadError)
import Data.Either.Combinators (maybeToRight)
import TypeChecker.TypeCheckerIr (Type (TFun))
snoc :: a -> [a] -> [a]
snoc x xs = xs ++ [x]
@ -19,3 +20,4 @@ mapAccumM f = go
(acc', x') <- f acc x
(acc'', xs') <- go acc' xs
pure (acc'', x':xs')