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 IN: ui.pens.gradient.tests
   5
   6 {
   7     float-array{
   8         0.0
   9         0.0
  10         0.0
  11         100.0
  12         50.0
  13         0.0
  14         50.0
  15         100.0
  16         100.0
  17         0.0
  18         100.0
  19         100.0
  20     }
  21 } [
  22     { 1 0 } { 100 100 } { COLOR: red COLOR: green COLOR: blue }
  23     gradient-vertices
  24 ] unit-test