Compare commits

..

3 commits

Author SHA1 Message Date
42b9dedbab Setup CI
Some checks failed
Haskell CI / build (pull_request) Successful in 2m19s
Haskell CI / test (pull_request) Successful in 2m11s
Haskell CI / fourmolu (pull_request) Successful in 5s
Haskell CI / hlint (pull_request) Failing after 5s
2025-09-27 15:40:10 +02:00
2fa45ab5cc Runner base config 2025-09-27 15:38:32 +02:00
d8ba47a8b6 Applied more formatting; added Makefile (#4)
Reviewed-on: #4
Co-authored-by: Igor Ranieri <igor@elland.me>
Co-committed-by: Igor Ranieri <igor@elland.me>
2025-09-27 07:51:09 +00:00

View file

@ -7,6 +7,12 @@ import GHC.Stack
import Identifier (Identifier) import Identifier (Identifier)
import Lexer import Lexer
import Parser import Parser
import Types
import Data.String (IsString (..))
import Data.Text (Text)
import GHC.Stack
import Text.Parsec.Pos
import Test.Hspec import Test.Hspec
import Text.Parsec.Pos import Text.Parsec.Pos
import Types import Types
@ -51,6 +57,7 @@ modules = do
, (1, 18, Anchor "myAnchor") , (1, 18, Anchor "myAnchor")
] ]
"\"OtherModule.Name\\#myAnchor\"" "\"OtherModule.Name\\#myAnchor\""
`shouldLexTo` [ (1, 2, Module "OtherModule.Name") `shouldLexTo` [ (1, 2, Module "OtherModule.Name")
, (1, 18, Anchor "myAnchor") , (1, 18, Anchor "myAnchor")