• Sergei Trofimovich's avatar
    renamer: fix module-level deprecation message · b04bed0a
    Sergei Trofimovich authored
    Noticed today that deprecation warnings are
    slightly broken in -HEAD:
    
      mtl-2.2.1/Control/Monad/Error/Class.hs:46:1: warning:
        Module ‘Control.Monad.Trans.Error’ is deprecated:
          ([", U, s, e,  , C, o, n, t, r, o, l, ., M, o, n, a, d, ., T, r, a,
            n, s, ., E, x, c, e, p, t,  , i, n, s, t, e, a, d, "],
           Use Control.Monad.Trans.Except instead)
    
    Commit e6191d1c
    slightly changed WarningTxt declaration:
    
    -data WarningTxt = WarningTxt (Located SourceText) [Located FastString]
    -                | DeprecatedTxt (Located SourceText) [Located FastString]
    +data WarningTxt = WarningTxt (Located SourceText)
    +                             [Located (SourceText,FastString)]
    +                | DeprecatedTxt (Located SourceText)
    +                                [Located (SourceText,FastString)]
    
    But 'moduleWarn' function was not updated to do the stripping.
    Signed-off-by: default avatarSergei Trofimovich <siarheit@google.com>
    
    Reviewers: austin, bgamari, hvr, goldfire, rwbarton, alanz
    
    Reviewed By: rwbarton, alanz
    
    Subscribers: thomie
    
    Differential Revision: https://phabricator.haskell.org/D1096
    
    GHC Trac Issues: #10313
    b04bed0a
DeprU.hs 91 Bytes