如何在Hy语言同一文件的宏中引用另一个宏？

在Hy语言中，宏是编译时展开的，因此引用其他宏时必须保证依赖宏在编译阶段就已被加载到当前环境中，否则会抛出NameError。针对你在oreo包的oreo.hy中定义let-cwd宏时无法引用with-cwd宏的问题，以下是具体分析和解决方案：

核心问题本质 #

你的所有无效写法都是将require放在了宏内部或宏的运行时展开代码中，而宏展开发生在编译阶段，此时require尚未执行，导致编译时找不到with-cwd宏。

无效写法分析 #

• 将require放在宏定义的函数体中（非反引号区域）：仅在宏被定义时执行一次，无法保证编译阶段with-cwd已被注册，且不符合模块依赖管理规范。
• 将require放在宏的展开代码中（反引号内）：require会延迟到运行时执行，编译阶段宏展开时with-cwd仍未被引入，直接触发NameError。
• 使用~(require ...)插入require结果：完全错误，require的返回值并非宏展开所需的代码逻辑，且同样无法在编译阶段生效。

正确解决方案 #

场景1：with-cwd与let-cwd在同一文件中 #

只需保证with-cwd的定义顺序在let-cwd之前，直接引用即可，无需额外require：

;; 先定义依赖宏
(defmacro with-cwd [#* body]
  `(do ~@body))

;; 后定义引用宏
(defmacro let-cwd [vars #* body]
  `(let ~vars (with-cwd ~@body)))

场景2：let-cwd在其他文件中，需引用oreo.oreo中的with-cwd #

在定义let-cwd的文件顶部提前引入with-cwd宏，确保编译阶段依赖已加载：

;; 文件顶部引入编译时依赖的宏
(require [oreo.oreo [with-cwd]])

(defmacro let-cwd [vars #* body]
  `(let ~vars (with-cwd ~@body)))

内容的提问来源于stack exchange，提问作者syvlorg