xiaoliang200 发表于 2008-11-13 20:57:00

高手帮我看看这个函数是否有错？

<p>(Defun vllist-explode&nbsp;(lst)<br/>&nbsp;&nbsp;&nbsp; (cond<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ((not lst) nil)<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ((atom lst) (list lst))<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ((append (vllist-explode (car lst))<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; (vllist-explode (cdr lst))<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; )<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; )<br/>&nbsp;&nbsp;&nbsp; )<br/>&nbsp; )</p><p>网上看到的一个函数。定义的函数里包含了自身定义的函数，我觉得错了，可又运行正常！谁能给我解答一下？</p>

龙龙仔 发表于 2008-11-14 08:03:00

运行正常！說明沒有錯,這類程序稱遞歸程序

xiaoliang200 发表于 2008-11-14 17:06:00

谢谢！又学到了一招！
页: [1]
查看完整版本: 高手帮我看看这个函数是否有错？