Parcourir la source

[typer] flush PConnectField when loading modules while typing fields

see #9811
Simon Krajewski il y a 5 ans
Parent
commit
12a78f8b8c
1 fichiers modifiés avec 1 ajouts et 1 suppressions
  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 =