2009-10-08 14:10:51 -04:00
|
|
|
! Copyright (C) 2009 Daniel Ehrenberg
|
|
|
|
|
! See http://factorcode.org/license.txt for BSD license.
|
2016-03-30 23:04:14 -04:00
|
|
|
USING: classes.struct.bit-accessors effects random stack-checker
|
|
|
|
|
tools.test ;
|
2009-10-08 14:10:51 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ t } [ 20 random 20 random bit-reader infer ( alien -- n ) effect= ] unit-test
|
|
|
|
|
{ t } [ 20 random 20 random bit-writer infer ( n alien -- ) effect= ] unit-test
|
