diff options
| author | Camil Staps | 2017-07-30 00:51:48 +0200 |
|---|---|---|
| committer | Camil Staps | 2017-07-30 00:54:02 +0200 |
| commit | 05a47988d9466b827f7dbab44bab33a67228efe9 (patch) | |
| tree | c9f2ce96dec969f1d756e25357dbbe2c79dfbad2 /Sil/Util/Printer.dcl | |
| parent | Cleanup; add <> < > <= >= (diff) | |
Start with positional errors (see #5)
Diffstat (limited to 'Sil/Util/Printer.dcl')
| -rw-r--r-- | Sil/Util/Printer.dcl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Sil/Util/Printer.dcl b/Sil/Util/Printer.dcl index 5535dc2..56ad103 100644 --- a/Sil/Util/Printer.dcl +++ b/Sil/Util/Printer.dcl @@ -3,7 +3,7 @@ definition module Sil.Util.Printer from StdOverloaded import class toString, class zero from Sil.Parse import :: Token -from Sil.Syntax import :: Program, :: Function, :: CodeBlock, +from Sil.Syntax import :: Positioned, :: Program, :: Function, :: CodeBlock, :: Initialisation, :: Statement :: PrintState @@ -13,6 +13,8 @@ instance zero PrintState class PrettyPrinter t where print :: PrintState t -> String +instance PrettyPrinter String +instance PrettyPrinter (Positioned a) | PrettyPrinter a instance PrettyPrinter [Token] instance PrettyPrinter Program instance PrettyPrinter Function |