diff options
| author | Thomas Bauereiss | 2019-01-29 17:10:32 +0000 |
|---|---|---|
| committer | Thomas Bauereiss | 2019-01-29 17:10:32 +0000 |
| commit | 0b3273e99772d426b8f9843228cf295d7716eea0 (patch) | |
| tree | 885eb38b0b302cf17b7fe803e76e63c684320c27 /lib | |
| parent | 06b4141e3a06aaf74449d062d85cffb68f566b6b (diff) | |
Add a few more type annotations after mono rewrites
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/mono_rewrites.sail | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/mono_rewrites.sail b/lib/mono_rewrites.sail index 93ad3db5..8259ec47 100644 --- a/lib/mono_rewrites.sail +++ b/lib/mono_rewrites.sail @@ -63,7 +63,7 @@ function slice_slice_concat (xs, i, l, ys, i', l') = { extzv(xs) << l' | extzv(ys) } -val slice_zeros_concat : forall 'n 'p 'q 'r, 'r == 'p + 'q & 'n >= 0 & 'p >= 0 & 'q >= 0 & 'r >= 0. +val slice_zeros_concat : forall 'n 'p 'q 'r, 'r == 'p + 'q & 'n >= 0 & /*'p >= 0 & 'q >= 0 &*/ 'r >= 0. (bits('n), int, atom('p), atom('q)) -> bits('r) effect pure function slice_zeros_concat (xs, i, l, l') = { |