diff options
Diffstat (limited to 'lib/mono_rewrites.sail')
| -rw-r--r-- | lib/mono_rewrites.sail | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/mono_rewrites.sail b/lib/mono_rewrites.sail index 90d74149..9e4010a0 100644 --- a/lib/mono_rewrites.sail +++ b/lib/mono_rewrites.sail @@ -119,9 +119,9 @@ function place_slice(m,xs,i,l,shift) = { } val set_slice_zeros : forall 'n, 'n >= 0. - (atom('n), int, bits('n), int) -> bits('n) effect pure + (atom('n), bits('n), int, int) -> bits('n) effect pure -function set_slice_zeros(n, i, xs, l) = { +function set_slice_zeros(n, xs, i, l) = { let ys : bits('n) = slice_mask(n, i, l) in xs & ~(ys) } |