这似乎可能是 ECL 实现中的一个错误——或者由于标准中的一些细节:
> (probe-file #P"/usr")
#P"/usr/"
> (probe-file #P"/usr/")
#P"/usr/"
> (probe-file #P"/")
NIL
> (probe-file #P"//")
NIL
还有一个案例:
> (probe-file #P"/.")
#P"/"
更新,FWIW,SBCL 符合我的期望:
* (probe-file #P"/")
#P"/"