@@ -412,6 +412,8 @@ inlineCommands = M.fromList $
412412 , ("pounds", lit "£")
413413 , ("euro", lit "€")
414414 , ("copyright", lit "©")
415+ , ("textasciicircum", lit "^")
416+ , ("textasciitilde", lit "~")
415417 , ("`", option (str "`") $ try $ tok >>= accent grave)
416418 , ("'", option (str "'") $ try $ tok >>= accent acute)
417419 , ("^", option (str "^") $ try $ tok >>= accent circ)