Re: [Sisc-users] detecting NaN and Infiinity
Brought to you by:
mradestock,
scgmille
From: Scott G. M. <scg...@em...> - 2007-05-31 03:19:28
|
On Tue, May 29, 2007 at 06:04:00PM +0400, Oleg A. Paraschenko wrote: > > Try equal? > > Unfortunately, no: > > $ sisc > which: no rlwrap in > (/home/olpa/bin:/bin:/usr/bin:/usr/local/bin:/usr/X11R6/bin:/usr/games) > SISC (1.15.3) > #;> (define (gx:nan? x) (equal? x #!nan)) > #;> (map gx:nan? (list (/ 0.0 0.0) (/ 1.0 0.0) (/ -1.0 0.0))) > (#t #t #t) That actually appears to be a bug then. If you have a sourceforge account, would you mind filing it? Otherwise I'll do so. Scott |