Explorar o código

fixed Int...UInt (fixed issue #221)

Nicolas Cannasse %!s(int64=14) %!d(string=hai) anos
pai
achega
a4281d96b7
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      optimizer.ml

+ 1 - 1
optimizer.ml

@@ -248,7 +248,7 @@ let optimize_for_loop ctx i e1 e2 p =
 			lblock [
 				mk (TVars [tmp,t_int,Some i1]) t_void p;
 				mk (TWhile (
-					mk (TBinop (OpLt, etmp, i2)) ctx.t.tbool p,
+					mk (TBinop (OpLt, etmp, { i2 with etype = t_int })) ctx.t.tbool p,
 					block,
 					NormalWhile
 				)) t_void p;