Fix ungrammatical error message
authorRyan Scott <ryan.gl.scott@gmail.com>
Sat, 22 Jul 2017 03:08:24 +0000 (23:08 -0400)
committerRyan Scott <ryan.gl.scott@gmail.com>
Sat, 22 Jul 2017 03:08:24 +0000 (23:08 -0400)
Test Plan: If it builds, ship it

Reviewers: austin, bgamari

Reviewed By: bgamari

Subscribers: rwbarton, thomie

Differential Revision: https://phabricator.haskell.org/D3772

compiler/rename/RnSource.hs
testsuite/tests/partial-sigs/should_fail/WildcardInStandaloneDeriving.stderr

index ff7251e..244f46b 100644 (file)
@@ -964,7 +964,7 @@ rnSrcDerivDecl (DerivDecl ty deriv_strat overlap)
        ; unless standalone_deriv_ok (addErr standaloneDerivErr)
        ; failIfTc (isJust deriv_strat && not deriv_strats_ok) $
            illegalDerivStrategyErr $ fmap unLoc deriv_strat
-       ; (ty', fvs) <- rnLHsInstType (text "In a deriving declaration") ty
+       ; (ty', fvs) <- rnLHsInstType (text "a deriving declaration") ty
        ; return (DerivDecl ty' deriv_strat overlap, fvs) }
 
 standaloneDerivErr :: SDoc
index 19df37a..8e98910 100644 (file)
@@ -3,4 +3,4 @@ WildcardInStandaloneDeriving.hs:4:19: error: Malformed instance: _
 
 WildcardInStandaloneDeriving.hs:4:19: error:
     Wildcard ‘_’ not allowed
-      in In a deriving declaration
+      in a deriving declaration