From 904b625c79b8f96d758a880918cdf6901d2b9ebf Mon Sep 17 00:00:00 2001
From: Brian Campbell
Date: Tue, 17 Jul 2018 15:02:12 +0100
Subject: Coq: integer shifts

---
 lib/coq/Sail2_values.v | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'lib')

diff --git a/lib/coq/Sail2_values.v b/lib/coq/Sail2_values.v
index 63cf7542..0c806222 100644
--- a/lib/coq/Sail2_values.v
+++ b/lib/coq/Sail2_values.v
@@ -119,6 +119,9 @@ Definition print_int (_ : string) (_ : Z) : unit := tt.
 Definition prerr_int (_ : string) (_ : Z) : unit := tt.
 Definition putchar (_ : Z) : unit := tt.
 
+Definition shl_int := Z.shiftl.
+Definition shr_int := Z.shiftr.
+
 (*
 Definition or_bool l r := (l || r)
 Definition and_bool l r := (l && r)
-- 
cgit v1.2.3