summaryrefslogtreecommitdiff
path: root/exercism/emacs-lisp/acronym/acronym-test.el
diff options
context:
space:
mode:
Diffstat (limited to 'exercism/emacs-lisp/acronym/acronym-test.el')
-rw-r--r--exercism/emacs-lisp/acronym/acronym-test.el28
1 files changed, 28 insertions, 0 deletions
diff --git a/exercism/emacs-lisp/acronym/acronym-test.el b/exercism/emacs-lisp/acronym/acronym-test.el
new file mode 100644
index 0000000..7ca2a96
--- /dev/null
+++ b/exercism/emacs-lisp/acronym/acronym-test.el
@@ -0,0 +1,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