~ chicken-core (chicken-5) d57fbee32c128dfcd03efa1710669109c01e6f63
commit d57fbee32c128dfcd03efa1710669109c01e6f63
Author: Evan Hanson <evhan@foldling.org>
AuthorDate: Tue Jul 10 19:21:24 2018 +1200
Commit: Evan Hanson <evhan@foldling.org>
CommitDate: Tue Jul 10 19:23:30 2018 +1200
Use dotted module syntax for imports in library.scm
This makes all the import forms in the file use the same syntax, for
better grepability.
diff --git a/library.scm b/library.scm
index a8757157..90d491ef 100644
--- a/library.scm
+++ b/library.scm
@@ -1085,7 +1085,7 @@ EOF
(cpu-time current-milliseconds current-seconds)
(import scheme)
-(import (only (chicken module) reexport))
+(import (only chicken.module reexport))
(define (current-milliseconds)
(##core#inline_allocate ("C_a_i_current_milliseconds" 7) #f))
@@ -6272,7 +6272,7 @@ static C_word C_fcall C_setenv(C_word x, C_word y) {
(get get-properties put! remprop! symbol-plist)
(import scheme)
-(import (only (chicken base) getter-with-setter))
+(import (only chicken.base getter-with-setter))
(import chicken.internal.syntax)
(define (put! sym prop val)
@@ -6408,7 +6408,7 @@ static C_word C_fcall C_setenv(C_word x, C_word y) {
(import scheme)
(import chicken.fixnum chicken.foreign chicken.keyword chicken.process-context)
(import chicken.internal.syntax)
-(import (only (chicken base) make-parameter))
+(import (only chicken.base make-parameter))
(define software-type
(let ((sym (string->symbol ((##core#primitive "C_software_type")))))
Trap