如何让LISP 跳出循环。并继续执行下面的程序。

gaoliang286

如何让LISP 跳出循环。并继续执行下面的程序。

如题。  
  ( while (< n 1000)
  ........................
  ........................ ）
  （setq x 10）  
如何当n 还不到1000时。 跳出循环。。。并可赋值x。

ZZXXQQ

(while (< n 1000)
……
(setq x 10)
(if (= x 10)
 (setq n 1000)
(progn
……
)
);end if
);end while

caiqs

要跳出时(setq n 1000)

luowy

不知道楼主想表达什么，如果跳出循环就必须满足循环终止的条件，如果还有其他要求，则另外考虑，总而言之，难度不大

gaoliang286

二楼的方法正和我意。不好意思。答复您晚了。这几天忙。。。。
  谢谢您。。祝您愉快。。。