Explorar el Código

optimized toint R,R and tosfloat R,R

Nicolas Cannasse hace 6 años
padre
commit
527d7c1d4f
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  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) ->