[commit: ghc] master: Typo in error message (e1c116c)

[Simon Peyton Jones]

Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/e1c116c6600b63f950b8cae8e8c765d8782eed72

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

commit e1c116c6600b63f950b8cae8e8c765d8782eed72
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Mon Jul 23 09:22:29 2012 +0100

    Typo in error message

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

 compiler/deSugar/Desugar.lhs |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/compiler/deSugar/Desugar.lhs b/compiler/deSugar/Desugar.lhs
index f2e8e1e..14fb08d 100644
--- a/compiler/deSugar/Desugar.lhs
+++ b/compiler/deSugar/Desugar.lhs
@@ -395,7 +395,7 @@ dsRule (L loc (HsRule name act vars lhs _tv_lhs rhs _fv_rhs))
           warnDs (vcat [ hang (ptext (sLit "Rule") <+> doubleQuotes (ftext name)
                                <+> ptext (sLit "may never fire"))
                             2 (ptext (sLit "becuase") <+> quotes (ppr fn_id)
-                               <+> ptext (sLit "might inline firsrt"))
+                               <+> ptext (sLit "might inline first"))
                        , ptext (sLit "Probable fix: add an INLINE[n] or NOINLINE[n] pragma on")
                          <+> quotes (ppr fn_id) ])