summaryrefslogtreecommitdiff
path: root/compiler
diff options
context:
space:
mode:
authoriori tsu <matsuhara.iori@scrive.com>2021-05-01 10:27:43 +0200
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-05-03 19:51:58 -0400
commit7f5ee7194e18cc2c922839260817c16db8e95832 (patch)
tree9a3ac63d1e80d3dd6fc1ebaebf574ba659e771c5 /compiler
parent0680e9a5ce29523fca43b62a8edc59b0d0690d6a (diff)
downloadhaskell-7f5ee7194e18cc2c922839260817c16db8e95832.tar.gz
visually align expected and actual modules name
before: > /home/matt/Projects/persistent/persistent/Database/Persist/ImplicitIdDef.hs:1:8: error: > File name does not match module name: > Saw: ‘A.B.Module’ > Expected: ‘A.B.Motule’ > | > 1 | module A.B.Motule > | ^^^^^^^^^^> after: > /home/matt/Projects/persistent/persistent/Database/Persist/ImplicitIdDef.hs:1:8: error: > File name does not match module name: > Saw: ‘A.B.Module’ > Expected: ‘A.B.Motule’ > | > 1 | module A.B.Motule > | ^^^^^^^^^^>
Diffstat (limited to 'compiler')
-rw-r--r--compiler/GHC/Driver/Make.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Driver/Make.hs b/compiler/GHC/Driver/Make.hs
index 68245b42ca..767d0b884b 100644
--- a/compiler/GHC/Driver/Make.hs
+++ b/compiler/GHC/Driver/Make.hs
@@ -2741,7 +2741,7 @@ summariseModule hsc_env old_summary_map is_boot (L loc wanted_mod)
mkPlainErrorMsgEnvelope pi_mod_name_loc $
DriverUnknownMessage $ mkPlainError $
text "File name does not match module name:"
- $$ text "Saw:" <+> quotes (ppr pi_mod_name)
+ $$ text "Saw :" <+> quotes (ppr pi_mod_name)
$$ text "Expected:" <+> quotes (ppr wanted_mod)
when (hsc_src == HsigFile && isNothing (lookup pi_mod_name (homeUnitInstantiations home_unit))) $