[求助]帮助查找nil错误

TENGOMARK

各位好！

    又遇到一个问题，以下程序，执行回车动作后，出现

>目前选择数字号的位置 1输入数字号,回车不变:
:; 错误: 参数类型错误: numberp: nil

恳请各位高手帮忙指正，是何原因？

原意是：回车后保持st_num的数据不变，输入数字号后，则赋予数字值。

目前输入数字值可以进行下去，而输入回车或空格则报错。

有无可能改得回来。

万分感谢！

 

(princ "\n >目前选择数字号的位置 ")
  (princ st_num)
                (setq st_num1 (getint "输入数字号,回车不变:"))
                (if (/= st_num1 "")
                    (setq st_num st_num1)
                   (if ( = st_num1 "")
                     (setq st_num1 st_num)
                   )
                )

)

liu_kunlun

(if  st_num1

                    (setq st_num st_num1)
                    (setq st_num1 st_num)
              )

TENGOMARK

非常感谢！

     大侠就是高！高高高！