extra/benchmark/regex-dna/regex-dna-tests.factor

   1 USING: benchmark.regex-dna io io.files io.encodings.ascii
   2 io.streams.string kernel tools.test splitting ;
   3
   4 { t } [
   5     "resource:extra/benchmark/regex-dna/regex-dna-test-in.txt"
   6     [ regex-dna ] with-string-writer
   7     "resource:extra/benchmark/regex-dna/regex-dna-test-out.txt"
   8     ascii file-contents =
   9 ] unit-test