iCAx开思工具箱

标题: 在while循环中的报错 [打印本页]

作者: zhhunicorn 时间: 2011-5-11 11:56
标题: 在while循环中的报错
(defun c:10test1()
  (setq data_file (getfiled "展点范例" "D:\\Program Files\\AutoCAD 2007\\myLisp\\1.dat" "dat" 2))
  (setq ff (open data_file "r"))
  (setq data (read-line ff))
  while( (/= data NIL)
(setq data (read-line ff))
)
(close ff)
  (prin1)
)
这个是一个书上的例子，1.dat是100，100    200，100  等5个坐标点。
在执行while循环体一次再次进入循环时; 即在执行(/= data NIL)时报错
错误: 函数错误: T

作者: zhhunicorn 时间: 2011-5-11 12:34
标题: RE: 在while循环中的报错
注明一下，编程环境是 visual lisp.

欢迎光临 iCAx开思工具箱 (https://t.icax.org/)