Using of unsafe function (Obj.magic) in module ocamlutil/pretty.ml
[Feature] build current opened file