summaryrefslogtreecommitdiff
path: root/exercism/emacs-lisp/acronym/acronym-test.el
blob: 7ca2a962acacc954c36f0ecf33b18e370cf2ef3f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
;;; acronym-test.el --- Tests for Acronym (exercism)

;;; Commentary:

;;; Code

(load-file "acronym.el")

(ert-deftest basic ()
  (should (equal "PNG" (acronym "Portable Network Graphics"))))

(ert-deftest lowercase-words ()
  (should (equal "ROR" (acronym "Ruby on Rails"))))

(ert-deftest punctuation ()
  (should (equal "FIFO" (acronym "First In, First Out"))))

(ert-deftest all-caps-words ()
  (should (equal "PHP" (acronym "PHP: Hypertext Preprocessor"))))

(ert-deftest non-acronym-all-caps-word ()
  (should (equal "GIMP" (acronym "GNU Image Manipulation Program"))))

(ert-deftest hyphenated ()
  (should (equal "CMOS" (acronym "Complementary metal-oxide semiconductor"))))

(provide 'acronym-test)
;;; acronym-test.el ends here