Simon Brooke
fd36f8e1ca
seeks to ensure that if possible the output starts at the beginning of a sentence and ends at the end of one.
10 lines
411 B
Clojure
10 lines
411 B
Clojure
(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" ".")))
|
|
))
|