src/Tools/WWW_Find/Start_WWW_Find.thy

tuned signature -- avoid intrusion of slightly odd Swing structures into pure Markup_Tree;

(* Load this theory to start the WWW_Find server on port defined by environment
   variable "SCGIPORT". Used by the isabelle wwwfind tool.
*)

theory Start_WWW_Find imports WWW_Find begin

ML {*
  YXML_Find_Theorems.init ();
  val port = OS.Process.getEnv "SCGIPORT" |> the |> Int.fromString |> the;
  ScgiServer.server' 10 "/" port;
*}

end