Simon Krajewski před 12 roky
rodič
revize
fe56a8d4cd
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  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,(FStatic _ | FInstance _ | FAnon _ | FClosure _ | FDynamic _ | FEnum _ as f)) },e2) ->
+	| TBinop (OpAssign,{ eexpr = TField (e1,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