Common Lisp (SBCL) 是否具有高级并行功能?

Does Common Lisp (SBCL) have high level parallelism functions?

在 Haskell 中,我可以使用以下方法启用列表的并行计算:

map expensiveFunction list `using` parList rdeepseq

仅添加 `using` parList rdeepseq 即可实现纯并行计算,并且在我的四核处理器上运行速度提高了 4 倍。

是否有使用 SBCL 的类似功能?

Common Lisp 没有执行此操作的标准工具,但有一个库专门用于执行此操作,并且在大多数 CL 实现中得到很好的支持:Lparallel

使用 lparallel,您可以执行以下操作:

(let ((number-sets '((1 2 3) (4 5 6) (10 11 12 13 14) (100 200 300))))
  (lparallel:pmap 'list (lambda (v) (apply #'+ v)) number-sets))

这将并行执行各个求和,但除此之外 return 结果与使用普通 map 相同的结果。