From 39e5c984768246310f11851fd237dca301877772 Mon Sep 17 00:00:00 2001 From: Abdulaziz Ghuloum Date: Fri, 7 Dec 2007 06:34:56 -0500 Subject: [PATCH] time-second was off my 30 years. fixed. --- scheme/ikarus.time-and-date.ss | 2 +- scheme/last-revision | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/scheme/ikarus.time-and-date.ss b/scheme/ikarus.time-and-date.ss index 16faf68..9bdb026 100644 --- a/scheme/ikarus.time-and-date.ss +++ b/scheme/ikarus.time-and-date.ss @@ -28,7 +28,7 @@ (define (time-second x) (if (time? x) - (+ (* (time-msecs x) #e10e6) + (+ (* (time-msecs x) #e10e5) (time-secs x)) (error 'time-second "not a time" x))) diff --git a/scheme/last-revision b/scheme/last-revision index 9f7893c..40bd097 100644 --- a/scheme/last-revision +++ b/scheme/last-revision @@ -1 +1 @@ -1193 +1196