[讨论]：关于输入错误后回退的问题

CADghost

如果LISP提示的语句在输入上有错误，怎么返回重新输入呢？
比如
(setq a (getint ":\n请指定你要的整数:"))
这里想让a等于1，可是却输入了5并且按了回车
怎样在LISP中返回并重新输入呢？

aeo

(while  (setq a (getint ":\n请指定你要的整数:"))
  (cond ((= a 1)(....))
           ((= a 2) ...))
          ((= a 5))
  )
)

wkai

最初由 CADghost 发布
[B]如果LISP提示的语句在输入上有错误，怎么返回重新输入呢？
比如
(setq a (getint ":\n请指定你要的整数:"))
这里想让a等于1，可是却输入了5并且按了回车
怎样在LISP中返回并重新输入呢？ [/B]

呵呵

可以在后面的程序中提供一个让用户确认的机会。

比如让用户输入 Y 表示上述输入的整数没有问题，输入N表示我要重新输入一个新的整数值。

如果用户选择了N，并开始输入了一个新值。

输入完毕，你会不会又提出这个问题？
哎呀，刚刚"输入上有错误，怎么返回重新输入呢？"

还要在后面的程序中提供新的确认机会么？？？！！！

xiaohero

支持斑竹的做法,让程序自己判断自己处理.加入用户确认是势必影响画图速度,这样就达不到我们编程的目的.个人爱好这种做法:

(setq a (getint ":\n请指定你要的整数1:"))
(while (!= a 1)
(cond
(setq a (getint ":\n请指定你要的整数1:"))
)
)

wkai

如果必须输入1的话，还需要输入么？
直接(setq a 1)就行了。

陌生人

最初由 wkai 发布
[B]如果必须输入1的话，还需要输入么？
直接(setq a 1)就行了。 [/B]

哈哈，与我心有戚戚焉！

chstart

不太理解，错误的控制对不同数据类型有必要，但是如果一定要限定某个数，目的是什么？
倒不如在不同程序中 setq 不同的值。