src/Pure/PIDE/document.ML
changeset 57918 f5d73caba4e5
parent 57905 c0c5652e796e
child 58903 38c72f5f6c2e
equal deleted inserted replaced
57917:8ce97e5d545f 57918:f5d73caba4e5
   316     let
   316     let
   317       val id = Document_ID.print command_id;
   317       val id = Document_ID.print command_id;
   318       val span =
   318       val span =
   319         Lazy.lazy (fn () =>
   319         Lazy.lazy (fn () =>
   320           Position.setmp_thread_data (Position.id_only id)
   320           Position.setmp_thread_data (Position.id_only id)
   321             (fn () => Outer_Syntax.parse_tokens (Keyword.get_lexicons ()) (Position.id id) text) ());
   321             (fn () => Outer_Syntax.scan (Keyword.get_lexicons ()) (Position.id id) text) ());
   322       val _ =
   322       val _ =
   323         Position.setmp_thread_data (Position.id_only id)
   323         Position.setmp_thread_data (Position.id_only id)
   324           (fn () => Output.status (Markup.markup_only Markup.accepted)) ();
   324           (fn () => Output.status (Markup.markup_only Markup.accepted)) ();
   325       val commands' =
   325       val commands' =
   326         Inttab.update_new (command_id, (name, command_blobs, span)) commands
   326         Inttab.update_new (command_id, (name, command_blobs, span)) commands