timeval>seconds ( timeval -- seconds )


Vocabulary
calendar.unix

Inputs
timevalan object


Outputs
secondsan object


Definition
USING: accessors kernel math ;

IN: calendar.unix

: timeval>seconds ( timeval -- seconds )
[ sec>> ] [ usec>> 1000000 / ] bi + ; inline