浏览代码

[gencommon] minor Codegen usage

Dan Korostelev 9 年之前
父节点
当前提交
98a0c7143b
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      src/generators/gencommon.ml

+ 1 - 1
src/generators/gencommon.ml

@@ -8403,7 +8403,7 @@ struct
 						f
 					in
 					let cond_array = { (mk_field_access gen f "params" f.epos) with etype = gen.gclasses.nativearray t_dynamic } in
-					{ e with eexpr = TArray(cond_array, ExprBuilder.make_int gen.gcon i cond_array.epos); }
+					Codegen.index gen.gcon cond_array i e.etype e.epos
 				| _ ->
 					Type.map_expr run e
 			in