Clojure：如何执行一系列函数？

Question

我有一系列函数（改变一些对象）我想执行，如果我这样做，它可以工作：

(foo1)
(foo2)
(foo3)

但是，我想把这段代码放在一个函数中，这样我就可以随时执行这个序列。 如果我这样做：

(defn run-foos [] (do (foo1) (foo2) (foo3)))

run-foos创建的突变与之前的3个单独语句不同。 我很抱歉，我不能在这里简明地总结我的程序的行为，但基本上我看到上面代码的第一个和第二个版本之间存在一些行为差异。

我想要做的是有一个函数run-foos ，它将执行foo1 ， foo2和foo3 ，其运行方式与我连续单独调用每个函数一样。 我怎样才能做到这一点？

Answer 1

没有看到你的其余代码，这里的差异并不明显（一般来说两者是相同的）。

你拥有的两段代码之间应该有任何区别的唯一原因是，如果在repl中输入第一个代码，并且foo1或foo2返回了某种类型的惰性结果。 在这种情况下，repl会在打印时强制执行惰性结果，而run-foos不会。

如果那是你的问题，那么最好继续使用run-foos但重构你的其他功能，这样它们就不会混合副作用和懒惰。

Answer 2

此变体仅适用于可变数据。

(defn run-foos [] (do (foo1) (foo2) (foo3)))

但标准的clojure数据结构是不可变的。 因此，每当您的数据独立地通过函数时，函数将使用默认数据，其中没有函数的变异。 此外， run-foos将仅从最后一次表达返回数据，即（foo3）。

«除了最后一个表达式之外的所有值都会被丢弃，尽管它们的副作用确实会发生。»（Emerick，Carper，Grand：Clojure programming，2012）

我认为你需要线程宏：

(-> data
    foo1
    foo2
    foo3)

它在编译时扩展为(foo3 (foo2 (foo1 data))) 。 数据将传递给链中的功能，您将得到您想要的。

在这里阅读->宏示例： https ： //clojuredocs.org/clojure.core/-%3E