duration>hms ( duration -- str )

Vocabulary

calendar.format

Inputs

duration

an object

Outputs

str

an object

Definition

USING: calendar kernel math sequences ;

IN: calendar.format

: duration>hms ( duration -- str )
    [ duration>hm ] [ duration>seconds >integer 60 mod pad-00 ]
    bi ":" glue ;