move NDefinition to Quox.Definition and add an untyped one
This commit is contained in:
parent
2cafb35bc1
commit
103f019dbd
3 changed files with 9 additions and 6 deletions
|
@ -89,12 +89,16 @@ isZero g = g.qty == GZero
|
||||||
|
|
||||||
|
|
||||||
public export
|
public export
|
||||||
data DefEnvTag = DEFS
|
NDefinition : Type
|
||||||
|
NDefinition = (Name, Definition)
|
||||||
|
|
||||||
public export
|
public export
|
||||||
Definitions : Type
|
Definitions : Type
|
||||||
Definitions = SortedMap Name Definition
|
Definitions = SortedMap Name Definition
|
||||||
|
|
||||||
|
public export
|
||||||
|
data DefEnvTag = DEFS
|
||||||
|
|
||||||
public export
|
public export
|
||||||
DefsReader : Type -> Type
|
DefsReader : Type -> Type
|
||||||
DefsReader = ReaderL DEFS Definitions
|
DefsReader = ReaderL DEFS Definitions
|
||||||
|
|
|
@ -27,11 +27,6 @@ import Data.IORef
|
||||||
%default total
|
%default total
|
||||||
|
|
||||||
|
|
||||||
public export
|
|
||||||
NDefinition : Type
|
|
||||||
NDefinition = (Name, Definition)
|
|
||||||
|
|
||||||
|
|
||||||
public export
|
public export
|
||||||
data StateTag = NS | SEEN
|
data StateTag = NS | SEEN
|
||||||
|
|
||||||
|
|
|
@ -93,6 +93,10 @@ public export
|
||||||
0 Definitions : Type
|
0 Definitions : Type
|
||||||
Definitions = SortedMap Name Definition
|
Definitions = SortedMap Name Definition
|
||||||
|
|
||||||
|
public export
|
||||||
|
0 NDefinition : Type
|
||||||
|
NDefinition = (Name, Definition)
|
||||||
|
|
||||||
|
|
||||||
export covering
|
export covering
|
||||||
prettyTerm : {opts : LayoutOpts} -> BContext n ->
|
prettyTerm : {opts : LayoutOpts} -> BContext n ->
|
||||||
|
|
Loading…
Reference in a new issue