Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : supercompiler
http://hackage.haskell.org/trac/ghc/changeset/498cb10a411da0a1224f18018bf3ed0053180dab >--------------------------------------------------------------- commit 498cb10a411da0a1224f18018bf3ed0053180dab Author: Max Bolingbroke <batterseapo...@hotmail.com> Date: Wed Jun 29 11:30:54 2011 +0100 Comment only >--------------------------------------------------------------- compiler/supercompile/Supercompile/Utilities.hs | 2 ++ 1 files changed, 2 insertions(+), 0 deletions(-) diff --git a/compiler/supercompile/Supercompile/Utilities.hs b/compiler/supercompile/Supercompile/Utilities.hs index a02b5ca..a8f02df 100644 --- a/compiler/supercompile/Supercompile/Utilities.hs +++ b/compiler/supercompile/Supercompile/Utilities.hs @@ -75,6 +75,8 @@ instance (Ord1 f, Ord a) => Ord (Wrapper1 f a) where compare = compare1 `on` unWrapper1 +-- Because we have this class, we can define Outputable for +-- Supercompile.Core.Syntax.TermF without UndecidableInstances class Outputable1 f where pprPrec1 :: Outputable a => Rational -> f a -> SDoc _______________________________________________ Cvs-ghc mailing list Cvs-ghc@haskell.org http://www.haskell.org/mailman/listinfo/cvs-ghc
