~ chicken-core (chicken-5) 379a24abb7c0a969b84e0e4c6d3ca473978182d0

commit 379a24abb7c0a969b84e0e4c6d3ca473978182d0
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Fri Aug 6 21:04:07 2010 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Fri Aug 6 21:04:07 2010 +0200

    marked time<->ms conversion routines as deprecated

diff --git a/types.db b/types.db
index b1a5cb19..2bebbcaa 100644
--- a/types.db
+++ b/types.db
@@ -1179,7 +1179,7 @@
 (make-condition-variable (procedure make-condition-variable (#!optional *) (struct condition-variable)))
 (make-mutex (procedure make-mutex (#!optional *) (struct mutex)))
 (make-thread (procedure make-thread ((procedure () . *) #!optional *) (struct thread)))
-(milliseconds->time (procedure milliseconds->time (fixnum) (struct time)))
+(milliseconds->time deprecated)
 (mutex-lock! (procedure mutex-lock! ((struct mutex) #!optional * (struct thread)) boolean))
 (mutex-name (procedure mutex-name ((struct mutex)) *))
 (mutex-specific (procedure mutex-specific ((struct mutex)) *))
@@ -1206,7 +1206,7 @@
 (thread-wait-for-i/o! (procedure thread-wait-for-i/o! (fixnum #!optional symbol) undefined))
 (thread-yield! (procedure thread-yield! () undefined))
 (thread? (procedure thread? (*) boolean))
-(time->milliseconds (procedure time->milliseconds ((struct time)) fixnum))
+(time->milliseconds deprecated)
 (time->seconds (procedure time->seconds ((struct time)) number))
 (time? (procedure time? (*) boolean))
 (uncaught-exception-reason (procedure uncaught-exception-reason ((struct condition)) *))