]> gitweb.factorcode.org Git - factor.git/blobdiff - core/generic/single/single.factor
Factor: Rename <enum> to <enumerated> to not confuse with ENUM:s
[factor.git] / core / generic / single / single.factor
index afa6376983f0854a75970989f0f0049fe3cc81af..bef4a22765e1e0e7fef40bfa9b16f1057f0e85ac 100644 (file)
@@ -157,7 +157,7 @@ GENERIC: compile-engine ( engine -- obj )
     [ over assumed [ compile-engine ] with-variable ] assoc-map ;
 
 : direct-dispatch-table ( assoc n -- table )
-    default get <array> <enum> swap assoc-union! seq>> ;
+    default get <array> <enumerated> swap assoc-union! seq>> ;
 
 : tag-number ( class -- n ) "type" word-prop ;
 
@@ -184,7 +184,7 @@ M: tuple-dispatch-engine compile-engine
     tuple assumed [
         echelons>> compile-engines
         dup keys supremum 1 + f <array>
-        <enum> swap assoc-union! seq>>
+        <enumerated> swap assoc-union! seq>>
     ] with-variable ;
 
 PREDICATE: predicate-engine-word < word "owner-generic" word-prop ;