Value.Expert
val have_active_env : unit -> bool
val raise_if_emacs_signaled : unit -> unit
val non_local_exit_signal : exn -> unit