type struct_decl = {
sd_loc : Camlp4.PreCast.Loc.t;
sd_name : string;
- sd_identifiers : string array;
- sd_fields : ptype array;
+ sd_fields : (string * ptype) array;
}
(** A struct declaration. *)
type union = {
un_loc : Camlp4.PreCast.Loc.t;
un_name : string;
- un_identifiers : string array;
- un_fields : ptype array;
+ un_fields : (string * ptype) array;
}
(** A qualified union declaration. *)