~ chicken-core (chicken-5) 274071e7483b3ef9408c46e019332449021f347a
commit 274071e7483b3ef9408c46e019332449021f347a
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Wed May 6 11:43:03 2020 +0200
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Wed May 6 11:43:03 2020 +0200
add deprecation notices
diff --git a/chicken.time.import.scm b/chicken.time.import.scm
index c77cd961..eb4a4b29 100644
--- a/chicken.time.import.scm
+++ b/chicken.time.import.scm
@@ -27,7 +27,7 @@
'chicken.time
'library
'((cpu-time . chicken.time#cpu-time)
- (current-milliseconds . chicken.time#current-milliseconds)
+ (current-milliseconds . chicken.time#current-milliseconds) ; DEPRECATED
(current-process-milliseconds . chicken.time#current-process-milliseconds)
(current-seconds . chicken.time#current-seconds))
;; OBSOLETE: This can be removed after bootstrapping
diff --git a/library.scm b/library.scm
index efcd3feb..1a7e48f2 100644
--- a/library.scm
+++ b/library.scm
@@ -1084,7 +1084,9 @@ EOF
;; to be a hardcoded primitive module.
;;
;; [syntax] time
- (cpu-time current-milliseconds current-process-milliseconds current-seconds)
+ (cpu-time
+ current-milliseconds ; DEPRECATED
+ current-process-milliseconds current-seconds)
(import scheme)
(import (only chicken.module reexport))
Trap