2008-03-19 20:15:32 -04:00
|
|
|
USING: calendar.format calendar kernel tools.test
|
|
|
|
|
io.streams.string ;
|
2008-03-01 17:00:45 -05:00
|
|
|
IN: calendar.format.tests
|
2008-02-26 18:22:48 -05:00
|
|
|
|
|
|
|
|
[ 0 ] [
|
|
|
|
|
"Z" [ read-rfc3339-gmt-offset ] with-string-reader
|
|
|
|
|
] unit-test
|
|
|
|
|
|
|
|
|
|
[ 1 ] [
|
|
|
|
|
"+01" [ read-rfc3339-gmt-offset ] with-string-reader
|
|
|
|
|
] unit-test
|
|
|
|
|
|
|
|
|
|
[ -1 ] [
|
|
|
|
|
"-01" [ read-rfc3339-gmt-offset ] with-string-reader
|
|
|
|
|
] unit-test
|
|
|
|
|
|
|
|
|
|
[ -1-1/2 ] [
|
|
|
|
|
"-01:30" [ read-rfc3339-gmt-offset ] with-string-reader
|
|
|
|
|
] unit-test
|
|
|
|
|
|
|
|
|
|
[ 1+1/2 ] [
|
|
|
|
|
"+01:30" [ read-rfc3339-gmt-offset ] with-string-reader
|
|
|
|
|
] unit-test
|
2008-03-19 20:15:32 -04:00
|
|
|
|
|
|
|
|
[ ] [ now timestamp>rfc3339 drop ] unit-test
|
|
|
|
|
[ ] [ now timestamp>rfc822 drop ] unit-test
|
