Răsfoiți Sursa

handle structures for fopts

Simon Krajewski 12 ani în urmă
părinte
comite
47063368cc
1 a modificat fișierele cu 1 adăugiri și 1 ștergeri
  1. 1 1
      typer.ml

+ 1 - 1
typer.ml

@@ -3275,7 +3275,7 @@ and build_call ctx acc el (with_type:with_type) p =
 		let el , t, e = (match follow e.etype with
 		let el , t, e = (match follow e.etype with
 		| TFun (args,r) ->
 		| TFun (args,r) ->
 			let fopts = (match acc with
 			let fopts = (match acc with
-				| AKExpr {eexpr = TField(e, (FStatic (_,f) | FInstance(_,f)))} ->
+				| AKExpr {eexpr = TField(e, (FStatic (_,f) | FInstance(_,f) | FAnon(f)))} ->
 					fopts e.etype f
 					fopts e.etype f
 				| _ ->
 				| _ ->
 					None
 					None