some of this EffExtra stuff doesn't work

This commit is contained in:
rhiannon morris 2023-10-21 20:48:28 +02:00
parent 83ab871d61
commit ea74c148b7
2 changed files with 5 additions and 25 deletions

View file

@ -87,7 +87,7 @@ Erase = [Except Error, DefsReader, NameGen]
export
liftWhnf : Eff Whnf a -> Eff Erase a
liftWhnf act = lift $ wrapErr' WrapTypeError act
liftWhnf act = lift $ wrapErr WrapTypeError act
export covering
computeElimType : ErasureContext d n -> SQty -> Elim d n -> Eff Erase (Term d n)