注意：这与并发无关。这是关于线程宏的。
我知道-> 将对象放在第二个位置，->> 将参数放在最后一个位置。
现在，我很好奇，就像 #( ... % ) 用于函数的简写符号一样，是否有线程简写符号可以让我将参数放置在 任意 位置？ p>
我们的目标是不再有一个固定的位置让线程通过......我可以编写任意形式，并在特殊位置插入 %%，而 %% 是插入线程的位置。
谢谢！
【问题讨论】：
Swiss Arrows 库中的“钻石棒”可以满足您的要求：
(-<> 0
(* <> 5)
(vector 1 2 <> 3 4))
; => [1 2 0 3 4]
也就是说，这并不是你最终经常需要的东西（或者在我的 Clojure 经验中永远）
【讨论】：
as->，如 another answer 中所述。
as->，但我喜欢钻石棒的简洁和视觉清晰度。通常在同一线程中使用具有不同数量的常用函数（例如 map 和 assoc）时发生。
有一个提供此功能的库，但我忘记了在哪里。它可能在已弃用的 clojure-contrib 中。这是-$> 宏。
但是您可以从 clojure 的核心 -> macro 派生出一个来制作您正在寻找的那个：
(defmacro -$>
([x] x)
([x form] (if (seq? form)
(with-meta (map #(if (= %1 '$) x %1) form) (meta form))
(list form x)))
([x form & more] `(-$> (-$> ~x ~form) ~@more)))
并用$表示插入点：
user=> (-$> 2 str (identity $) (println $))
2
nil
从技术上讲，您可以在一种形式中使用多个 $。但是这种实现方式存在多次扩展同一个表单的问题（以换取简单性）。
【讨论】：
万一其他人遇到这种情况，提供的宏存在是有原因的，但任意放置的宏不存在：后者会导致糟糕的 API 设计。
-> 宏将参数放在第一个位置。这对应于对某些主题参数起作用的函数，例如，conj、assoc。
->> 宏将参数放在最后一个位置。这对应于对序列起作用的函数，例如，map、reduce。
精心设计您的 API，您将不太可能需要这样的宏。
【讨论】：
nth 是一个核心函数的一个很好的例子，它适用于一个集合，但不希望它作为最后一个参数，而是作为第一个参数。
nth 也不会像其他序列一样返回序列，因此在挖掘嵌套序列时可以很好地工作。我认为这就是它采用这种结构的原因。
自 1.5 以来，Clojure 中现在有一个通用的线程宏，称为 as->。
这条推文举了一个例子来说明它是如何工作的：https://twitter.com/borkdude/status/302881431649128448
(as-> "/tmp" x
(java.io.File. x)
(file-seq x)
(filter (memfn isDirectory) x)
(count x))
第一个 'x' 绑定到 "/tmp" 并由它组成一个文件。 'x' 再次反弹到生成的文件，并通过 'file-seq' 函数等等。
【讨论】：