Module `Common_compile`

val fatal_error : Pp.t -> 'a
val ensure : ext:string -> src:string -> tgt:string -> string
val ensure_exists : string -> unit
val ensure_exists_with_prefix : src:string -> tgt:string option -> src_ext:string -> tgt_ext:string -> string * string
val safe_chop_extension : string -> string
val ensure_no_pending_proofs : filename:string -> Vernacstate.t -> unit