core/system/system-tests.factor

   1 USING: arrays sequences system tools.test ;
   2
   3 { { t t t } } [
   4     version-info
   5     vm-version vm-compiler vm-compile-time 3array
   6     [ find-subseq? ] with map
   7 ] unit-test