blob: a912409813be9d28f7cb61a2145ecccef93f5751 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
{-# LANGUAGE Haskell2010 #-}
-- http://trac.haskell.org/haddock/ticket/37
module HiddenInstances (VisibleClass, VisibleData) where
-- | Should be visible
class VisibleClass a
-- | Should *not* be visible
class HiddenClass a
-- | Should *not* be visible
data HiddenData = HiddenData
-- | Should be visible
data VisibleData = VisibleData
-- | Should be visible
instance VisibleClass Int
-- | Should be visible
instance VisibleClass VisibleData
-- | Should be visible
instance Num VisibleData
-- | Should *not* be visible
instance VisibleClass HiddenData
-- | Should *not* be visible
instance HiddenClass Int
-- | Should *not* be visible
instance HiddenClass VisibleData
-- | Should *not* be visible
instance HiddenClass HiddenData
|
