texmath 0.5 → 0.5.0.1

raw patch · 2 files changed

+25/−9 lines, 2 files

Files

• Text/TeXMath/Parser.hs +24/−8
• texmath.cabal +1/−1

@@ -282,14 +282,14 @@  textOps :: M.Map String (String -> Exp) textOps = M.fromList-          [ ("\\textrm", EText "normal")+          [ ("\\textrm", EText "normal" . parseText)           , ("\\mathrm", EText "normal")-          , ("\\text",   EText "normal")+          , ("\\text",   EText "normal" . parseText)           , ("\\mbox",   EText "normal")           , ("\\mathbf", EText "bold")-          , ("\\textbf", EText "bold")+          , ("\\textbf", EText "bold" . parseText)           , ("\\mathit", EText "italic")-          , ("\\textit", EText "italic")+          , ("\\textit", EText "italic" . parseText)           , ("\\mathtt", EText "monospace")           , ("\\texttt", EText "monospace")           , ("\\mathsf", EText "sans-serif")@@ -298,6 +298,17 @@           , ("\\mathfrak", EText "fraktur")           ] +parseText :: String -> String+parseText ('`':'`':xs) = '\x201C' : parseText xs+parseText ('\'':'\'':xs) = '\x201D' : parseText xs+parseText ('\'':xs) = '\x2019' : parseText xs+parseText ('-':'-':'-':xs) = '\x2014' : parseText xs+parseText ('-':'-':xs) = '\x2013' : parseText xs+parseText ('\\':'l':'d':'o':'t':'s':xs) = '\x2026' : parseText xs+parseText ('~':xs) = '\xA0' : parseText xs+parseText (x:xs) = x : parseText xs+parseText [] = []+ diacritical :: GenParser Char st Exp diacritical = try $ do   c <- command@@ -435,10 +446,14 @@              , ("|", ESymbol Close "\x2223")              , ("\\|", ESymbol Open "\x2225")              , ("\\|", ESymbol Close "\x2225")-             , ("\\vert", ESymbol Open "\x2223")-             , ("\\vert", ESymbol Close "\x2223")-             , ("\\Vert", ESymbol Open "\x2225")-             , ("\\Vert", ESymbol Close "\x2225")+             , ("\\lvert", ESymbol Open "\x7C")+             , ("\\rvert", ESymbol Close "\x7C")+             , ("\\vert", ESymbol Close "\x7C")+             , ("\\lVert", ESymbol Open "\x2225")+             , ("\\rVert", ESymbol Close "\x2225")+             , ("\\Vert", ESymbol Close "\x2016")+             , ("\\ulcorner", ESymbol Open "\x231C")+             , ("\\urcorner", ESymbol Close "\x231D")              ]  symbols :: M.Map String Exp@@ -661,6 +676,7 @@            , ("\\angle", ESymbol Ord "\x2220")            , ("\\diamond", ESymbol Op "\x22C4")            , ("\\Diamond", ESymbol Op "\x25C7")+           , ("\\lozenge", ESymbol Op "\x25CA")            , ("\\neg", ESymbol Op "\x00AC")            , ("\\lnot", ESymbol Ord "\x00AC")            , ("\\bot", ESymbol Ord "\x22A5")

@@ -1,5 +1,5 @@ Name:                texmath-Version:             0.5+Version:             0.5.0.1 Cabal-version:       >= 1.2 Build-type:          Custom Synopsis:            Conversion of LaTeX math formulas to MathML.