src/Pure/Thy/latex.ML
changeset 42290 b1f544c84040
parent 40523 1050315f6ee2
child 43485 33a24212a72d
equal deleted inserted replaced
42289:dafae095d733 42290:b1f544c84040
   128 fun output_basic tok =
   128 fun output_basic tok =
   129   let val s = Token.content_of tok in
   129   let val s = Token.content_of tok in
   130     if invisible_token tok then ""
   130     if invisible_token tok then ""
   131     else if Token.is_kind Token.Command tok then
   131     else if Token.is_kind Token.Command tok then
   132       "\\isacommand{" ^ output_syms s ^ "}"
   132       "\\isacommand{" ^ output_syms s ^ "}"
   133     else if Token.is_kind Token.Keyword tok andalso Syntax.is_ascii_identifier s then
   133     else if Token.is_kind Token.Keyword tok andalso Lexicon.is_ascii_identifier s then
   134       "\\isakeyword{" ^ output_syms s ^ "}"
   134       "\\isakeyword{" ^ output_syms s ^ "}"
   135     else if Token.is_kind Token.String tok then
   135     else if Token.is_kind Token.String tok then
   136       output_syms s |> enclose
   136       output_syms s |> enclose
   137         (enclose_literal "\"" "{\\isachardoublequoteopen}")
   137         (enclose_literal "\"" "{\\isachardoublequoteopen}")
   138         (enclose_literal "\"" "{\\isachardoublequoteclose}")
   138         (enclose_literal "\"" "{\\isachardoublequoteclose}")