From e341ae62f15d59f64c66cc0abdf628fb160506e0 Mon Sep 17 00:00:00 2001 From: Camil Staps Date: Tue, 15 Aug 2017 16:05:26 +0200 Subject: Made some more errors positional (#5) --- Sil/Check.icl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Sil/Check.icl') diff --git a/Sil/Check.icl b/Sil/Check.icl index b06824b..e17c378 100644 --- a/Sil/Check.icl +++ b/Sil/Check.icl @@ -102,7 +102,7 @@ where findCBs (MachineStm _ _) = [] checkVoid :: (Type, Name) -> [Error] - checkVoid (TVoid, n) = [Ck_LocalVoid f.f_name n] + checkVoid (TVoid, n) = [Ck_LocalVoid (errpos f) n] checkVoid _ = [] checkErrors :: [(a -> [Error])] a *([Error], Maybe *File) -> *([Error], *Maybe *File) -- cgit v1.2.3