Source file coq_byte_config.ml

1
2
let toploop_use_silently ppf f = Toploop.use_silently ppf (Toploop.File f)
let compenv_handle_exit_with_status_0 f = try f () with Compenv.Exit_with_status(0) -> ()