blob: f21c756aed433576debaa7b2ca5dc03dbe4de1b3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
;;; two-fer-test.el --- Tests for Two-fer (exercism)
;;; Commentary:
;; Common test data version: 1.2.0 4fc1acb
;;; Code:
(load-file "two-fer.el")
(ert-deftest no-name-given ()
(should (string= (two-fer) "One for you, one for me.")))
(ert-deftest a-name-given ()
(should (string= (two-fer "Alice") "One for Alice, one for me.")))
(ert-deftest another-name-given ()
(should (string= (two-fer "Bob") "One for Bob, one for me.")))
(provide 'two-fer-test)
;;; two-fer-test.el ends here
|
