Make cl-floatp-safe just an alias for floatp
* lisp/emacs-lisp/cl-lib.el (cl-floatp-safe): Make it an alias for floatp. * lisp/emacs-lisp/cl-macs.el (cl--make-type-test) (cl--compiler-macro-assoc): Use floatp rather than cl-floatp-safe. * doc/misc/cl.texi: Remove commented out sections about cl-floatp-safe.
This commit is contained in:
parent
81ed22e4ca
commit
1dfcc79e83
4 changed files with 11 additions and 25 deletions
|
@ -271,11 +271,7 @@ so that they are registered at compile-time as well as run-time."
|
|||
|
||||
;;; Numbers.
|
||||
|
||||
(defun cl-floatp-safe (object)
|
||||
"Return t if OBJECT is a floating point number.
|
||||
On Emacs versions that lack floating-point support, this function
|
||||
always returns nil."
|
||||
(and (numberp object) (not (integerp object))))
|
||||
(define-obsolete-function-alias 'cl-floatp-safe 'floatp "24.4")
|
||||
|
||||
(defsubst cl-plusp (number)
|
||||
"Return t if NUMBER is positive."
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue