basis/specialized-vectors/specialized-vectors-tests.factor

   1 IN: specialized-vectors.tests
   2 USING: specialized-arrays specialized-vectors
   3 tools.test kernel sequences ;
   4 SPECIALIZED-ARRAY: float
   5 SPECIALIZED-VECTOR: float
   6 SPECIALIZED-VECTOR: double
   7
   8 [ 3 ] [ double-vector{ 1 2 } 3 over push length ] unit-test
   9
  10 [ t ] [ 10 float-array{ } new-resizable float-vector? ] unit-test