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