Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/ab9b844f6bc2c2f2a699b4b39958a579647d8ca4 >--------------------------------------------------------------- commit ab9b844f6bc2c2f2a699b4b39958a579647d8ca4 Author: Ian Lynagh <[email protected]> Date: Fri Jun 22 22:38:28 2012 +0100 Correct a comment >--------------------------------------------------------------- compiler/coreSyn/MkCore.lhs | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/compiler/coreSyn/MkCore.lhs b/compiler/coreSyn/MkCore.lhs index 6123e0a..76adef1 100644 --- a/compiler/coreSyn/MkCore.lhs +++ b/compiler/coreSyn/MkCore.lhs @@ -100,7 +100,7 @@ infixl 4 `mkCoreApp`, `mkCoreApps` \begin{code} sortQuantVars :: [Var] -> [Var] -- Sort the variables (KindVars, TypeVars, and Ids) --- into order: Kind, then Type, then Id +-- into order: Type, then Kind, then Id sortQuantVars = sortLe le where v1 `le` v2 = case (is_tv v1, is_tv v2) of _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
