You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
29 lines
903 B
29 lines
903 B
(ns reverse-string-test |
|
(:require [clojure.test :refer [deftest is]] |
|
reverse-string)) |
|
|
|
(deftest empty-string-test |
|
(is (= "" (reverse-string/reverse-string "")))) |
|
|
|
(deftest a-letter-test |
|
(is (= "I" (reverse-string/reverse-string "I")))) |
|
|
|
(deftest a-word-test |
|
(is (= "tobor" (reverse-string/reverse-string "robot")))) |
|
|
|
(deftest capitalised-word-test |
|
(is (= "nemaR" (reverse-string/reverse-string "Ramen")))) |
|
|
|
(deftest sentence-with-punctuation-test |
|
(is (= "!yrgnuh m'I" (reverse-string/reverse-string "I'm hungry!")))) |
|
|
|
(deftest palindrome-test |
|
(is (= "racecar" (reverse-string/reverse-string "racecar")))) |
|
|
|
(deftest even-sized-word-test |
|
(is (= "reward" (reverse-string/reverse-string "drawer")))) |
|
|
|
(deftest long-string-test |
|
(let [s (reduce str (repeat 1000 "overflow?")) |
|
rs (reduce str (repeat 1000 "?wolfrevo"))] |
|
(is (= rs (reverse-string/reverse-string s)))))
|
|
|