factor: superclass -> superclass-of, superclasses -> superclasses-of

[factor.git] / basis / classes / struct / struct.factor

diff --git a/basis/classes/struct/struct.factor b/basis/classes/struct/struct.factor
index 07ad7df82dc86d6fb538597d270cbe6d0dffbe89..b2d5e02dd141b1852cdc414a6fd4018735f3ac51 100644 (file)
--- a/basis/classes/struct/struct.factor
+++ b/basis/classes/struct/struct.factor
@@ -35,7 +35,7 @@ TUPLE: struct-bit-slot-spec < struct-slot-spec
     bits signed? ;
 
 PREDICATE: struct-class < tuple-class
-    superclass \ struct eq? ;
+    superclass-of \ struct eq? ;
 
 SLOT: fields