From 16715e5efd6ce899eb3d544fd71751f367eaa370 Mon Sep 17 00:00:00 2001 From: David Monniaux Date: Fri, 11 Feb 2022 21:36:57 +0100 Subject: modulos --- kvx/SelectOp.vp | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'kvx/SelectOp.vp') diff --git a/kvx/SelectOp.vp b/kvx/SelectOp.vp index 72a6e4b3..089afe1d 100644 --- a/kvx/SelectOp.vp +++ b/kvx/SelectOp.vp @@ -762,6 +762,14 @@ Definition platform_builtin (b: platform_builtin) (args: exprlist) : option expr | a:::b:::Enil => Some (FPDivision64.fp_divu64 a b) | _ => None end) + | BI_fp_umod32 => (match args with + | a:::b:::Enil => Some (FPDivision32.fp_modu32 a b) + | _ => None + end) + | BI_fp_umod64 => (match args with + | a:::b:::Enil => Some (FPDivision64.fp_modu64 a b) + | _ => None + end) end. End SELECT. -- cgit