aboutsummaryrefslogtreecommitdiff
path: root/hypsrc-test
diff options
context:
space:
mode:
authorŁukasz Hanuszczak <lukasz.hanuszczak@gmail.com>2015-07-01 22:27:38 +0200
committerŁukasz Hanuszczak <lukasz.hanuszczak@gmail.com>2015-07-01 22:27:38 +0200
commit8071c27826d60eec1cb20f00f9767c32366defac (patch)
tree339a7f7b05161cf61b91e96ff742cf0fb0386eb2 /hypsrc-test
parent868248d5e847e29ffede5b6c7d20f08a3ec7eb47 (diff)
Add qualified name test for identifiers hyperlinking test case.
Diffstat (limited to 'hypsrc-test')
-rw-r--r--hypsrc-test/ref/src/Identifiers.html45
-rw-r--r--hypsrc-test/src/Identifiers.hs1
2 files changed, 46 insertions, 0 deletions
diff --git a/hypsrc-test/ref/src/Identifiers.html b/hypsrc-test/ref/src/Identifiers.html
index 4c82ad01..14cfbd8b 100644
--- a/hypsrc-test/ref/src/Identifiers.html
+++ b/hypsrc-test/ref/src/Identifiers.html
@@ -737,6 +737,51 @@
></a
><span class=""
>
+ </span
+ ><span class="hs-identifier hs-var"
+ >putStrLn</span
+ ><span class=""
+ > </span
+ ><span class="hs-operator hs-var"
+ >.</span
+ ><span class=""
+ > </span
+ ><span class="hs-identifier hs-var"
+ >show</span
+ ><span class=""
+ > </span
+ ><span class="hs-operator hs-var"
+ >$</span
+ ><span class=""
+ > </span
+ ><a href="Identifiers.html#norf"
+ ><span class="hs-identifier hs-var"
+ >Identifiers</span
+ ><span class="hs-operator hs-var"
+ >.</span
+ ><span class="hs-identifier hs-var"
+ >norf</span
+ ></a
+ ><span class=""
+ > </span
+ ><a href="#local-0"
+ ><span class="hs-identifier hs-var"
+ >x</span
+ ></a
+ ><span class=""
+ > </span
+ ><a href="#local-0"
+ ><span class="hs-identifier hs-var"
+ >y</span
+ ></a
+ ><span class=""
+ > </span
+ ><a href="#local-0"
+ ><span class="hs-identifier hs-var"
+ >z</span
+ ></a
+ ><span class=""
+ >
</span
><span class="hs-keyword"
>where</span
diff --git a/hypsrc-test/src/Identifiers.hs b/hypsrc-test/src/Identifiers.hs
index e2d6223d..173c3ba7 100644
--- a/hypsrc-test/src/Identifiers.hs
+++ b/hypsrc-test/src/Identifiers.hs
@@ -21,6 +21,7 @@ main :: IO ()
main = do
putStrLn . show $ foo x y
putStrLn . show $ quux z
+ putStrLn . show $ Identifiers.norf x y z
where
x = 10
y = 20