add some date tests

1 files changed, 13 insertions, 0 deletions

diff --git a/tests/it.t b/tests/it.t
index 0fa84f2..900641c 100755
--- a/tests/it.t
+++ b/tests/it.t
@@ -216,4 +216,17 @@ is(
 	array('b', 'a'),
 	"reorder with given key order");
 
+# it::date tests
+
+is(it::date('date', '2011-10-25'), '25.10.2011', 'parse date string with strtotime');
+is(it::date('date', '2011-10-25 + 3 days'), '28.10.2011', 'some date arithmetic');
+is(it::date('datetime', time()), it::date('datetime'), 'recognize int as timestamp');
+is(it::date('datetime', time()*1.0), it::date('datetime'), 'recognize float as timestamp');
+is(it::date('datetime', time() . ''), it::date('datetime'), 'recognize digit string as timestamp');
+is(it::date('datetime', 10), it::date('datetime', "10"), 'numeric and string give same result');
+is(it::date('datetime', 10.5), it::date('datetime', "10.5"), '... with one digit after point');
+is(it::date('datetime', 10.56), it::date('datetime', "10.56"), '... with two digits after point');
+is(it::date('datetime', 1000000), it::date('datetime', "1000000"), '... large nummer');
+is(it::date('datetime', 1000000.543), it::date('datetime', "1000000.543"), '... large nummer and point');
+
 ?>