Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : new-demand
http://hackage.haskell.org/trac/ghc/changeset/e397a40bfcaa7c30c02ef2a2a51511c9ee21f0b6 >--------------------------------------------------------------- commit e397a40bfcaa7c30c02ef2a2a51511c9ee21f0b6 Author: Ilya Sergey <[email protected]> Date: Mon Aug 13 11:35:05 2012 +0100 small tweaks in CoreLint for new strictness signatures >--------------------------------------------------------------- compiler/coreSyn/CoreLint.lhs | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/compiler/coreSyn/CoreLint.lhs b/compiler/coreSyn/CoreLint.lhs index e93526d..238237d 100644 --- a/compiler/coreSyn/CoreLint.lhs +++ b/compiler/coreSyn/CoreLint.lhs @@ -1215,7 +1215,7 @@ mkStrictMsg :: Id -> MsgDoc mkStrictMsg binder = vcat [hsep [ptext (sLit "Recursive or top-level binder has strict demand info:"), ppr binder], - hsep [ptext (sLit "Binder's demand info:"), ppr (idDemandInfo binder)] + hsep [ptext (sLit "Binder's demand info:"), ppr (nd_idDemandInfo binder)] ] mkNonTopExportedMsg :: Id -> MsgDoc _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
