~ chicken-core (chicken-5) df3ee10c84758ca747763487d09fc7907cfe7feb

commit df3ee10c84758ca747763487d09fc7907cfe7feb
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Sat Aug 28 12:06:03 2010 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Sat Aug 28 12:06:03 2010 +0200

    fixed result type for current-milliseconds

diff --git a/types.db b/types.db
index 52fcbcb6..e3271309 100644
--- a/types.db
+++ b/types.db
@@ -260,7 +260,7 @@
 (current-error-port (procedure current-error-port (#!optional port) port))
 (current-exception-handler (procedure current-exception-handler (#!optional procedure) procedure))
 (current-gc-milliseconds (procedure current-gc-milliseconds () fixnum))
-(current-milliseconds (procedure current-milliseconds () fixnum))
+(current-milliseconds (procedure current-milliseconds () float))
 (current-read-table (procedure current-read-table () (struct read-table)))
 (current-seconds (procedure current-seconds () number))
 (define-reader-ctor (procedure define-reader-ctor (symbol procedure) undefined))