* boot-9.scm, debug.scm, hcons.scm, lineio.scm, mapping.scm,

poe.scm, slib.scm, tags.scm, threads.scm: Use normal list
notation, instead of #/ notation.

diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm
index 88930a4..b595bbc 100644 (file)
--- a/ice-9/boot-9.scm
+++ b/ice-9/boot-9.scm
@@ -1729,12 +1729,12 @@
 
 
 \f
-;;; {#/app}
+;;; {The (app) module}
 ;;;
 ;;; The root of conventionally named objects not directly in the top level.
 ;;;
-;;; #/app/modules
-;;; #/app/modules/guile
+;;; (app modules)
+;;; (app modules guile)
 ;;;
 ;;; The directory of all modules and the standard root module.
 ;;;
@@ -1893,7 +1893,7 @@
 ;; To make your Guile extension into a dynamic linkable module, follow
 ;; these easy steps:
 ;;
-;; - Find a name for your module, like #/ice-9/gtcltk
+;; - Find a name for your module, like (ice-9 gtcltk)
 ;; - Write a function with a name like
 ;;
 ;;     scm_init_ice_9_gtcltk_module
@@ -1913,7 +1913,7 @@
 ;;
 ;;   and put it somewhere in %load-path.
 ;;
-;; - Then you can simply write `:use-module #/ice-9/gtcltk' and it
+;; - Then you can simply write `:use-module (ice-9 gtcltk)' and it
 ;;   will be linked automatically.
 ;;
 ;; This is all very experimental.

diff --git a/ice-9/debug.scm b/ice-9/debug.scm
index c8440c0..1fdc212 100644 (file)
--- a/ice-9/debug.scm
+++ b/ice-9/debug.scm
@@ -20,7 +20,7 @@
 ;;;;
 \f
 
-(define-module #/ice-9/debug)
+(define-module (ice-9 debug))
 
 \f
 

diff --git a/ice-9/hcons.scm b/ice-9/hcons.scm
index d40190d..6c0e0ba 100644 (file)
--- a/ice-9/hcons.scm
+++ b/ice-9/hcons.scm
@@ -19,7 +19,7 @@
 ;;;; 
 
 \f
-(define-module  #/ice-9/hcons)
+(define-module  (ice-9 hcons))
 
 \f
 ;;; {Eq? hash-consing}

diff --git a/ice-9/lineio.scm b/ice-9/lineio.scm
index 768aaef..fa851c0 100644 (file)
--- a/ice-9/lineio.scm
+++ b/ice-9/lineio.scm
@@ -20,7 +20,7 @@
 
 \f
 
-(define-module #/ice-9/lineio)
+(define-module (ice-9 lineio))
 
 \f
 ;;; {Line Buffering Input Ports}

diff --git a/ice-9/mapping.scm b/ice-9/mapping.scm
index b4ce24a..3610b87 100644 (file)
--- a/ice-9/mapping.scm
+++ b/ice-9/mapping.scm
@@ -20,8 +20,8 @@
 
 \f
 
-(define-module #/ice-9/mapping
-  :use-module #/ice-9/poe)
+(define-module (ice-9 mapping)
+  :use-module (ice-9 poe))
 
 (define-public mapping-hooks-type (make-record-type 'mapping-hooks '(get-handle
                                                                     create-handle

diff --git a/ice-9/poe.scm b/ice-9/poe.scm
index 567d1bb..ccb8759 100644 (file)
--- a/ice-9/poe.scm
+++ b/ice-9/poe.scm
@@ -19,8 +19,8 @@
 ;;;; 
 
 \f
-(define-module  #/ice-9/poe
-  :use-module #/ice-9/hcons)
+(define-module  (ice-9 poe)
+  :use-module (ice-9 hcons))
 
 \f
 

diff --git a/ice-9/slib.scm b/ice-9/slib.scm
index 5382881..3266de5 100644 (file)
--- a/ice-9/slib.scm
+++ b/ice-9/slib.scm
@@ -1,5 +1,5 @@
 ;;; installed-scm-file
-(define-module #/ice-9/slib)
+(define-module (ice-9 slib))
   
 \f
 

diff --git a/ice-9/tags.scm b/ice-9/tags.scm
index 34d861c..edd0dc4 100644 (file)
--- a/ice-9/tags.scm
+++ b/ice-9/tags.scm
@@ -20,5 +20,5 @@
 
 \f
 
-(define-module #/ice-9/tags)
+(define-module (ice-9 tags))
 

diff --git a/ice-9/threads.scm b/ice-9/threads.scm
index b50ee48..cdc8eba 100644 (file)
--- a/ice-9/threads.scm
+++ b/ice-9/threads.scm
@@ -23,7 +23,7 @@
 ;;;;
 \f
 
-(define-module #/ice-9/threads)
+(define-module (ice-9 threads))
 
 \f