[cmucl-imp] DIRECTORY and symlinks

[Raymond Toy]

>>>>> "Helmut" == Helmut Eller <heller at common-lisp.net> writes:

    Helmut> When a directory contains a symbolic link to a
    Helmut> non-existent file DIRECTORY signals an error.  E.g. create
    Helmut> a link like this:

    bash> cd /tmp ; ln -s non-existent bad-link ls -l bad-link
    Helmut> lrwxrwxrwx 1 helmut helmut 12 Dec 1 15:29 bad-link ->
    Helmut> non-existent

    Helmut> and then in CMUCL:

    Helmut> CMU Common Lisp snapshot-2012-10 (20C Unicode), running on
    Helmut> ix With core:
    Helmut> /opt/cmucl/cmucl-2012-10/lib/cmucl/lib/lisp-sse2.core
    Helmut> Dumped on: Sun, 2012-09-30 08:33:59+02:00 on lorien2 See
    Helmut> <http://www.cmucl.org/> for support information.  Loaded
    Helmut> subsystems: Unicode 1.28 with Unicode version 6.1.0 Python
    Helmut> 1.1, target Intel x86/sse2 CLOS based on Gerd's PCL
    Helmut> 2010/03/19 15:19:03
    Helmut> * (directory "/tmp/*.*")
    Helmut> File-error in function TRUENAME: The file "/tmp/bad-link"
    Helmut> does not exist.  [Condition of type
    Helmut> KERNEL:SIMPLE-FILE-ERROR]
 
    Helmut> Is that necessary?  Or is there some (portable) way to
    Helmut> avoid the error?

Ooes (directory "/tmp/*.*" :truenamep nil) do what you want?

Ray