(cookie-string>timestamp-2) ( -- timestamp )
Vocabulary
calendar.format
Definition
USING:
accessors
calendar
io
kernel
math
sequences
;
IN:
calendar.format
:
(cookie-string>timestamp-2)
( -- timestamp )
timestamp
new
read-sp
check-day-name
read-sp
month-abbreviations
index
1
+
check-timestamp
>>month
read-sp
checked-number
>>day
":"
read-token
checked-number
>>hour
":"
read-token
checked-number
>>minute
" "
read-token
checked-number
>>second
read-sp
checked-number
>>year
readln
parse-rfc822-gmt-offset
>>gmt-offset
;