如何使用 (ns (:require :refer)) 重命名

Question

我的理解是现在推荐使用 require :refer 代替 use 宏中的 ns。例如，执行：

(ns example.core 
  (:require [clj-json.core :refer [parse-string]]))

而不是

(ns example.core 
  (:use [clj-json.core :only [parse-string]]))

use 支持的处理:rename 的推荐方法是什么？ 具体来说，假设我想require clojure.data.zip 并重命名与 clojure.core 冲突的 ancestors 和 descendants 函数。

换句话说，我想知道require 等价于

(:use 
  [clojure.data.zip :rename {ancestors xml-ancestors, 
                             descendants xml-descendants})

Answer 1

(ns foo
  (:require [clojure.data.zip :refer [ancestors descendants] :rename {ancestors xml-ancestors descendants xml-descendants}]))

Answer 2

你先是:require，然后是:refer，然后是:rename。

(ns foo
  (:require clojure.data.zip)
  (:refer [clojure.data.zip :rename {ancestors xml-ancestors,
                                     descendants xml-descendants})

:use 一直是:require+:refer 的简写，现在:require 的:refer 选项是最简单的refer 的简写。

Answer 3

免责声明：我不知道执行此操作的“推荐”方式。我只知道我会怎么做。我的解决方案可能不是惯用的 Clojure，如果没有人提出更好的答案，我会感到惊讶。

---

这就是我要做的：:require 包并使用 :as 为它起别名：

(ns some.big.name.space
  (:require [clojure.data.zip  :as  cdz])
  ... some more imports, maybe ...)

然后可以使用指定的前缀访问符号，并且不要与我的some.big.name.space命名空间中的任何符号冲突：

(def some-list [cdz/ancestors cdz/descendants ancestors descendants])

如果别名很短，键入它几乎不会打扰我，而且我觉得我的代码更清晰——cdz/ 是一个很好的视觉提示，表明该符号是一个导入。

我知道这并不能真正回答您的确切问题——如何将:rename 与:require 一起使用——但我觉得值得一提，因为它避免了污染我的命名空间而且我不必搞砸使用 Clojure 的符号解析机制。

Answer 4

如果您需要从 Clojure 核心重命名函数或宏，请使用：

(ns foo
  "Contains foo functionality."
  (:refer-clojure :rename {map core-map}))