Sfoglia il codice sorgente

FEnumParameter bugfix

Simon Krajewski 12 anni fa
parent
commit
6917659245
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      genneko.ml

+ 1 - 1
genneko.ml

@@ -225,7 +225,7 @@ and gen_expr ctx e =
 			ident p v.v_name
 	| TArray (e1,e2) ->
 		(EArray (gen_expr ctx e1,gen_expr ctx e2),p)
-	| TBinop (OpAssign,{ eexpr = TField (e1,f) },e2) ->
+	| TBinop (OpAssign,{ eexpr = TField (e1,(FStatic _ | FInstance _ | FAnon _ | FClosure _ | FDynamic _ | FEnum _ as f)) },e2) ->
 		(EBinop ("=",field p (gen_expr ctx e1) (field_name f),gen_expr ctx e2),p)
 	| TBinop (op,e1,e2) ->
 		gen_binop ctx p op e1 e2