sig val pretty_external : Format.formatter -> Cil_types.kernel_function -> unit val pretty_with_formals : Format.formatter -> Cil_types.kernel_function -> unit end