basis/xmode/catalog/catalog-tests.factor

   1 IN: xmode.catalog.tests
   2 USING: xmode.catalog tools.test hashtables assocs
   3 kernel sequences io ;
   4
   5 { t } [ modes hashtable? ] unit-test
   6
   7 { } [
   8     modes keys [
   9         dup print flush load-mode drop reset-modes
  10     ] each
  11 ] unit-test