addDebugItem "dump moo to stderr" (fun _ ->
let status = (MatitaScript.current ())#status in
let moo = status.moo_content_rev in
addDebugItem "dump moo to stderr" (fun _ ->
let status = (MatitaScript.current ())#status in
let moo = status.moo_content_rev in
addDebugItem "print metasenv goals and stack to stderr"
(fun _ ->
prerr_endline ("metasenv goals: " ^ String.concat " "
addDebugItem "print metasenv goals and stack to stderr"
(fun _ ->
prerr_endline ("metasenv goals: " ^ String.concat " "