summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/vector_dec.sail7
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/vector_dec.sail b/lib/vector_dec.sail
index 909f3898..dce6fb8a 100644
--- a/lib/vector_dec.sail
+++ b/lib/vector_dec.sail
@@ -38,6 +38,13 @@ val vector_length = {
overload length = {bitvector_length, vector_length}
val count_leading_zeros = "count_leading_zeros" : forall 'N , 'N >= 1. bits('N) -> {'n, 0 <= 'n <= 'N . atom('n)}
+/*
+function count_leading_zeros x = {
+ foreach (i from ('N - 1) to 0 by 1 in dec)
+ if [x[i]] == 0b1 then return 'N - i - 1;
+ return 'N;
+}
+*/
val "print_bits" : forall 'n. (string, bits('n)) -> unit