Procházet zdrojové kódy

[typer] flush PConnectField when loading modules while typing fields

see #9811
Simon Krajewski před 5 roky
rodič
revize
12a78f8b8c
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  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 =