RosettaCodeData/Task/Determine-if-a-string-is-numeric/Common-Lisp/determine-if-a-string-is-numeric-1.lisp

(defun numeric-string-p (string)
  (let ((*read-eval* nil))
    (ignore-errors (numberp (read-from-string string)))))
	`(defun numeric-string-p (string)`
	`(let ((read-eval nil))`
	`(ignore-errors (numberp (read-from-string string)))))`