diff --git a/Text/TeXMath/Parser.hs b/Text/TeXMath/Parser.hs
--- a/Text/TeXMath/Parser.hs
+++ b/Text/TeXMath/Parser.hs
@@ -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")
diff --git a/texmath.cabal b/texmath.cabal
--- a/texmath.cabal
+++ b/texmath.cabal
@@ -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.