]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/specialized-vectors/specialized-vectors.factor
functors: FUNCTOR: ;FUNCTOR -> <FUNCTOR: ;FUNCTOR>
[factor.git] / basis / specialized-vectors / specialized-vectors.factor
index 52ec17ae86ed92fcd319825517c92fb60bcee819..721aeef9072973662fa2468f5b1b428fc9d20f09 100644 (file)
@@ -13,7 +13,7 @@ MIXIN: specialized-vector
 
 <PRIVATE
 
-FUNCTOR: define-vector ( T -- )
+<FUNCTOR: define-vector ( T -- )
 
 V DEFINES-CLASS ${T}-vector
 
@@ -56,7 +56,7 @@ SYNTAX: V{ \ } [ >V ] parse-literal ;
 INSTANCE: V specialized-vector
 INSTANCE: V growable
 
-;FUNCTOR
+;FUNCTOR>
 
 : specialized-vector-vocab ( c-type -- vocab )
     [