diff options
| author | Camil Staps | 2017-07-30 09:17:44 +0200 |
|---|---|---|
| committer | Camil Staps | 2017-07-30 09:17:44 +0200 |
| commit | ebde44b28b551f670c9e5c4c038d03e94bfbb1d2 (patch) | |
| tree | 7d021edb338a4fc6210a38fb2d3f0dafdda85ec2 /Sil/Error.icl | |
| parent | Force logical order of output in cli (diff) | |
Reorganise: make Position a field in Syntax types
Diffstat (limited to 'Sil/Error.icl')
| -rw-r--r-- | Sil/Error.icl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Sil/Error.icl b/Sil/Error.icl index ef3e4fa..9253673 100644 --- a/Sil/Error.icl +++ b/Sil/Error.icl @@ -43,5 +43,5 @@ where instance <<< Error where <<< f e = f <<< toString e <<< "\r\n" -errpos :: (Positioned a) -> ErrorPosition -errpos p = {ep_line=p.pos_line} +errpos :: a -> ErrorPosition | getPos a +errpos x = {ep_line=(getPos x).pp_line} |