ref(lexer): rename MathsBracket -> MathsMultiline

2025-09-24 21:33:20 +08:00
2 changed files with 5 additions and 5 deletions
--- a/src/Lexer.hs
+++ b/src/Lexer.hs
@ -53,8 +53,8 @@ data Token
    | BracketClose
    | MathInlineOpen
    | MathInlineClose
-    | MathMultilineOpen
-    | MathMultilineClose
+    | MathsMultilineOpen
+    | MathsMultilineClose
    | NumericEntity Int
    | Module Text
    | QuoteOpen
@ -243,7 +243,7 @@ labeledLink = do
                   ]

 mathMultiline :: Lexer
-mathMultiline = delimited "\\[" "\\]" MathMultilineOpen MathMultilineClose
+mathMultiline = delimited "\\[" "\\]" MathsMultilineOpen MathsMultilineClose

 mathInline :: Lexer
 mathInline = delimited "\\(" "\\)" MathInlineOpen MathInlineClose
--- a/test/Spec.hs
+++ b/test/Spec.hs
@ -93,9 +93,9 @@ anchors =
 maths :: IO ()
 maths = do
    "\\[some math\\]"
-        `shouldLexTo` [ (1, 1, MathMultilineOpen)
+        `shouldLexTo` [ (1, 1, MathsMultilineOpen)
                      , (1, 3, Token "some math")
-                      , (1, 12, MathMultilineClose)
+                      , (1, 12, MathsMultilineClose)
                      ]
    "\\(other maths\\)"
        `shouldLexTo` [ (1, 1, MathInlineOpen)