[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/cl-macs.el

[Eli Zaretskii]

Index: emacs/lisp/emacs-lisp/cl-macs.el
diff -c emacs/lisp/emacs-lisp/cl-macs.el:1.53 
emacs/lisp/emacs-lisp/cl-macs.el:1.54
*** emacs/lisp/emacs-lisp/cl-macs.el:1.53       Mon Jul  4 17:33:35 2005
--- emacs/lisp/emacs-lisp/cl-macs.el    Sat Jul 16 11:34:50 2005
***************
*** 2384,2389 ****
--- 2384,2390 ----
             (cl-make-type-test val (funcall (get type 'cl-deftype-handler))))
            ((memq type '(nil t)) type)
            ((eq type 'null) `(null ,val))
+           ((eq type 'atom) `(atom ,val))
            ((eq type 'float) `(floatp-safe ,val))
            ((eq type 'real) `(numberp ,val))
            ((eq type 'fixnum) `(integerp ,val))