Przeglądaj źródła

arg type inference against coroutine type

Dan Korostelev 4 lat temu
rodzic
commit
4b0beb971e
1 zmienionych plików z 2 dodań i 0 usunięć
  1. 2 0
      src/typing/typer.ml

+ 2 - 0
src/typing/typer.ml

@@ -1202,6 +1202,8 @@ and type_local_function ctx kind f with_type p =
 					| _,TMono _ -> unify ctx rt tr p
 					| _ -> ()
 				end
+			| TAbstract ({ a_path = [],"Coroutine" }, [ft]) ->
+				loop ft
 			| TAbstract(a,tl) ->
 				loop (Abstract.get_underlying_type a tl)
 			| _ -> ())