Sfoglia il codice sorgente

[typer] flush PConnectField when loading modules while typing fields

see #9811
Simon Krajewski 5 anni fa
parent
commit
12a78f8b8c
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      src/typing/typeloadModule.ml

+ 1 - 1
src/typing/typeloadModule.ml

@@ -1096,7 +1096,7 @@ let load_module ctx m p =
 				raise (Forbid_package (inf,p::pl,pf))
 	) in
 	add_dependency ctx.m.curmod m2;
-	if ctx.pass = PTypeField then flush_pass ctx PBuildClass "load_module";
+	if ctx.pass = PTypeField then flush_pass ctx PConnectField "load_module";
 	m2
 
 (* let load_module ctx m p =