summaryrefslogtreecommitdiff
path: root/tests/examples/ghc86/haddockA027.hs
blob: aa8690d59bb8a23c714a495fe1233da4ca1f5d78 (plain)
1
2
3
4
5
6
7
8
9
10
11
{-# OPTIONS_GHC -fno-warn-redundant-constraints #-}
{-# LANGUAGE RankNTypes #-}

module ShouldCompile where

test :: [a] -- ^ doc1
        -> forall b. (Ord b) => [b] {-^ doc2 -}
        -> forall c. (Num c) => [c] -- ^ doc3
        -> [a]
test xs ys zs = xs