summaryrefslogtreecommitdiff
path: root/tests/test_printer.ml
diff options
context:
space:
mode:
authorStephane Glondu <steph@glondu.net>2015-05-18 17:29:08 +0200
committerStephane Glondu <steph@glondu.net>2015-05-18 17:29:08 +0200
commit90ee23cb84d7a394d7fe97f5c153079c6a06c351 (patch)
tree43be1208ac172171c94eaa0da44fb2f97324f014 /tests/test_printer.ml
parentcdfdfce5f08e397577ff78f20cd8f86e366fdff7 (diff)
Imported Upstream version 2.04
Diffstat (limited to 'tests/test_printer.ml')
-rw-r--r--tests/test_printer.ml8
1 files changed, 6 insertions, 2 deletions
diff --git a/tests/test_printer.ml b/tests/test_printer.ml
index e6d1b47..fd4768f 100644
--- a/tests/test_printer.ml
+++ b/tests/test_printer.ml
@@ -20,8 +20,6 @@
(* LICENSE. *)
(**************************************************************************)
-(*i $Id: test_printer.ml 249 2012-06-27 08:11:14Z signoles $ i*)
-
Printf.printf "Tests of Printer:\n";;
open CalendarLib;;
@@ -115,6 +113,12 @@ test
test (sprint "%s" (Calendar.make 1971 1 1 0 0 0) = "31536000")
"sprint %s";;
+test (Utils.Float.equal
+ (Ftime.second
+ (Printer.Ftime.from_fstring
+ "%Y-%m-%dT%H:%M:%S%:z" "2014-03-19T15:51:25.05-07:00"))
+ 25.05)
+ "from_string with floating seconds";;
let ok = nb_ok ();;
let bug = nb_bug ();;