simon/milkwood-clj
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Yet more polishing and primping. Added function top-and-tail, which

Browse source 
seeks to ensure that if possible the output starts at the beginning
of a sentence and ends at the end of one.
This commit is contained in:
Simon Brooke 2013-11-09 15:04:22 +00:00
parent 953259b379
commit fd36f8e1ca
3 changed files with 83 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

9
test/milkwood_clj/synthesise_test.clj Normal file
View file

@ -0,0 +1,9 @@
(ns milkwood-clj.synthesise-test
(:require [clojure.test :refer :all]
[milkwood-clj.synthesise :refer :all]))
(deftest top-and-tail-test
(testing "Test top and tailing of output"
(is (= (top-and-tail '("a" "b" "c" "?" "d" "e" "f" "." "g" "h" "i" "!")) '("d" "e" "f" "." "g" "h" "i" "!")))
(is (= (top-and-tail '("a" "b" "c" "?" "d" "e" "f" "." "g" "h" "i")) '("d" "e" "f" ".")))
))