From ebde44b28b551f670c9e5c4c038d03e94bfbb1d2 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Sun, 30 Jul 2017 09:17:44 +0200
Subject: Reorganise: make Position a field in Syntax types

---
 Sil/Error.dcl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Sil/Error.dcl')

diff --git a/Sil/Error.dcl b/Sil/Error.dcl
index 14427c8..c37e445 100644
--- a/Sil/Error.dcl
+++ b/Sil/Error.dcl
@@ -5,7 +5,7 @@ from StdOverloaded import class toString
 
 from Sil.Syntax import :: Expression
 from Sil.Types import :: Type
-from Sil.Util.Parser import :: Positioned
+from Sil.Util.Parser import :: ParsePosition, class getPos
 
 :: ErrorPosition
 
@@ -40,4 +40,4 @@ from Sil.Util.Parser import :: Positioned
 instance toString Error
 instance <<< Error
 
-errpos :: (Positioned a) -> ErrorPosition
+errpos :: a -> ErrorPosition | getPos a
-- 
cgit v1.2.3