set-time ( timestamp hour minute second -- timestamp )

Vocabulary

calendar

Inputs

timestamp	an object
hour	an object
minute	an object
second	an object

Outputs

timestamp

an object

Definition

USING: accessors kernel ;

IN: calendar

: set-time ( timestamp hour minute second -- timestamp )
    [ >>hour ] [ >>minute ] [ >>second ] tri* ;