一小段程序，求优化
本帖最后由 wharan 于 2023-6-14 21:18 编辑有这么一段程序，A数据表，C数据表，两个表数据无法直接对应，需要通过有A和C共同数据特征的B来实现。现在我用foreach已经实现该功能，但编程方法不好，感觉效率较低。求高手优化以下。
数据转化部分：
(foreach x New_List
(foreach y keyword
(if
(vl-some
'(lambda (tmp) (wcmatch (strcase (car x)) (strcase tmp)))
(cadr y)
)
(setq Tmp1 (cons (cons (car (cdr y)) (cdr x)) Tmp1))
)
)
)
测试数据都不给一套吗 飞雪神光 发表于 2023-6-14 20:13
测试数据都不给一套吗
已跟上测试程式 mapcar会快些吗？
页:
[1]