关于子程序的问题
 

关于子程序的问题
www.dimcax.com
关于子程序的问题
请问子程序的参数代入的是表，返回的也必须是表吗？
(defun bggs (lstbd1 / b i bd)
;(setq lstbd1 '(1.85 "b=2" 3.55 "b=8" 5.35 "b=8" 6.95 "b=5" 8.4 "d=28" 9.7 "d=33"))
(if (/= lstbd1 nil)
(progn
(setq i 1)
(setq b 0)
(repeat (/ (length lstbd1) 2)
(setq bd (nth i lstbd1))
(if (= (wcmatch bd "b*") t)
(setq b (1+ b))
;(progn
;(= (wcmatch bd "d*") t)
;(setq d (1+ d))
;)
)
(setq i (+ i 2))
)
)
)
b
)
lstbd1是表，返回值是数字，可调用子程序时提示函数错误，不知为什么？
d
...调用子程序时提示函数错误...
command: (bggs lstbd1)
4
ok here
d