fixnum-safety
Sorry for maybe not having understood this completely enough. But the following compilation warning seems somewhat strange to me: (declaim (optimize (safety 1) (speed 3) (space 0) (float 1) (debug 0) (fixnum-safety 2))) (defun toll (a b) (declare (type single-float a b)) (the single-float (+ a b))) ;;;*** Warning in TOLL: Declared types SINGLE-FLOAT and FIXNUM are disjoint. ; TOLL ;;; Compilation finished with 1 warning, 0 errors. (toll 3 4) works fine. If I invoke (toll 3.4 6.7): Error: In + of (3.4 6.7) args should be of type NUMBER. If I remove the declare statement (as well as (the ...)), I have the same error. Cheers, P.