vl-every (AutoLISP)
检查每个元素组合的谓词是否为 true 支持的平台:Windows 和 Mac OS 签名(vl-every predicate-function list [list ...])
返回值类型:T 或 nil T,如果谓词函数为每个元素组合返回一个非值;否则。nilnil 言论该函数将每个提供的列表的第一个元素作为参数传递给测试函数,然后传递每个列表中的下一个元素,依此类推。一旦其中一个列表用完,评估就会停止。vl-every 例子检查当前目录中是否有空文件: (vl-every '(lambda (fnm) (> (vl-file-size fnm) 0)) (vl-directory-files nil nil 1)) T 检查中的数字列表是否按以下顺序排序:nlst'<= (setq nlst (list 0 2 pi pi 4)) (0 2 3.14159 3.14159 4) (vl-every '<= nlst (cdr nlst)) T 比较以下表达式的结果: (vl-every '= '(1 2) '(1 3)) nil (vl-every '= '(1 2) '(1 2 3)) T 返回第一个表达式是因为比较了每个列表中的第二个元素,并且它们在数值上不相等。第二个表达式返回是因为在处理了较短列表 (1 2) 中的所有元素后停止比较元素,此时列表在数值上相等。如果到达列表的末尾,则返回一个非值。nilvl-everyTvl-everyvl-everynil 下面的示例演示了计算一个包含整数元素的列表和另一个列表时的结果:vl-everynil (setq alist (list 1 2 3 4)) (1 2 3 4) (setq junk nil) nil (vl-every '= junk alist) T 返回值是 because 响应列表,就好像它已到达列表的末尾一样(即使谓词尚未应用于任何元素)。并且由于已到达列表的末尾,因此返回一个非值。Tvl-everynilvl-everynil 相关参考相关概念 |
|Archiver|CAD开发者社区 ( 苏ICP备2022047690号-1 苏公网安备32011402011833)
GMT+8, 2024-12-15 22:07
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.