Răsfoiți Sursa

optimized toint R,R and tosfloat R,R

Nicolas Cannasse 6 ani în urmă
părinte
comite
527d7c1d4f
1 a modificat fișierele cu 1 adăugiri și 1 ștergeri
  1. 1 1
      src/generators/hlopt.ml

+ 1 - 1
src/generators/hlopt.ml

@@ -625,7 +625,7 @@ let optimize dump get_str (f:fundecl) =
 			) (fun w ->	w) op in
 			set_op i op;
 			(match op with
-			| OMov (d, v) when d = v ->
+			| OMov (d, v) | OToInt (d, v) | OToSFloat (d,v) when d = v ->
 				add_reg_moved i d v;
 				set_nop i "mov"
 			| OMov (d, v) ->