@@ -73,6 +73,7 @@
app-delegate-class))
+#+(or)
(defun %setup-objc-class (name base ivars)
(let ((class-pair (objc-allocate-class-pair base name 0)))
(loop for ivar in ivars