rewrite pretty printer
This commit is contained in:
parent
f6abf084b3
commit
7b93a913c7
26 changed files with 1193 additions and 1360 deletions
|
@ -3,6 +3,7 @@ module TypingImpls
|
|||
import TAP
|
||||
import public Quox.Typing
|
||||
import public Quox.Pretty
|
||||
import PrettyExtra
|
||||
|
||||
import Derive.Prelude
|
||||
%language ElabReflection
|
||||
|
@ -14,4 +15,7 @@ import Derive.Prelude
|
|||
%runElab derive "Error" [Show]
|
||||
|
||||
export
|
||||
ToInfo Error where toInfo err = [("err", show $ prettyError True True err)]
|
||||
ToInfo Error where
|
||||
toInfo err =
|
||||
let str = render (Opts 60) $ runPrettyDef $ prettyError True err in
|
||||
[("err", str)]
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue