make a test portable

original commit: 86b384b5ed2e1cde6c61abe50db5b606e8841cfc
This commit is contained in:
Matthew Flatt 2020-01-20 15:00:45 -07:00
parent 94fee207a1
commit 5a01e2c589

View File

@ -1317,7 +1317,9 @@
(error? (stencil-vector 0 'apple))
(error? (stencil-vector 3 'apple))
(error? (stencil-vector 3 'apple))
(error? (stencil-vector (expt 2 (stencil-vector-mask-width)) 'a))
(<= (stencil-vector-mask-width) 58) ; so the next test reports the same error on all platforms
(error? (stencil-vector (expt 2 58) 'a))
(error? (stencil-vector-length 3))
(error? (stencil-vector-mask 3))