]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/constructors/constructors.factor
factor: superclass -> superclass-of, superclasses -> superclasses-of
[factor.git] / extra / constructors / constructors.factor
index b3d671f36824f17dd5e1c61037284207498e237d..49d9d5098c48aa1467d52734d301fc8b48f6bb8d 100644 (file)
@@ -7,7 +7,7 @@ words alien.parser ;
 IN: constructors
 
 : all-slots-assoc ( class -- slots )
-    superclasses [
+    superclasses-of [
         [ "slots" word-prop ] keep '[ _ ] { } map>assoc
     ] map concat ;