Bug report: ecl doesn't correctly process filenames with a "*" in them.

Here is the command I ran, where cl is the latest cl-launch 4:

mkdir -p /tmp/x ; touch "/tmp/x/*" ;
for i in sbcl ccl clisp cmucl ecl abcl \
          scl allegro lispworks gcl xcl ; do
  echo $i ; cl -l $i -iw \
    '(let ((x (directory "/tmp/x/*"))) (list "'$i'" x (pathname-name
(first x))))' ;
done

And the summarized results are:

Escape properly:
("sbcl" (#P"/tmp/x/\\*") "*")
("ccl" (#P"/tmp/x/\\*") "\\*")
("cmucl" (#P"/tmp/x/\\*") "*")
("lispworks" (#P"/tmp/x/\\*") "\\*")
("scl" (#P"file://localhost/tmp/x/*") "*")

Read badly:
("clisp" (#P"/tmp/x/*") :WILD)
("ecl" (#P"/tmp/x/*") :WILD)
("allegro" (#P"/tmp/x/*") :WILD)
("xcl" (#P"/tmp/x/*") :WILD)

Error out:
abcl
Fatal condition:
Bad place for a wild pathname.

gcl:
Fatal condition:
Condition in LET [or a callee]: INTERNAL-SIMPLE-FILE-ERROR: File error
on "/tmp/x/*": File "/tmp/x/*" is wild

—♯ƒ • François-René ÐVB Rideau •Reflection&Cybernethics• http://fare.tunes.org
No man would listen to you talk if he didn't know it was his turn next.
                — Edgar Watson Howe

------------------------------------------------------------------------------
Learn Graph Databases - Download FREE O'Reilly Book
"Graph Databases" is the definitive new guide to graph databases and their
applications. Written by three acclaimed leaders in the field,
this first edition is now available. Download your free book today!
http://p.sf.net/sfu/13534_NeoTech
_______________________________________________
Ecls-list mailing list
Ecls-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/ecls-list

Reply via email to