<timestamp> ( $year $month $day $hour $minute $second $gmt-offset -- timestamp )

Vocabulary

calendar

Inputs

$year	an object
$month	an object
$day	an object
$hour	an object
$minute	an object
$second	an object
$gmt-offset	an object

Outputs

timestamp

an object

Definition

USING: kernel math.intervals ;

IN: calendar

:: <timestamp>
    ( $year $month $day $hour $minute $second $gmt-offset -- timestamp )
    $year $month 1 12 [a,b] check-interval
    $day 1 $year $month (days-in-month) [a,b] check-interval
    $hour 0 23 [a,b] check-interval $minute 0 59 [a,b]
    check-interval $second 0 60 [a,b) check-interval
    $gmt-offset timestamp boa ;