|
@@ -360,8 +360,7 @@ let rec wait_loop process_params verbose accept =
|
|
) m.m_types;
|
|
) m.m_types;
|
|
TypeloadModule.add_module ctx m p;
|
|
TypeloadModule.add_module ctx m p;
|
|
PMap.iter (Hashtbl.replace com2.resources) m.m_extra.m_binded_res;
|
|
PMap.iter (Hashtbl.replace com2.resources) m.m_extra.m_binded_res;
|
|
- if ctx.Typecore.in_macro || com2.display.dms_full_typing then
|
|
|
|
- PMap.iter (fun _ m2 -> add_modules (tabs ^ " ") m0 m2) m.m_extra.m_deps;
|
|
|
|
|
|
+ PMap.iter (fun _ m2 -> add_modules (tabs ^ " ") m0 m2) m.m_extra.m_deps;
|
|
List.iter (MacroContext.call_init_macro ctx) m.m_extra.m_reuse_macro_calls
|
|
List.iter (MacroContext.call_init_macro ctx) m.m_extra.m_reuse_macro_calls
|
|
)
|
|
)
|
|
end
|
|
end
|