[Matlisp-users] Re: Problems compiling Matlisp with new CMUCL

[Raymond T. <to...@rt...>]

>>>>> "Nicolas" == Nicolas Neuss <Nic...@IW...> writes:

    Nicolas> Hello, Matlisp- and CMUCL-users.

[snip]

    Nicolas> (load "start.lisp")
    Nicolas> ; Loading #p"/home/neuss/CL-HOME/matlisp/start.lisp".
    Nicolas> ; Converted SETLOGICALROOT.
    Nicolas> ; Converted GETLOGICALROOT.
    Nicolas> ; Converted DEFLOGICALPATH.


    Nicolas> Error in function LISP::SUBSTITUTE-INTO:
    Nicolas>    Not enough wildcards in FROM pattern to match TO pattern:
    Nicolas>   #<LISP::PATTERN :MULTI-CHAR-WILD "." :MULTI-CHAR-WILD>
    Nicolas>    [Condition of type SIMPLE-ERROR]

I've fixed this in matlisp for now.

The problem is that cmucl gets confused when parsing namestrings with
wildcard versions:

(describe (pathname "/tmp/*.*.*")) =>
#p"/tmp/*.*.*" is a structure of type PATHNAME.
HOST: #<LISP::UNIX-HOST>.
DEVICE: NIL.
DIRECTORY: (:ABSOLUTE "tmp").
NAME: #<LISP::PATTERN :MULTI-CHAR-WILD "." :MULTI-CHAR-WILD>.
TYPE: :WILD.
VERSION: NIL.

In 18e, this returned

#p"/tmp/*.*.~*~" is a structure of type PATHNAME.
HOST: #<COMMON-LISP::UNIX-HOST>.
DEVICE: NIL.
DIRECTORY: (:ABSOLUTE "tmp").
NAME: :WILD.
TYPE: :WILD.
VERSION: :WILD.

I think "/tmp/*.*.*" would be better written "/tmp/*.*.~*~"

Ray