Question

我相信这是有效的Clojure代码 - 并且在Lein控制台REPL中运行正常 - 但是Cursive REPL中的错误：

Connecting to local nREPL server...
Clojure 1.8.0
nREPL server started on port 41303 on host 127.0.0.1 - nrepl://127.0.0.1:41303
*ns*
=> #object[clojure.lang.Namespace 0x4394b860 "user"]
(defn concat-some
  [f vec1 vec2]
  ((fn [x] (filter f x)
    (concat vec1 vec2))))
=> #'user/concat-some
(concat-some even? [1 2 3] [4 5 6])
clojure.lang.ArityException: Wrong number of args (0) passed to: user/concat-some/fn--4953

我在这里错过了什么吗？

感谢您的帮助！

编辑和跟进：

这绝对是一个Parinfer问题。这段代码：

(defn concat-some
  [f vec1 vec2]
  ((fn [x] (filter f x))
    (concat vec1 vec2)))
(concat-some even? [1 2 3] [4 5 6])

当粘贴到Cursive REPL中时Parinfer打开会产生不正确的粘贴，并产生上面的ArityException。相同的代码粘贴到相同的REPL中，Paredit打开或结构编辑关闭会产生预期的输出：

;; => #'user/concat-some
;; => (2 4 6)

我不知道在Cursive中活动时的结构编辑在编辑器中使用 - 和REPL。无论模式如何，我仍然希望有效代码是有效代码，并且想知道这是否是粘贴到Cursive / Parinfer REPL的预期结果。（？）

再次感谢您对此的帮助。

Answer 1

你的编辑器可能有一个slurp / barf命令，你用键盘快捷键意外触发了，但这个复制/粘贴出错了。

你有((这通常是一个坏兆头，除非在例子中正确完成：

(defn concat-some
  [f vec1 vec2]
  ((fn [x] (filter f x))
   (concat vec1 vec2)))
(concat-some even? [1 2 3] [4 5 6])

在你的filter行上的最后一个paren缺失，而是放在函数的末尾。这意味着你正在调用一个带有0个参数的函数，但是你对fn的调用产生了一个带有1个参数的函数x

传递args（0）的数量错误...错误？

1 个答案: