detecting lisp overflow



On 3/18/2013 3:34 PM, Edwin Woollett wrote:
<snip>


:lisp (defun  ff (x) (if (float-inf-p x) 'inf x))

:lisp  (mapcar  #'ff (list 100.0 (exp 1000.0) 45))

returns the list

(100.0 INF 45)

if that is what you want.