(define-module (game time) #:use-module (scheme time) #:export (current-time*)) (define (current-time*) (/ (exact->inexact (current-jiffy)) (jiffies-per-second)))