basis/specialized-arrays/direct/direct-tests.factor

   1 IN: specialized-arrays.direct.tests
   2 USING: specialized-arrays.direct.ushort tools.test
   3 specialized-arrays.ushort alien.syntax sequences ;
   4
   5 [ ushort-array{ 0 0 0 } ] [
   6     3 ALIEN: 123 100 <direct-ushort-array> new-sequence
   7 ] unit-test