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

ref(lexer): rename MathParen -> MathInline

Browse source
This commit is contained in:
Primrose 2025-09-24 21:31:26 +08:00
parent f3b3b08919
commit 6ec47dad04
Signed by: primrose
GPG key ID: 4E887A4CA9714ADA
2 changed files with 7 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

10
src/Lexer.hs
View file

@ -51,8 +51,8 @@ data Token
| ParenClose
| BracketOpen
| BracketClose
| MathsParenOpen
| MathsParenClose
| MathInlineOpen
| MathInlineClose
| MathsBracketOpen
| MathsBracketClose
| NumericEntity Int
@ -86,7 +86,7 @@ lexText = go
choice $
Parsec.try
<$> [ mathsBracket
, mathsParens
, mathInline
, escape -- maths go before escape to avoid mismatch
, headers
, newlineToken
@ -245,8 +245,8 @@ labeledLink = do
mathsBracket :: Lexer
mathsBracket = delimited "\\[" "\\]" MathsBracketOpen MathsBracketClose
mathsParens :: Lexer
mathsParens = delimited "\\(" "\\)" MathsParenOpen MathsParenClose
mathInline :: Lexer
mathInline = delimited "\\(" "\\)" MathInlineOpen MathInlineClose
birdTrack :: Lexer
birdTrack = delimitedNoTrailing ">> " eol BirdTrack