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."))