summaryrefslogtreecommitdiff
path: root/src/gen_lib
diff options
context:
space:
mode:
authorShaked Flur2017-09-03 15:05:23 +0100
committerShaked Flur2017-09-03 15:05:23 +0100
commit75022d46352525305b4c06b4988bf2df15f9f29e (patch)
treeee2f171e2c36dadc3b22d4cadbbf398b7a668531 /src/gen_lib
parent69dbe323ef6a8195465e2662fd447e1853e40866 (diff)
added RISC-V strong-acquire/release
Diffstat (limited to 'src/gen_lib')
-rw-r--r--src/gen_lib/sail_values.lem3
-rw-r--r--src/gen_lib/state.lem2
2 files changed, 5 insertions, 0 deletions
diff --git a/src/gen_lib/sail_values.lem b/src/gen_lib/sail_values.lem
index 49f37381..121f6cc8 100644
--- a/src/gen_lib/sail_values.lem
+++ b/src/gen_lib/sail_values.lem
@@ -956,3 +956,6 @@ let diafp_to_dia reginfo = function
| DIAFP_concrete v -> DIA_concrete_address (address_of_bitv v)
| DIAFP_reg r -> DIA_register (regfp_to_reg reginfo r)
end
+
+let max = uncurry max
+let min = uncurry min
diff --git a/src/gen_lib/state.lem b/src/gen_lib/state.lem
index 2ea1247e..ac5cb869 100644
--- a/src/gen_lib/state.lem
+++ b/src/gen_lib/state.lem
@@ -55,8 +55,10 @@ let is_exclusive = function
| Sail_impl_base.Read_exclusive_acquire -> true
| Sail_impl_base.Read_stream -> false
| Sail_impl_base.Read_RISCV_acquire -> false
+ | Sail_impl_base.Read_RISCV_strong_acquire -> false
| Sail_impl_base.Read_RISCV_reserved -> true
| Sail_impl_base.Read_RISCV_reserved_acquire -> true
+ | Sail_impl_base.Read_RISCV_reserved_strong_acquire -> true
end