file - 在其他命名空间中应用宏

Question

我有类似 dsl 的东西数据的文件。在那里我想声明一些基于 s 表达式的信息。我有一些运行程序可以处理此类文件。

运行者.clj

 (require '[data :as d])
 ;processing

数据文件

 (ns  data)
 (defmacro data [s] (println (str s)))

 ;dsl like stuff goes here
 (data "foo")

如何从 defmacro 等数据文件中删除非 dsl？

也欢迎任何指向具有类似解决方案的源代码的链接。

Answer 1

; dsl.clj
(ns dsl)
(defmacro data ...)

; data.clj
(ns data
  (:require dsl))

(dsl/data ...)

或与 use :

; data.clj
(ns data
  (:use [dsl :only (data)]))

(data ...)