X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=rules.lisp;h=dad93ad91278d862fc1998d333a0536945b551ad;hb=90c2e4c13bd89c48de9fe0da126547447b7b9e01;hp=246ecb366c0d0fb02599c341ca94be82e7b76ecf;hpb=0817a8721cbefca2205dcde535ff6b164033abef;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))