From 52f602db7f306441cfa509cee7cce8cf8567ddc1 Mon Sep 17 00:00:00 2001 From: David Monniaux Date: Mon, 1 Feb 2021 16:09:31 +0100 Subject: adding builtins --- riscV/SelectOp.vp | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'riscV/SelectOp.vp') diff --git a/riscV/SelectOp.vp b/riscV/SelectOp.vp index e9920e46..87e3af05 100644 --- a/riscV/SelectOp.vp +++ b/riscV/SelectOp.vp @@ -462,4 +462,7 @@ Definition divfs_base (e1: expr) (e2: expr) := (** Platform-specific known builtins *) Definition platform_builtin (b: platform_builtin) (args: exprlist) : option expr := - None. + match b with + | BI_bits_of_float => Some (Eop Obits_of_single args) + | BI_bits_of_double => Some (Eop Obits_of_float args) + end. \ No newline at end of file -- cgit