Update of /project/ieeefp-tests/cvsroot/ieeefp-tests/ieee754 In directory common-lisp.net:/tmp/cvs-serv24446/ieee754
Modified Files: ieee754-abcl.lisp Log Message: Move *ROUNDING-MODES* and *FLOAT-TYPES* to the IEEEFP-TESTS package.
Make the asdf system description actually do what it's meant to.
Date: Tue Jun 15 06:55:08 2004 Author: crhodes
Index: ieeefp-tests/ieee754/ieee754-abcl.lisp diff -u ieeefp-tests/ieee754/ieee754-abcl.lisp:1.1 ieeefp-tests/ieee754/ieee754-abcl.lisp:1.2 --- ieeefp-tests/ieee754/ieee754-abcl.lisp:1.1 Wed Jun 9 08:51:02 2004 +++ ieeefp-tests/ieee754/ieee754-abcl.lisp Tue Jun 15 06:55:08 2004 @@ -1,8 +1,8 @@ (in-package "IEEE754-INTERNALS")
-(defvar *float-types* (list :double)) +(defvar ieee754-tests:*float-types* (list :double))
-(defvar *rounding-modes* (list :nearest)) +(defvar ieee754-tests:*rounding-modes* (list :nearest))
(defun make-single-float (x) (error "Not supported."))