Add validAsType 'static' typeclass function

2019-03-19 18:00:54 +00:00
parent aaa150091f
commit 9524138c09
2 changed files with 10 additions and 0 deletions
--- a/CHERICap.bsv
+++ b/CHERICap.bsv
@@ -151,6 +151,9 @@ typeclass CHERICap#(type t, numeric type ot, numeric type n)
  // Return the null capability
  function t nullCap;

+  // Check if a type is valid
+  function Bool validAsType (t dummy, Bit#(n) checkType);
+
 endtypeclass

 function Fmt showCHERICap(t cap) provisos (CHERICap#(t, ot, n));