move NDefinition to Quox.Definition and add an untyped one

This commit is contained in:
rhiannon morris 2023-11-27 07:37:38 +01:00
parent 2cafb35bc1
commit 103f019dbd
3 changed files with 9 additions and 6 deletions

View File

@ -89,12 +89,16 @@ isZero g = g.qty == GZero
public export
data DefEnvTag = DEFS
NDefinition : Type
NDefinition = (Name, Definition)
public export
Definitions : Type
Definitions = SortedMap Name Definition
public export
data DefEnvTag = DEFS
public export
DefsReader : Type -> Type
DefsReader = ReaderL DEFS Definitions

View File

@ -27,11 +27,6 @@ import Data.IORef
%default total
public export
NDefinition : Type
NDefinition = (Name, Definition)
public export
data StateTag = NS | SEEN

View File

@ -93,6 +93,10 @@ public export
0 Definitions : Type
Definitions = SortedMap Name Definition
public export
0 NDefinition : Type
NDefinition = (Name, Definition)
export covering
prettyTerm : {opts : LayoutOpts} -> BContext n ->