diff options
Diffstat (limited to 'tests/017')
| -rw-r--r-- | tests/017/mmap.tl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/017/mmap.tl b/tests/017/mmap.tl index 818540a5..639e256c 100644 --- a/tests/017/mmap.tl +++ b/tests/017/mmap.tl @@ -27,7 +27,8 @@ (assert (plusp page-size)) -(let* ((mk-rnd-buf (opip (expt 256 page-size) rand buf-uint)) +(let* ((buf-mod (trunc (expt 256 page-size) 2)) + (mk-rnd-buf (ret (flow buf-mod rand (+ buf-mod) buf-uint))) (rndbuf0 [mk-rnd-buf]) (rndbuf1 [mk-rnd-buf]) (fname "rand.bin")) |