|
@@ -636,6 +636,7 @@ and flush_macro_context mint mctx =
|
|
FiltersCommon.remove_generic_base;
|
|
FiltersCommon.remove_generic_base;
|
|
Exceptions.patch_constructors mctx;
|
|
Exceptions.patch_constructors mctx;
|
|
(fun mt -> AddFieldInits.add_field_inits mctx.c.curclass.cl_path (RenameVars.init mctx.com) mctx.com mt);
|
|
(fun mt -> AddFieldInits.add_field_inits mctx.c.curclass.cl_path (RenameVars.init mctx.com) mctx.com mt);
|
|
|
|
+ Filters.update_cache_dependencies mctx.com;
|
|
minimal_restore;
|
|
minimal_restore;
|
|
] in
|
|
] in
|
|
let ready = fun t ->
|
|
let ready = fun t ->
|