常见的lisp - 获取文件的路径

Question

在Common Lisp中,有没有办法获得编译文件的路径(类似于current-directory)？

该文件不在当前目录文件夹中.

Answer 1

这应该是一个评论,但我将提供一些可能有助于原始海报的代码示例.

首先,您需要更加清楚自己想要做什么.你试图解决的问题是什么？

其次,这里有几个可能有用的例子:

• *default-pathname-defaults* 通常设置为启动CL映像的目录:

  * *default-pathname-defaults*
  #P"/Users/aerique/"
  

• merge-pathnames 允许您构造新的路径名:

  * (merge-pathnames "lib/misc" *default-pathname-defaults*)
  #P"/Users/aerique/lib/misc"
  * (merge-pathnames "lib/misc/" *default-pathname-defaults*)
  #P"/Users/aerique/lib/misc/"
  

• asdf:system-source-directory返回加载ASDF的系统的路径:

  * (asdf:system-source-directory :linedit)  
  #P"/Users/aerique/quicklisp/dists/quicklisp/software/linedit-20111203-git/"
  

另请参阅链接的ASDF手册以获取更有用的文件和系统功能.

Answer 2

*load-truename*RESP.*load-pathname*为您提供所需.

http://www.lispworks.com/documentation/HyperSpec/Body/v_ld_pns.htm