aboutsummaryrefslogtreecommitdiff
path: root/html-test/src/HiddenInstances.hs
diff options
context:
space:
mode:
authorSimon Hengel <sol@typeful.net>2012-10-15 20:32:03 +0200
committerSimon Hengel <sol@typeful.net>2012-10-15 20:49:39 +0200
commit7e1fed4da8bb913d25f447afd1f1e485d428e37f (patch)
tree179a79201d11df7b27583f083d884753b1ee82e4 /html-test/src/HiddenInstances.hs
parenta4fb9cb0a44101d858d69281a3ee0aa0dbf7ddda (diff)
Move source files for HTML tests to html-test/src
Diffstat (limited to 'html-test/src/HiddenInstances.hs')
-rw-r--r--html-test/src/HiddenInstances.hs35
1 files changed, 35 insertions, 0 deletions
diff --git a/html-test/src/HiddenInstances.hs b/html-test/src/HiddenInstances.hs
new file mode 100644
index 00000000..99a6c2fd
--- /dev/null
+++ b/html-test/src/HiddenInstances.hs
@@ -0,0 +1,35 @@
+-- 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