Experimental automated 'follower' code.

[virt-mem.git] / extract / codegen / struct_classify.mli

diff --git a/extract/codegen/struct_classify.mli b/extract/codegen/struct_classify.mli
index 23508d7..b0cd5da 100644 (file)
--- a/extract/codegen/struct_classify.mli
+++ b/extract/codegen/struct_classify.mli
@@ -107,14 +107,14 @@ val classify_field : string list -> Pahole_parser.f_type -> f_class
 type shape_field_struct = {
   sf_i : int;                          (** Unique number. *)
   sf_name : string;                    (** Structure name in output. *)
-  sf_fields : Pahole_parser.field list;        (** Shape fields. *)
+  sf_fields : (string * Pahole_parser.f_type) list; (** Shape fields. *)
 }
     (** The type of a shape field structure. *)
 
 and content_field_struct = {
   cf_i : int;                          (** Unique number. *)
   cf_name : string;                    (** Structure name in output. *)
-  cf_fields : Pahole_parser.field list; (** Content fields. *)
+  cf_fields : (string * Pahole_parser.f_type) list; (** Content fields. *)
 }
     (** The type of a content field structure. *)