diff options
Diffstat (limited to 'test/ocaml/reg_ref')
| -rw-r--r-- | test/ocaml/reg_ref/rr.sail | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/ocaml/reg_ref/rr.sail b/test/ocaml/reg_ref/rr.sail index 3c11dcb8..f6d40a08 100644 --- a/test/ocaml/reg_ref/rr.sail +++ b/test/ocaml/reg_ref/rr.sail @@ -47,7 +47,7 @@ val vector_slice : forall 'n 'm 'o, 0 <= 'm <= 'o <= 'n. function vector_slice (v, to, from) = MkSlice(from, v[to .. from]) -val slice_slice : forall 'n 'm 'o 'p. +val slice_slice : forall 'n 'm 'o 'p, 'm <= 'o & 'o - 'p <= 'n. (slice('p, 'n), atom('o), atom('m)) -> slice('m, 'o - ('m - 1)) function slice_slice (MkSlice(start, v), to, from) = MkSlice(from, v[to - start .. from - start]) |