]> gitweb.factorcode.org Git - factor.git/blob - core/layouts/layouts-tests.factor
Fix permission bits
[factor.git] / core / layouts / layouts-tests.factor
1 IN: system.tests\r
2 USING: layouts math tools.test ;\r
3 \r
4 [ t ] [ cell integer? ] unit-test\r
5 [ t ] [ bootstrap-cell integer? ] unit-test\r
6 \r
7 ! Smoke test\r
8 [ t ] [ max-array-capacity cell-bits 2^ < ] unit-test\r