dwrz/exercism
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add elisp/roman-numerals

Browse Source
This commit is contained in:
dwrz
2019-02-08 00:24:07 +00:00
parent 782b624edd
commit 4e626ce825
3 changed files with 125 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
elisp/roman-numerals/roman-numerals-test.el
+30
View File
@@ -0,0 +1,30 @@
;;; roman-numerals-test.el --- Tests for roman-numerals (exercism)
;;; Commentary:
;;; Code:
(load-file "roman-numerals.el")
(ert-deftest roman-numerals-test ()
(should (equal (to-roman 1) "I"))
(should (equal (to-roman 2) "II"))
(should (equal (to-roman 3) "III"))
(should (equal (to-roman 4) "IV"))
(should (equal (to-roman 5) "V"))
(should (equal (to-roman 6) "VI"))
(should (equal (to-roman 9) "IX"))
(should (equal (to-roman 27) "XXVII"))
(should (equal (to-roman 48) "XLVIII"))
(should (equal (to-roman 59) "LIX"))
(should (equal (to-roman 93) "XCIII"))
(should (equal (to-roman 141) "CXLI"))
(should (equal (to-roman 163) "CLXIII"))
(should (equal (to-roman 402) "CDII"))
(should (equal (to-roman 575) "DLXXV"))
(should (equal (to-roman 911) "CMXI"))
(should (equal (to-roman 1024) "MXXIV"))
(should (equal (to-roman 3000) "MMM")))
(provide 'roman-numerals)
;;; roman-numerals-test.el ends here