在Common Lisp中使用$HOME路径？生成可执行文件时路径失效问题

API 探路者

2026-7-29

Common Lisp动态获取用户家目录路径方案

直接写"$HOME..."没用，因为Common Lisp不会自动解析shell环境变量，以下几种可靠方案解决跨环境路径问题：

推荐：使用标准函数user-homedir-pathname
这是Common Lisp标准提供的函数，返回当前用户的家目录路径名对象，跨平台兼容Mac、Linux等环境，无需依赖环境变量：
```
(defvar *document* 
  (merge-pathnames "quicklisp/local-projects/Project/web/" 
                   (user-homedir-pathname)))
```
merge-pathnames会自动处理路径分隔符，避免手动拼接字符串导致的格式错误。
通过UIOP读取环境变量
UIOP（ASDF的一部分）是跨实现的工具库，几乎所有Common Lisp项目都会依赖，可以直接读取HOME环境变量：
```
(defvar *document* 
  (merge-pathnames "quicklisp/local-projects/Project/web/" 
                   (uiop:getenv "HOME")))
```
注意：如果系统环境中未设置HOME变量（这种情况极少），该方法会返回nil，需要额外处理。
特定Lisp实现的方法（如SBCL）
如果你只使用SBCL，也可以用sb-posix:getenv直接读取环境变量：
```
(defvar *document* 
  (merge-pathnames "quicklisp/local-projects/Project/web/" 
                   (sb-posix:getenv "HOME")))
```
但这种方法不跨实现，切换到其他Lisp环境时需要修改代码。