|
@@ -1043,9 +1043,9 @@ try
|
|
] in
|
|
] in
|
|
List.iter (Codegen.post_process filters) com.types;
|
|
List.iter (Codegen.post_process filters) com.types;
|
|
Codegen.post_process_end();
|
|
Codegen.post_process_end();
|
|
|
|
+ List.iter (fun f -> f()) (List.rev com.filters);
|
|
List.iter (Codegen.save_class_state tctx) com.types;
|
|
List.iter (Codegen.save_class_state tctx) com.types;
|
|
if Common.defined ctx.com "dce" && not !interp then Dce.run tctx main;
|
|
if Common.defined ctx.com "dce" && not !interp then Dce.run tctx main;
|
|
- List.iter (fun f -> f()) (List.rev com.filters);
|
|
|
|
let type_filters = [
|
|
let type_filters = [
|
|
Codegen.check_private_path;
|
|
Codegen.check_private_path;
|
|
Codegen.remove_generic_base;
|
|
Codegen.remove_generic_base;
|