Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-22 12:57:34 +00:00
Code Issues Projects Releases Packages Wiki Activity

Add some commented-out tests for iso8601

Browse source
This commit is contained in:
Lars Ingebrigtsen 2019-09-29 13:04:01 +02:00
parent 96636a8e1f
commit 9767bd2b78
1 changed files with 19 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

26
test/lisp/calendar/iso8601-tests.el
View file

@ -153,13 +153,25 @@
(should (equal (iso8601-parse-time "15")
'(0 0 15 nil nil nil nil nil nil))))
(ert-deftest standard-test-time-of-day-fractions ()
;; decoded-time doesn't support sub-second times.
;; (should (equal (iso8601-parse-time "152735,5")
;; '(46 27 15 nil nil nil nil nil nil)))
;; (should (equal (iso8601-parse-time "15:27:35,5")
;; '(46 27 15 nil nil nil nil nil nil)))
)
;; Not implemented yet.
;; (ert-deftest standard-test-time-of-day-fractions ()
;; (should (equal (iso8601-parse-time "152735,5")
;; '(46 27 15 nil nil nil nil nil nil)))
;; (should (equal (iso8601-parse-time "15:27:35,5")
;; '(46 27 15 nil nil nil nil nil nil)))
;; (should (equal (iso8601-parse-time "2320,8")
;; '(46 27 15 nil nil nil nil nil nil)))
;; (should (equal (iso8601-parse-time "23:20,8")
;; '(46 27 15 nil nil nil nil nil nil)))
;; (should (equal (iso8601-parse-time "23,3")
;; '(46 27 15 nil nil nil nil nil nil))))
;; (ert-deftest nonstandard-test-time-of-day-decimals ()
;; (should (equal (iso8601-parse-time "15:27:35.123")
;; '(46 27 15 nil nil nil nil nil nil))))
(ert-deftest standard-test-time-of-day-beginning-of-day ()
(should (equal (iso8601-parse-time "000000")