method save () =
try
let oc = open_out file in
output_string oc (Buffer.contents resolved) ;
List.iter
(function
No_conflict s -> output_string oc s
| Conflict (s1, s2) -> output_string oc (self#string_of_conflict (s1, s2))
)
remain;
close_out oc
with
Sys_error s ->
GToolbox.message_box Odiff_messages.error s