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

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/7b931b2412ec15575fb9898913ecd08079ff5e15

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

commit 7b931b2412ec15575fb9898913ecd08079ff5e15
Author: Simon Marlow <[email protected]>
Date:   Tue Jun 14 09:26:13 2011 +0100

    kill datatype context

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

 real/fluid/Norm.hs |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/real/fluid/Norm.hs b/real/fluid/Norm.hs
index be35a0e..27556f2 100644
--- a/real/fluid/Norm.hs
+++ b/real/fluid/Norm.hs
@@ -24,7 +24,7 @@ andAnd a b = if a then
                error "andAnd: first argument not True\n"
 -- end partain
 
-data (Normal a) => Norm_able a = Norm_pack Bool a deriving ()
+data Norm_able a = Norm_pack Bool a deriving ()
 
 class Normal a where
        normal :: a -> Bool



_______________________________________________
Cvs-ghc mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to