@@ -551,6 +551,11 @@ let create_field_context (ctx,cctx) c cff =
let ctx = {
ctx with
pass = PBuildClass; (* will be set later to PTypeExpr *)
+ locals = PMap.empty;
+ opened = [];
+ monomorphs = {
+ perfunction = [];
+ };
} in
let display_modifier = Typeload.check_field_access ctx cff in
let is_static = List.mem_assoc AStatic cff.cff_access in