[commit: ghc] wip/tdammers/T11066: [WIP] turn "inaccessible code" error into a warning (f4f9c0f)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/tdammers/T11066
Link       : http://ghc.haskell.org/trac/ghc/changeset/f4f9c0fc9564f17339718378e9fea3bd186fff96/ghc

>---------------------------------------------------------------

commit f4f9c0fc9564f17339718378e9fea3bd186fff96
Author: Tobias Dammers <tdammers at gmail.com>
Date:   Tue May 8 13:54:28 2018 +0200

    [WIP] turn "inaccessible code" error into a warning
    
    (#11066)


>---------------------------------------------------------------

f4f9c0fc9564f17339718378e9fea3bd186fff96
 compiler/typecheck/TcErrors.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/typecheck/TcErrors.hs b/compiler/typecheck/TcErrors.hs
index dde7c3c..2d3af68 100644
--- a/compiler/typecheck/TcErrors.hs
+++ b/compiler/typecheck/TcErrors.hs
@@ -708,7 +708,7 @@ mkGivenErrorReporter implic ctxt cts
                              Nothing ty1 ty2
 
        ; traceTc "mkGivenErrorReporter" (ppr ct)
-       ; maybeReportError ctxt err }
+       ; reportWarning NoReason err }
   where
     (ct : _ )  = cts    -- Never empty
     (ty1, ty2) = getEqPredTys (ctPred ct)