diff --git a/clx/clx.lisp b/clx/clx.lisp index 39928a8dfe8f864359dc752c84cc38f0ca08b65b..157d7bdc976abb8c324bd71ea1acf97a030cbb85 100644 --- a/clx/clx.lisp +++ b/clx/clx.lisp @@ -161,7 +161,7 @@ (deftype card4 () '(unsigned-byte 4)) -#-clx-ansi-common-lisp +#-(or clx-ansi-common-lisp cmu) (deftype real (&optional (min '*) (max '*)) (labels ((convert (limit floatp) (typecase limit