Eliminated redundant type testing.
treefdd1089cdb258b0acd6d4652e095cd1781c7e256
-rw-r--r-- 1058 defpackage.lisp
-rw-r--r-- 8070 floating-point.lisp
-rw-r--r-- 573 lisp-unit.asd
-rw-r--r-- 14143 lisp-unit.lisp