diff options
author | Alec Theriault <alec.theriault@gmail.com> | 2018-10-16 17:42:05 -0700 |
---|---|---|
committer | GitHub <noreply@github.com> | 2018-10-16 17:42:05 -0700 |
commit | b21c806740fd41e3fd25e17edc412aa69825611d (patch) | |
tree | 4457746fa503bac1be194ea27a220a88f43a6d73 /hoogle-test | |
parent | 99253fd790dde6fd3d3622bd58a24d09a78b7ec4 (diff) |
Output pattern synonyms in Hoogle backend (#947)
* Output pattern synonyms in Hoogle backend
We were previously weren't outputting _any_ pattern synonyms, bundled or
not. Now, we output both.
Fixes #946.
* Update changelog
Diffstat (limited to 'hoogle-test')
-rw-r--r-- | hoogle-test/ref/Bug946/test.txt | 19 | ||||
-rw-r--r-- | hoogle-test/src/Bug946/Bug946.hs | 16 |
2 files changed, 35 insertions, 0 deletions
diff --git a/hoogle-test/ref/Bug946/test.txt b/hoogle-test/ref/Bug946/test.txt new file mode 100644 index 00000000..ff63a766 --- /dev/null +++ b/hoogle-test/ref/Bug946/test.txt @@ -0,0 +1,19 @@ +-- Hoogle documentation, generated by Haddock +-- See Hoogle, http://www.haskell.org/hoogle/ + +@package test +@version 0.0.0 + +module Bug946 + +-- | A wrapper around <a>Int</a> +data AnInt + +-- | some <a>Int</a> +AnInt :: Int -> AnInt + +-- | The <a>Int</a> 0 +pattern Zero :: AnInt + +-- | The double 2.5 +pattern TwoPointFive :: Double diff --git a/hoogle-test/src/Bug946/Bug946.hs b/hoogle-test/src/Bug946/Bug946.hs new file mode 100644 index 00000000..606b5ac4 --- /dev/null +++ b/hoogle-test/src/Bug946/Bug946.hs @@ -0,0 +1,16 @@ +{-# LANGUAGE PatternSynonyms #-} +module Bug946 ( + AnInt(AnInt, Zero), + pattern TwoPointFive, +) where + +-- | A wrapper around 'Int' +data AnInt = AnInt Int -- ^ some 'Int' + +-- | The 'Int' 0 +pattern Zero :: AnInt +pattern Zero = AnInt 0 + +-- | The double 2.5 +pattern TwoPointFive :: Double +pattern TwoPointFive = 2.5 |