From: Christophe Rhodes <csr21@cantab.net>
Date: Thu, 16 Jan 2014 12:44:35 +0000 (+0000)
Subject: note problem with :class slot
X-Git-Tag: els2014-submission~14
X-Git-Url: http://christophe.rhodes.io/gitweb/?a=commitdiff_plain;h=a31339b89d5d624bbf24a1822327a3ec2d2b675f;p=specializable.git

note problem with :class slot

Really I want per-class allocation, not "in this class" allocation.
Achievable with a small amount of MOP, but...
---

diff --git a/specializable.lisp b/specializable.lisp
index 5a0c096..ebe4794 100644
--- a/specializable.lisp
+++ b/specializable.lisp
@@ -20,6 +20,7 @@
 (in-package "SPECIALIZABLE")
 
 (defclass extended-specializer (sb-mop:specializer)
+  ;; FIXME: this doesn't actually do quite what I wanted.
   ((direct-methods-table :allocation :class
                          :initform nil :accessor direct-methods-table)))