diff options
author | Kjetil Orbekk <kj@orbekk.com> | 2021-11-21 07:22:08 -0500 |
---|---|---|
committer | Kjetil Orbekk <kj@orbekk.com> | 2021-11-21 07:22:08 -0500 |
commit | 9ebec329bf25548f21401f7e3690012845348d29 (patch) | |
tree | 08f1f9a944c34453e3de69870261c3d441f6c74e /exercism/emacs-lisp/two-fer/two-fer-test.el | |
parent | fe12fe16fa5f8bddece8cab225a9bc4a332cfffd (diff) |
exercism elisp exercises
Diffstat (limited to 'exercism/emacs-lisp/two-fer/two-fer-test.el')
-rw-r--r-- | exercism/emacs-lisp/two-fer/two-fer-test.el | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/exercism/emacs-lisp/two-fer/two-fer-test.el b/exercism/emacs-lisp/two-fer/two-fer-test.el new file mode 100644 index 0000000..f21c756 --- /dev/null +++ b/exercism/emacs-lisp/two-fer/two-fer-test.el @@ -0,0 +1,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 |