From b7e0d70de2ace6f0a22f9f65cc244d875ee48496 Mon Sep 17 00:00:00 2001 From: Xavier Leroy Date: Sat, 1 Jun 2019 08:48:20 +0200 Subject: ARM: select is not supported at type Tlong --- backend/Selectionaux.ml | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'backend/Selectionaux.ml') diff --git a/backend/Selectionaux.ml b/backend/Selectionaux.ml index 1b92f5fe..52ddd799 100644 --- a/backend/Selectionaux.ml +++ b/backend/Selectionaux.ml @@ -68,9 +68,10 @@ let rec cost_expr = function let fast_cmove ty = match Configuration.arch, Configuration.model with - | "arm", _ -> true + | "arm", _ -> + (match ty with Tint | Tfloat | Tsingle -> true | _ -> false) | "powerpc", "e5500" -> - (match ty with Tint -> true | Tlong -> true | _ -> false) + (match ty with Tint | Tlong -> true | _ -> false) | "powerpc", _ -> false | "riscV", _ -> false | "x86", _ -> -- cgit