let pp_descr fmt x =
    Format.fprintf fmt "%a %a ;"
      (pp_ctype true) x.vtype !Ast_printer.d_var x