Re: ice-9/and-let*.scm

[Keisuke Nishida]

Jim Blandy <address@hidden> writes:

> > The file ice-9/and-let*.scm can't exist on windows32 systems because of
> > the asterisk.  CVS doesn't even do a checkout with rename so you must
> > get it from a unix system when you checkout guile-core :)
> > 
> > The point is, it would be great if that file was officially renamed...
> 
> Right.  The problem right now is that the mapping from module names
> (like (ice-9 and-let*)) and filenames (like ice-9/and-let*) is too
> simple.  It should provide some quoting rules, so the file could be
> named ice-9/and-let%2A or something.  Think of what would happen to a
> module named (scheme call/cc)...

How about renaming and-let*.scm to and-let.scm and apply the following
patch as a temporary solution?

--- boot-9.scm~ Sat Nov 18 18:03:19 2000
+++ boot-9.scm  Sat Nov 18 18:02:52 2000
@@ -1898,6 +1898,10 @@
                          (map (lambda (elt)
                                 (string-append (symbol->string elt) "/"))
                               dir-hint-module-name))))
+    (let ((match (regexp-exec (make-regexp "\\*$") name)))
+      (if match
+         (let ((p (vector-ref match 1)))
+           (set! name (make-shared-substring name 0 (car p))))))
     (resolve-module dir-hint-module-name #f)
     (and (not (autoload-done-or-in-progress? dir-hint name))
         (let ((didit #f))

I know this is not a good solution, but the current module will be
replaced soon, right?

-- Kei