git.iko.soy/elk
on master help sign in
Just show the value of located things, not the location.
9d9e9d2Evan Czaplicki
compiler/SourceSyntax/Location.hs+1−1
compare with master
unifiedsplit
@@ -53,7 +53,7 @@ instance Show SrcSpan where
53 show (column start) ++ " to " ++ show (column end)
53 show (column start) ++ " to " ++ show (column end)
54
54
55instance Show e => Show (Located e) where
55instance Show e => Show (Located e) where
56− show (L s e) = "L (" ++ show s ++ ") (" ++ show e ++ ")"
56+ show (L _ e) = show e
57
57
58instance Pretty a => Pretty (Located a) where
58instance Pretty a => Pretty (Located a) where
59 pretty (L _ e) = pretty e
59 pretty (L _ e) = pretty e