[commit: haddock] master: Using new syntax in html-test/src/GADTRecords.hs. (85b8ac0)

[Simon Hengel]

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

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/85b8ac017f0ac6d3eda397e586a75bb9f7c2760b

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

commit 85b8ac017f0ac6d3eda397e586a75bb9f7c2760b
Author: Kazu Yamamoto <kazu at iij.ad.jp>
Date:   Thu Feb 7 17:45:10 2013 +0900

    Using new syntax in html-test/src/GADTRecords.hs.

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

 html-test/src/GADTRecords.hs |    9 ++++-----
 1 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/html-test/src/GADTRecords.hs b/html-test/src/GADTRecords.hs
index c77810a..dcbbb87 100644
--- a/html-test/src/GADTRecords.hs
+++ b/html-test/src/GADTRecords.hs
@@ -5,8 +5,7 @@ module GADTRecords (H1(..)) where
 data H1 a b where
   C1 :: H1 a b
   C2 :: Ord a => [a] -> H1 a a
-  C3 { field :: Int -- ^ hello docs
-     } :: H1 Int Int
-  C4 { field2 :: a -- ^ hello2 docs
-     } :: H1 Int a
-
+  C3 :: { field :: Int -- ^ hello docs
+        } -> H1 Int Int
+  C4 :: { field2 :: a -- ^ hello2 docs
+        } -> H1 Int a