[求助]请问怎么判断文字内容是否是整数？

hvac_wh

pizg 发表于 2010-8-12 18:03
如果
(setq S nil)
則

程序有误，对 (setq s nil) 函数出错，正确的应为

(defun isInt(s)
  (cond
      ((not  (= (type s ) 'STR)) nil)
      ((= (type (read s)) 'INT) T)
      (T nil)
    )  
)

ZZXXQQ

(defun isint (s)
(and (= (type s) 'STR) (= (type (read s) 'INT))
)

wowan1314

(if (= (type (read str)) 'INT)
t
nil
))

zhongys

此类函数的应用对DCL的非法输入最有用处。