Changeset 14447


Ignore:
Timestamp:
Nov 22, 2010, 10:56:53 PM (9 years ago)
Author:
rme
Message:

Use the correct bits.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lib/numbers.lisp

    r14446 r14447  
    4949
    5050(defconstant double-float-nan
    51   #.(make-float-from-fixnums #x8000 0 #x3ff 1))
     51  #.(make-float-from-fixnums #x8000 0 #x7ff 1))
    5252
    5353(defun parse-float (str len off) 
Note: See TracChangeset for help on using the changeset viewer.