aboutsummaryrefslogtreecommitdiffstats
path: root/src/common
diff options
context:
space:
mode:
authorMichalis Pardalos <m.pardalos@gmail.com>2021-05-01 21:06:44 +0100
committerMichalis Pardalos <m.pardalos@gmail.com>2021-05-01 21:06:44 +0100
commitb8107dbffc3c9a27b7beb4014883a55102389a29 (patch)
tree1180b1b535f0d0e39d565827f53f1ad78d2fa4ae /src/common
parent6adade469bb17233e2526765d833ff870daf5d67 (diff)
downloadvericert-b8107dbffc3c9a27b7beb4014883a55102389a29.tar.gz
vericert-b8107dbffc3c9a27b7beb4014883a55102389a29.zip
Handle declarations of externctrl regs in Verilog
Diffstat (limited to 'src/common')
-rw-r--r--src/common/Maps.v7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/common/Maps.v b/src/common/Maps.v
index 2db5114..21a1d9e 100644
--- a/src/common/Maps.v
+++ b/src/common/Maps.v
@@ -88,4 +88,11 @@ Proof.
- reflexivity.
Qed.
+Definition contains (A: Type) (i: positive) (m: t A) : bool :=
+ match get i m with
+ | Some _ => true
+ | None => false
+ end.
+
+
End PTree.