Question

clojure中的以下表达式非常有用：

(doseq [x '(1 2 3 4)] (println x))

这个给了我一个nullpointer：

(doseq [x '(1 2 3 4)] ((println x)(println "x")))

它产生以下输出：

user=> (doseq [x '(1 2 3 4)] ((println x)(println "x")))
1
x
java.lang.NullPointerException (NO_SOURCE_FILE:0)
user=> (.printStackTrace *e)
java.lang.NullPointerException (NO_SOURCE_FILE:0)
  at clojure.lang.Compiler.eval(Compiler.java:4639)
  at clojure.core$eval__5182.invoke(core.clj:1966)
  at clojure.main$repl__7283$read_eval_print__7295.invoke(main.clj:180)
  at clojure.main$repl__7283.doInvoke(main.clj:197)
  at clojure.lang.RestFn.invoke(RestFn.java:426)
  at clojure.main$repl_opt__7329.invoke(main.clj:251)
  at clojure.main$legacy_repl__7354.invoke(main.clj:292)
  at clojure.lang.Var.invoke(Var.java:359)
  at clojure.main.legacy_repl(main.java:27)
  at clojure.lang.Repl.main(Repl.java:20)
  at sun.reflect.NativeMethodAccessorImpl.invoke0(Native Method)
  at sun.reflect.NativeMethodAccessorImpl.invoke(NativeMethodAccessorImpl.java:39)
  at sun.reflect.DelegatingMethodAccessorImpl.invoke(DelegatingMethodAccessorImpl.java:25)
  at java.lang.reflect.Method.invoke(Method.java:597)
  at jline.ConsoleRunner.main(ConsoleRunner.java:69)
Caused by: java.lang.NullPointerException
  at user$eval__266.invoke(NO_SOURCE_FILE:26)
  at clojure.lang.Compiler.eval(Compiler.java:4623)
  ... 14 more
nil

只需在doseq的主体周围添加一组额外的括号就可以得到nullpointer。我做错了什么？

Answer 1

嗯，你已经找到了解决方案，所以只需要一些提示来解释这种行为：

在Clojure中（就像在Lisp，Scheme等中），一切都是表达式，表达式是原子或列表。关于列表，Clojure手册说

非空列表被视为电话要么是特殊形式，要么是宏，要么是功能。电话有表格（操作员操作数*）。

在您的示例中，正文((println x) (println x))是一个列表，运算符本身就是Clojure必须评估以获取实际运算符的表达式。也就是说，您正在说“评估第一个表达式并将其返回值作为调用第二个表达式的函数”。但是，正如您所注意到的，println仅返回nil。如果NullPointerException被解释为运算符，则会导致nil。

您的代码与(do (println x) (println x))一起使用，因为do是一种特殊形式，它依次计算每个表达式并返回最后一个表达式的值。这里do是运算符，println的表达式是操作数。

要理解这种行为的用处，请注意函数是Clojure中的第一类对象，例如，您可以从另一个函数返回一个函数。例如，请使用以下代码：

(doseq [x '(1 2 3 4)] ((if (x > 2)
    (fn [x] (println (+ x 2)))
    (fn [x] (println (* x 3)))) x))

在这里，我动态地找出运算符来调用序列中的元素。首先，评估if - 表达式。如果x大于2，if将对打印x + 2的函数进行评估，否则评估为打印x * 3的函数。此函数将应用于序列的x。

Answer 2

我知道你已经意识到这个问题，但请注意你不需要做：

(doseq [x '(1 2 3 4)] (println x) (println "x"))

doseq（顾名思义）a已经：）

当运行剂量在体内有多个表达式时，在clojure中的Nullpointer

2 个答案: