dunham/newt
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Classify constructors, only dump modules if they successfully compile

Browse Source
This commit is contained in:
Steve Dunham
2025-03-31 21:21:37 -07:00
parent 654e5cdb25
commit f006fa875d
9 changed files with 94 additions and 36 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
src/Lib/Types.newt
View File

@@ -307,13 +307,21 @@ record MetaContext where
next : Int
mcmode : MetaMode
data Def = Axiom | TCon Int (List QName) | DCon Int QName | Fn Tm | PrimTCon Int
data ConInfo = NormalCon | SuccCon | ZeroCon | EnumCon
instance Show ConInfo where
show NormalCon = ""
show SuccCon = "[S]"
show ZeroCon = "[Z]"
show EnumCon = "[E]"
data Def = Axiom | TCon Int (List QName) | DCon ConInfo Int QName | Fn Tm | PrimTCon Int
| PrimFn String Nat (List QName)
instance Show Def where
show Axiom = "axiom"
show (TCon _ strs) = "TCon \{show strs}"
show (DCon k tyname) = "DCon \{show k} \{show tyname}"
show (DCon ci k tyname) = "DCon \{show k} \{show tyname} \{show ci}"
show (Fn t) = "Fn \{show t}"
show (PrimTCon _) = "PrimTCon"
show (PrimFn src arity used) = "PrimFn \{show src} \{show arity} \{show used}"