use "Defined in" rather than "Imported from" when printing ImportedSrcLoc
authorSimon Marlow <simonmar@microsoft.com>
Fri, 11 Aug 2006 10:11:59 +0000 (10:11 +0000)
committerSimon Marlow <simonmar@microsoft.com>
Fri, 11 Aug 2006 10:11:59 +0000 (10:11 +0000)
compiler/basicTypes/SrcLoc.lhs

index 8ced456..2dc6c48 100644 (file)
@@ -157,7 +157,7 @@ instance Outputable SrcLoc where
           hcat [text "{-# LINE ", int src_line, space,
                 char '\"', ftext src_path, text " #-}"]
 
-    ppr (ImportedLoc mod) = ptext SLIT("Imported from") <+> text mod
+    ppr (ImportedLoc mod) = ptext SLIT("Defined in") <+> text mod
     ppr (UnhelpfulLoc s)  = ftext s
 \end{code}
 
@@ -354,7 +354,7 @@ pprUserSpan (SrcSpanPoint src_path line col)
           char ':', int col
         ]
 
-pprUserSpan (ImportedSpan mod) = ptext SLIT("Imported from") <+> quotes (text mod)
+pprUserSpan (ImportedSpan mod) = ptext SLIT("Defined in") <+> text mod
 pprUserSpan (UnhelpfulSpan s)  = ftext s
 \end{code}