X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=rules.lisp;fp=rules.lisp;h=dad93ad91278d862fc1998d333a0536945b551ad;hb=fa179cd84c44d2f0e4ea231537afc8a6733c406e;hp=246ecb366c0d0fb02599c341ca94be82e7b76ecf;hpb=af7152b8b0612420d327a422fa1d376c21daf3fb;p=hyperobject.git

diff --git a/rules.lisp b/rules.lisp
index 246ecb3..dad93ad 100644
--- a/rules.lisp
+++ b/rules.lisp
@@ -59,8 +59,7 @@
 	(funcall (func rule) obj)))))
 
 
-;;#-ho-no-svuc
-#+ignore
+#+ho-svuc
 (defmethod (setf slot-value-using-class) :around
     (new-value (cl hyperobject-class) obj (slot hyperobject-esd))