~mdw / lisp / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 25760fe) | patch
mop: Implement a class which automatically defines a predicate.
authorMark Wooding <mdw@distorted.org.uk>
Sun, 30 Apr 2006 02:48:20 +0000 (03:48 +0100)
committerMark Wooding <mdw@distorted.org.uk>
Sun, 30 Apr 2006 12:29:57 +0000 (13:29 +0100)
commit9b2e67a5b9f0d9e1e5eba1f57f3a94c1863e368a
tree45f1049d83edaf04014461d9fba2ff615d6605d9tree | snapshot (tar.gz zip)
parent25760fe1230ce92a676207997419755cf03de420commit | diff
mop: Implement a class which automatically defines a predicate.

I've found myself typing

  (defgeneric foop (thing)
    (:method (((thing foo)) t))
    (:method (((thing t)) nil)))

too many times.  Now I just put `(:predicate foop)' in the class
definition and forget about it.
mdw-mop.lisp diff | blob | blame | history
A small Lisp utilities library