5 lines
125 B
Factor
5 lines
125 B
Factor
|
IN: ui.gadgets.canvas.tests
|
||
|
|
USING: ui.gadgets.canvas tools.test kernel ;
|
||
|
|
|
||
|
|
{ 1 0 } [ [ drop ] draw-canvas ] must-infer-as
|