Index: /trunk/source/objc-bridge/objc-runtime.lisp
===================================================================
--- /trunk/source/objc-bridge/objc-runtime.lisp	(revision 13906)
+++ /trunk/source/objc-bridge/objc-runtime.lisp	(revision 13907)
@@ -2902,5 +2902,5 @@
               ,@decls
               (rlet ((,super :objc_super
-                       #+(or apple-objc coctron-objc) :receiver #+gnu-objc :self ,self
+                       #+(or apple-objc cocotron-objc) :receiver #+gnu-objc :self ,self
                        #+(or apple-objc-2.0 cocotron-objc) :super_class #-(or apple-objc-2.0 cocotron-objc) :class
                        ,@(if class-p