Repository : ssh://darcs.haskell.org//srv/darcs/haddock On branch : ghc-7.6
http://hackage.haskell.org/trac/ghc/changeset/605502fbd9879268a13bf5f400d98b128fb8d1fc >--------------------------------------------------------------- commit 605502fbd9879268a13bf5f400d98b128fb8d1fc Author: Simon Hengel <[email protected]> Date: Fri Sep 21 14:35:45 2012 +0200 Update TypeOperators test for GHC 7.6.1 Type operators can't be used as type variables anymore! >--------------------------------------------------------------- tests/html-tests/tests/TypeOperators.hs | 4 +- tests/html-tests/tests/TypeOperators.html.ref | 54 -------------------- tests/html-tests/tests/mini_TypeOperators.html.ref | 8 --- 3 files changed, 1 insertions(+), 65 deletions(-) diff --git a/tests/html-tests/tests/TypeOperators.hs b/tests/html-tests/tests/TypeOperators.hs index aa0fbe8..edbb934 100644 --- a/tests/html-tests/tests/TypeOperators.hs +++ b/tests/html-tests/tests/TypeOperators.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE TypeOperators #-} module TypeOperators ( -- * stuff (:-:), @@ -5,7 +6,6 @@ module TypeOperators ( Op, O(..), biO, - Flip(..) ) where data a :-: b @@ -18,5 +18,3 @@ newtype (g `O` f) a = O { unO :: g (f a) } biO :: (g `O` f) a biO = undefined - -newtype Flip (~>) b a = Flip { unFlip :: a ~> b } diff --git a/tests/html-tests/tests/TypeOperators.html.ref b/tests/html-tests/tests/TypeOperators.html.ref index 0155ab0..519547d 100644 --- a/tests/html-tests/tests/TypeOperators.html.ref +++ b/tests/html-tests/tests/TypeOperators.html.ref @@ -94,20 +94,6 @@ window.onload = function () {pageLoad();setSynopsis("mini_TypeOperators.html");} > :: (g `<a href="" >O</a >` f) a</li - ><li class="src short" - ><span class="keyword" - >newtype</span - > <a href="" - >Flip</a - > (~>) b a = <a href="" - >Flip</a - > {<ul class="subs" - ><li - ><a href="" - >unFlip</a - > :: a ~> b</li - ></ul - >}</li ></ul ></div ><div id="interface" @@ -186,46 +172,6 @@ window.onload = function () {pageLoad();setSynopsis("mini_TypeOperators.html");} >O</a >` f) a</p ></div - ><div class="top" - ><p class="src" - ><span class="keyword" - >newtype</span - > <a name="t:Flip" class="def" - >Flip</a - > (~>) b a </p - ><div class="subs constructors" - ><p class="caption" - >Constructors</p - ><table - ><tr - ><td class="src" - ><a name="v:Flip" class="def" - >Flip</a - ></td - ><td class="doc empty" - > </td - ></tr - ><tr - ><td colspan="2" - ><div class="subs fields" - ><p class="caption" - >Fields</p - ><dl - ><dt class="src" - ><a name="v:unFlip" class="def" - >unFlip</a - > :: a ~> b</dt - ><dd class="doc empty" - > </dd - ></dl - ><div class="clear" - ></div - ></div - ></td - ></tr - ></table - ></div - ></div ></div ></div ><div id="footer" diff --git a/tests/html-tests/tests/mini_TypeOperators.html.ref b/tests/html-tests/tests/mini_TypeOperators.html.ref index f70a0fa..86b6bee 100644 --- a/tests/html-tests/tests/mini_TypeOperators.html.ref +++ b/tests/html-tests/tests/mini_TypeOperators.html.ref @@ -60,14 +60,6 @@ window.onload = function () {pageLoad();}; >biO</a ></p ></div - ><div class="top" - ><p class="src" - ><span class="keyword" - >data</span - > <a href="" target="main" - >Flip</a - > (~>) b a</p - ></div ></div ></body ></html _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
