src/Pure/Tools/doc.ML
author wenzelm
Wed, 27 Mar 2024 13:41:08 +0100
changeset 80028 38bbc2ff3c24
parent 73761 ef1a18e20ace
child 82759 c7d2ae25d008
permissions -rw-r--r--
remove obsolete component (see 8347ffa1f92c): superseded by "isabelle go_setup";

(*  Title:      Pure/Tools/doc.ML
    Author:     Makarius

Access to Isabelle documentation.
*)

signature DOC =
sig
  val check: Proof.context -> string * Position.T -> string
end;

structure Doc: DOC =
struct

fun check ctxt arg =
  Completion.check_item "documentation" (Markup.doc o #1)
    (\<^scala>\<open>doc_names\<close> "" |> split_lines |> map (rpair ())) ctxt arg;

val _ =
  Theory.setup
   (Document_Output.antiquotation_verbatim_embedded \<^binding>\<open>doc\<close>
      (Scan.lift Parse.embedded_position) check);

end;