method save : (unit -> unit) option = Some (fun () -> v#save)