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

ref(lexer): rename MathsBracket -> MathMultiline

Browse source
This commit is contained in:
Primrose 2025-09-24 21:33:20 +08:00
parent 6ec47dad04
commit c4d59d3236
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

@ -53,8 +53,8 @@ data Token
| BracketClose
| MathInlineOpen
| MathInlineClose
| MathsBracketOpen
| MathsBracketClose
| MathMultilineOpen
| MathMultilineClose
| NumericEntity Int
| Module Text
| QuoteOpen
@ -85,7 +85,7 @@ lexText = go
toks <-
choice $
Parsec.try
<$> [ mathsBracket
<$> [ mathMultiline
, mathInline
, escape -- maths go before escape to avoid mismatch
, headers
@ -242,8 +242,8 @@ labeledLink = do
, (pos8, LabeledLinkClose)
]
mathsBracket :: Lexer
mathsBracket = delimited "\\[" "\\]" MathsBracketOpen MathsBracketClose
mathMultiline :: Lexer
mathMultiline = delimited "\\[" "\\]" MathMultilineOpen MathMultilineClose
mathInline :: Lexer
mathInline = delimited "\\(" "\\)" MathInlineOpen MathInlineClose