diff options
| author | Ian Lynagh <igloo@earth.li> | 2009-11-27 22:40:50 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2009-11-27 22:40:50 +0000 |
| commit | 2fe38b5fb0957f9428864afd69ad3ccd82fae3d0 (patch) | |
| tree | 9504196a6bd6743aac38d9d7791100640438e8e0 /compiler/iface | |
| parent | edc033b1b0e4ed4dccfaeb59a68b3e49b569d6ea (diff) | |
| download | haskell-2fe38b5fb0957f9428864afd69ad3ccd82fae3d0.tar.gz | |
Columns now start at 1, as lines already did
Also corrected a couple of line 0's to line 1
Diffstat (limited to 'compiler/iface')
| -rw-r--r-- | compiler/iface/MkIface.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/iface/MkIface.lhs b/compiler/iface/MkIface.lhs index f271aa5f7b..cad384cb82 100644 --- a/compiler/iface/MkIface.lhs +++ b/compiler/iface/MkIface.lhs @@ -741,7 +741,7 @@ ruleOrphWarn unqual mod rule = mkWarnMsg silly_loc unqual $ ptext (sLit "Orphan rule:") <+> ppr rule where - silly_loc = srcLocSpan (mkSrcLoc (moduleNameFS (moduleName mod)) 1 0) + silly_loc = srcLocSpan (mkSrcLoc (moduleNameFS (moduleName mod)) 1 1) -- We don't have a decent SrcSpan for a Rule, not even the CoreRule -- Could readily be fixed by adding a SrcSpan to CoreRule, if we wanted to |