let pp_descr fmt f = Format.fprintf fmt "@[<hov 0>@[<hov 2>%s %s {@ ... ;@ %a %s ;@ ...@]@ }@]" (if f.fcomp.cstruct then "struct" else "union") f.fcomp.cname !Ast_printer.d_type f.ftype f.fname