diff options
| author | Alec Theriault <alec.theriault@gmail.com> | 2019-02-26 08:46:45 -0800 |
|---|---|---|
| committer | Alec Theriault <alec.theriault@gmail.com> | 2019-02-26 19:14:59 -0800 |
| commit | b682041ed1cbeaf5aa501f85e4e46a6d2e39da3a (patch) | |
| tree | 6ce1d082d44e12af408d8c9d9210297b846d159d /html-test/src/Bug1035.hs | |
| parent | a5199600c39d25d7b71dcb2328000c1c49ad95a2 (diff) | |
Fix bogus identifier defaulting
This avoids a situation in which an identifier would get defaulted to
a completely different identifier. Prior to this commit, the 'Bug1035'
test case would hyperlink 'Foo' into 'Bar'!
Fixes #1035.
Diffstat (limited to 'html-test/src/Bug1035.hs')
| -rw-r--r-- | html-test/src/Bug1035.hs | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/html-test/src/Bug1035.hs b/html-test/src/Bug1035.hs new file mode 100644 index 00000000..3516c08f --- /dev/null +++ b/html-test/src/Bug1035.hs @@ -0,0 +1,9 @@ +module Bug1035 where + +data Foo = Bar + +data Bar = Foo + +-- | A link to 'Bar' +foo :: () +foo = () |