let normal_newline fmt = let (out, flush, newline, spaces) = Extlib.the !normal_funcs in normal_funcs := None; Format.pp_set_all_formatter_output_functions fmt ~out ~flush ~newline ~spaces