4 lines
118 B
Common Lisp
4 lines
118 B
Common Lisp
|
(defun numeric-string-p (string)
|
||
|
|
(let ((*read-eval* nil))
|
||
|
|
(ignore-errors (numberp (read-from-string string)))))
|