2
0
Эх сурвалжийг харах

[cs] Revert partial handling of get_Item types

Cauê Waneck 9 жил өмнө
parent
commit
29422dd8d4

+ 2 - 8
src/generators/gencs.ml

@@ -1236,12 +1236,6 @@ let configure gen =
 		List.rev !ret
 	in
 
-	let field_hxgen f = match f with
-		| FInstance(c,_,_) | FStatic(c,_) ->
-			is_hxgen (TClassDecl c)
-		| _ -> true (* dynamic, etc will be considered hxgen *)
-	in
-
 	let expr_s w e =
 		last_line := -1;
 		in_value := false;
@@ -1249,7 +1243,7 @@ let configure gen =
 			let was_in_value = !in_value in
 			in_value := true;
 			(match e.eexpr with
-				| TCall({ eexpr = TField(ef,f) }, (_ :: _ as args) ) when field_hxgen f && (field_name f) = "get_Item" ->
+				| TCall({ eexpr = TField(ef,f) }, (_ :: _ as args) ) when (field_name f) = "get_Item" ->
 					expr_s w ef;
 					write w "[";
 					let first = ref true in
@@ -1258,7 +1252,7 @@ let configure gen =
 						expr_s w f
 					) args;
 					write w "]"
-				| TCall({ eexpr = TField(ef,f) }, (_ :: _ :: _ as args) ) when field_hxgen f && (field_name f) = "set_Item" ->
+				| TCall({ eexpr = TField(ef,f) }, (_ :: _ :: _ as args) ) when (field_name f) = "set_Item" ->
 					expr_s w ef;
 					write w "[";
 					let args, value = match List.rev args with