~ 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