Skip to content
Browse files

Remove warning about CREATE-FLOAT-VALUES being defined twice.

Ignore-this: 3ea6be758a921264865d868192c8b2a3

 * I went for the simple fix and just conditionally read the default
   version of CREATE-FLOAT-VALUES, which is defined in
   default-backend.lisp. For the implementations that provide their
   own version of CREATE-FLOAT-VALUE in the according custom.lisp file
   this should remove a warning about the function being redefined,
   while all other implementations are unaffected by this patch.

darcs-hash:20100216095224-55f2f-40de5b78c2117354148c46c027b76bae2432df17.gz
  • Loading branch information...
1 parent 7b8fb16 commit 073c2ee02054af17e54cf8c4a7e84bd763eef2b9 @NikolausDemmel NikolausDemmel committed Feb 16, 2010
Showing with 1 addition and 0 deletions.
  1. +1 −0 default-backend.lisp
View
1 default-backend.lisp
@@ -219,6 +219,7 @@
;; Implementations are to provide an implementation for the create-float-value
;; function
+#+(not (or sbcl cmucl lispworks))
(defun create-float-values (value &rest codes)
"Returns a alist of special float to float code mappings."
(declare (ignore value codes))

0 comments on commit 073c2ee

Please sign in to comment.
Something went wrong with that request. Please try again.