From 05a47988d9466b827f7dbab44bab33a67228efe9 Mon Sep 17 00:00:00 2001 From: Camil Staps Date: Sun, 30 Jul 2017 00:51:48 +0200 Subject: Start with positional errors (see #5) --- Sil/Util/Printer.dcl | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'Sil/Util/Printer.dcl') 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 -- cgit v1.2.3