/[cmucl]/src/pcl/macros.lisp
ViewVC logotype

Diff of /src/pcl/macros.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.25 by gerd, Sun May 4 13:11:21 2003 UTC revision 1.26 by emarsden, Mon May 5 11:44:56 2003 UTC
# Line 75  Line 75 
75    `(position ,item ,list :test #'eq))    `(position ,item ,list :test #'eq))
76    
77  (defmacro neq (x y)  (defmacro neq (x y)
78    `(not (eq ,x ,y))))    `(not (eq ,x ,y)))
79    
80  (declaim (inline car-safe))  (declaim (inline car-safe))
81  (defun car-safe (obj)  (defun car-safe (obj)

Legend:
Removed from v.1.25  
changed lines
  Added in v.1.26

  ViewVC Help
Powered by ViewVC 1.1.5