let last_begin_object_indent () = try let (_,v,off) = List.find (fun (t,_,_) -> t=OBJECT) !blocks in Some (v,off) with Not_found -> None