;;; Added some additional type declarations for maximum speed under certain ;;; Common Lisp compilers.