From a6bbd49de14d3f4102837a8a6327b2f84f084af5 Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Wed, 8 Apr 1992 00:31:43 +0000 Subject: [PATCH] Don't try to define the type REAL under CMUCL, because we have a real REAL. --- clx/clx.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/clx/clx.lisp b/clx/clx.lisp index 39928a8df..157d7bdc9 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 -- GitLab