end-of-second ( timestamp -- timestamp' )

Vocabulary

calendar

Inputs

timestamp

an object

Outputs

timestamp'

an object

Definition

USING: accessors kernel math math.functions ;

IN: calendar

: end-of-second ( timestamp -- timestamp' )
    clone [ floor 999/1000 + ] change-second ;