(************************************************************************) (* v * The Coq Proof Assistant / The Coq Development Team *) (* Stm.doc val start : unit -> unit (* For other toploops *) val toploop_init : (string list -> string list) ref val toploop_run : (Stm.doc -> unit) ref