basis/ui/gadgets/labeled/labeled-tests.factor

   1 USING: accessors colors.constants sequences tools.test
   2 ui.gadgets ui.gadgets.labeled ;
   3 IN: ui.gadgets.labeled.tests
   4
   5 { t } [
   6     <gadget> "Hey" <labeled-gadget> content>> gadget?
   7 ] unit-test