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

Newer changes

Browse source
This commit is contained in:
Rakarake 2023-03-28 15:26:35 +02:00
commit b35c19572f
10 changed files with 279 additions and 75 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/TypeChecker/TypeCheckerIr.hs
View file

@ -7,7 +7,7 @@ module TypeChecker.TypeCheckerIr (
) where
import Data.String (IsString)
import Grammar.Abs (Lit (..), TVar (..))
import Grammar.Abs (Lit (..))
import Grammar.Print
import Prelude
import qualified Prelude as C (Eq, Ord, Read, Show)
@ -56,6 +56,9 @@ data Exp' t
| ECase (ExpT' t) [Branch' t]
deriving (C.Eq, C.Ord, C.Show, C.Read)
data TVar = MkTVar Ident
deriving (C.Eq, C.Ord, C.Show, C.Read)
type Id' t = (Ident, t)
type ExpT' t = (Exp' t, t)