LISP：在循环中收集多个列表 [英] Lisp: Collect multiple lists in loop

问题描述

我希望能够在一个循环中收集多个列表。

我知道这可以在没有循环的情况下完成，但我想知道使用循环是否也可以这样做。我想要这样的：

  (loop for var in list
        (if (cond1 var)
            (if (cond2 var)
                collect into list1
                collect into list2))
        finally (list list1 list2))

我得到的错误是LOOP keyword is expected，我猜Collect应该紧跟在awhen或aloop之后。有什么办法可以解决这个问题吗？

推荐答案

您有几个问题。

首先，如果您希望将普通的Lisp代码放入循环体中，则需要do关键字。但您可以使用do的when或if关键字。

其次，collect关键字要求您指定要收集到列表中的表达式，例如collect var into list1。

第三，您需要使用(return expression)从finally子句中的表单返回值。

  (loop for var in list
    when (cond1 var)
      if (cond2 var)
        collect var into list1
      else
        collect var into list2
    finally (return (list list1 list2)))

这篇关于LISP：在循环中收集多个列表的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！