@@ -378,7 +378,8 @@ comment = try (do
381+inline = choice [ strong, emph, strikeout, superscript, subscript,
381−inline = choice [ strong, emph, strikeout, ref, lab, code, linebreak, spacer,
382+ ref, lab, code, linebreak, spacer,
382 math, ellipses, emDash, enDash, hyphen, quoted, apostrophe,
383 math, ellipses, emDash, enDash, hyphen, quoted, apostrophe,
383 accentedChar, specialChar, specialInline, escapedChar,
384 accentedChar, specialChar, specialInline, escapedChar,
384 unescapedChar, str, endline, whitespace ] <?> "inline"
385 unescapedChar, str, endline, whitespace ] <?> "inline"
@@ -522,6 +523,18 @@ strikeout = try $ do
522 result <- manyTill inline (char '}')
523 result <- manyTill inline (char '}')
523 return (Strikeout result)
524 return (Strikeout result)
526+superscript = try $ do
527+ string "\\textsuperscript{"
528+ result <- manyTill inline (char '}')
529+ return (Superscript result)
531+-- note: \textsubscript isn't a standard latex command, but we use
532+-- a defined version in pandoc.
534+ string "\\textsubscript{"
535+ result <- manyTill inline (char '}')
536+ return (Subscript result)
525apostrophe = do
538apostrophe = do
526 char '\''
539 char '\''
527 return Apostrophe
540 return Apostrophe