primrose/haddock2
1
0
Fork 0
forked from elland/haddock2
Code Pull requests Activity

ref(moduleName): break into multiple smaller functions

Browse source 
upperId has been changed to only use isUpper because an non alphabetical
character would be false anyway
This commit is contained in:
Primrose 2025-09-24 20:47:55 +08:00
parent c956c97e0c
commit 20b5ffac36
Signed by: primrose
GPG key ID: 4E887A4CA9714ADA
2 changed files with 23 additions and 26 deletions
Download patch file Download diff file Expand all files Collapse all files

9
test/Spec.hs
View file

@ -44,19 +44,16 @@ main = hspec $ do
modules :: Expectation
modules = do
"\"MyModule.Name\""
`shouldLexTo` [ (1, 1, Module)
, (1, 2, Token "MyModule.Name")
`shouldLexTo` [ (1, 2, Module "MyModule.Name")
]
"\"OtherModule.Name#myAnchor\""
`shouldLexTo` [ (1, 1, Module)
, (1, 2, Token "OtherModule.Name")
`shouldLexTo` [ (1, 2, Module "OtherModule.Name")
, (1, 18, Anchor "myAnchor")
]
"\"OtherModule.Name\\#myAnchor\""
`shouldLexTo` [ (1, 1, Module)
, (1, 2, Token "OtherModule.Name")
`shouldLexTo` [ (1, 2, Module "OtherModule.Name")
, (1, 18, Anchor "myAnchor")
]
link :: Expectation