time-second was off my 30 years. fixed.
This commit is contained in:
parent
86d9c640b1
commit
39e5c98476
|
@ -28,7 +28,7 @@
|
||||||
|
|
||||||
(define (time-second x)
|
(define (time-second x)
|
||||||
(if (time? x)
|
(if (time? x)
|
||||||
(+ (* (time-msecs x) #e10e6)
|
(+ (* (time-msecs x) #e10e5)
|
||||||
(time-secs x))
|
(time-secs x))
|
||||||
(error 'time-second "not a time" x)))
|
(error 'time-second "not a time" x)))
|
||||||
|
|
||||||
|
|
|
@ -1 +1 @@
|
||||||
1193
|
1196
|
||||||
|
|
Loading…
Reference in New Issue