foss-mmo/modules/game/time.scm

7 lines
170 B
Scheme
Raw Normal View History

2024-05-25 06:52:59 -04:00
(define-module (game time)
#:use-module (scheme time)
#:export (current-time*))
(define (current-time*)
(/ (exact->inexact (current-jiffy)) (jiffies-per-second)))