diff options
Diffstat (limited to 'backend/Selectionaux.ml')
-rw-r--r-- | backend/Selectionaux.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/backend/Selectionaux.ml b/backend/Selectionaux.ml index 26a79fd7..fcf8e238 100644 --- a/backend/Selectionaux.ml +++ b/backend/Selectionaux.ml @@ -39,6 +39,7 @@ let cost_unop = function | Osingleoflong | Osingleoflongu -> assert false let cost_binop = function + | Oexpect _ -> 0 | Oadd | Osub -> 1 | Omul -> 2 | Odiv | Odivu | Omod | Omodu -> assert false @@ -78,7 +79,7 @@ let fast_cmove ty = | "riscV", _ -> false | "x86", _ -> (match ty with Tint -> true | Tlong -> Archi.ptr64 | _ -> false) - | "mppa_k1c", _ -> true + | "kvx", _ -> true | a, m -> failwith (Printf.sprintf "fast_cmove: unknown arch %s %s" a m) (* The if-conversion heuristic depend on the |