steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

zoneinfo.tests: a few trivial tests, for diagnosing #1513

locals-and-roots
Björn Lindqvist 2016-04-01 02:43:09 +02:00
parent a921e35af3
commit 9a8f35c23b
1 changed files with 16 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
extra/zoneinfo/zoneinfo-tests.factor
View File

@ -1,7 +1,20 @@
! Copyright (C) 2013 Doug Coleman. ! Copyright (C) 2013 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: kernel tools.test zoneinfo ; USING: kernel sequences tools.test zoneinfo ;
IN: zoneinfo.tests IN: zoneinfo.tests
{ t } { t } [ "PST8PDT" find-zone-rules and >boolean ] unit-test
[ "PST8PDT" find-zone-rules and >boolean ] unit-test
{ 13 } [ zoneinfo-paths length ] unit-test
{
T{ raw-zone
{ name "EST" }
{ gmt-offset "-5:00" }
{ rules/save "-" }
{ format "EST" }
{ until { } }
}
} [
"EST" find-zone
] unit-test