basis/ui/pens/gradient/gradient-tests.factor

   1 USING: tools.test ui.pens.gradient ui.pens.gradient.private
   2 colors.constants specialized-arrays alien.c-types ;
   3 SPECIALIZED-ARRAY: float
   4
   5 {
   6     float-array{
   7         0.0
   8         0.0
   9         0.0
  10         100.0
  11         50.0
  12         0.0
  13         50.0
  14         100.0
  15         100.0
  16         0.0
  17         100.0
  18         100.0
  19     }
  20 } [
  21     { 1 0 } { 100 100 } { COLOR: red COLOR: green COLOR: blue }
  22     gradient-vertices
  23 ] unit-test