X-Git-Url: http://git.annexia.org/?p=virt-mem.git;a=blobdiff_plain;f=extract%2Fcodegen%2Fstruct_classify.ml;fp=extract%2Fcodegen%2Fstruct_classify.ml;h=d10d1c487a2ec8466b9174964f8c1c4990783d76;hp=506d783e0986b3bcde2794ce0967b1bde04c2f6d;hb=9a4e42524fac9afd50fca18f2124f6df91716d4c;hpb=93676d33e7b96b18baab8fdc82ad4ef76d720620

diff --git a/extract/codegen/struct_classify.ml b/extract/codegen/struct_classify.ml
index 506d783..d10d1c4 100644
--- a/extract/codegen/struct_classify.ml
+++ b/extract/codegen/struct_classify.ml
@@ -58,6 +58,10 @@ and parser_ = {
   pa_content_field_struct : content_field_struct;
 }
 
+and sfhash = (string, shape_field_struct) Hashtbl.t
+and cfhash = (string, content_field_struct) Hashtbl.t
+and pahash = (string, parser_) Hashtbl.t
+
 let endian_of_architecture arch =
   if String.starts_with arch "i386" ||
     String.starts_with arch "i486" ||