clojure - 如何制作一个不带参数并返回常量值的文字函数？

Question

我正在尝试学习 Clojure，并且被文字函数语法所困。我不知道字面函数等价物(defn fourteen [] 14)是什么。

(def fourteen (fn [] 14))
;; => #'user/fourteen
(fourteen)
;; => 14
(defn defn-fourteen [] 14)
;; => #'user/defn-fourteen
(defn-fourteen)
;; => 14
(def literal-14 #(14))
;; => #'user/literal-14
(literal-14)
;; ClassCastException java.lang.Long cannot be cast to clojure.lang.IFn  user/literal-14 (form-init2956929406616221071.clj:1)

我不认为这是一个匿名函数在 clojure 中期望有多少参数？，但也许是这样，我只是没有经验来认识到这一点。

我如何或可以定义 literal-14 以允许(literal-14)调用工作？

Answer 1

正如A. Webb 指出的那样，constantly这是最惯用的写法：

(def fourteen (constantly 14))

匿名函数字面量的问题在于它总是扩展为一个函数体为列表的函数：

'#(stuff and things) ;=> (fn* [] (stuff and things))

所以这就是你的尝试中发生的事情：

'#(14) ;=> (fn* [] (14))

没有办法摆脱这些括号。您可以使用dooridentity或类似的东西绕过它们，但最重要的是，如果您需要编写一个其主体不适合写为列表的匿名函数，则不应使用文字语法。

Answer 2

14不是一个功能，但do或->将在紧要关头做：

#(do 14)
#(-> 14)