检查Common Lisp中列表中的每个列表是否为空

发布时间：2020-12-16 10:17:44 所属栏目：百科来源：网络整理

导读：我知道我可以检查列表列表是否只包含这样的空列表 CL-USER (null (find-if (lambda (item) (not (null item))) my-list)) my-list是列表列表. 例如： CL-USER (null (find-if (lambda (item) (not (null item))) '(nil (bob) nil)))NILCL-USER (null (find-i

我知道我可以检查列表列表是否只包含这样的空列表

CL-USER> (null (find-if (lambda (item) (not (null item))) my-list))

my-list是列表列表.

例如：

CL-USER> (null (find-if (lambda (item) (not (null item))) '(nil (bob) nil)))
NIL
CL-USER> (null (find-if (lambda (item) (not (null item))) '(() () ())))
T

但是,在Lisp中执行此操作是不是更简单,更简单？如果是这样,怎么样？

解决方法

高阶函数每个都接受一个谓词函数和一个列表,如果谓词为列表中的每个元素返回true,则返回true.

所以你可以这样做：

(every #'null my-list)

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!