probe-directory?

[David T. <dv...@da...>]

Hi,

is the interaction below as intended?

[1]> (probe-file ".")

*** - PROBE-FILE: "/srv/home/dvd/work/Sfg/clisp/src/." names a 
directory, not a file
Break 1 [2]> (ext:probe-directory ".")

*** - not a directory: #P"/srv/home/dvd/work/Sfg/clisp/src/."
Break 2 [3]>

David