瀏覽代碼

optimized toint R,R and tosfloat R,R

Nicolas Cannasse 6 年之前
父節點
當前提交
527d7c1d4f
共有 1 個文件被更改,包括 1 次插入1 次删除
  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) ->