primitives: Change PRIMITIVE: to check that the word is in that vocabulary and the...

[factor.git] / core / arrays / arrays.factor

diff --git a/core/arrays/arrays.factor b/core/arrays/arrays.factor
index 384f0af67817e43d6e3ef0ae9107de93019b5e12..8fc2f88b6526a6e9fb0847ea2fe22c18adc34722 100644 (file)
--- a/core/arrays/arrays.factor
+++ b/core/arrays/arrays.factor
@@ -5,6 +5,9 @@ IN: arrays
 
 BUILTIN: array { length array-capacity read-only initial: 0 } ;
 
+PRIMITIVE: <array> ( n elt -- array )
+PRIMITIVE: resize-array ( n array -- new-array )
+
 M: array clone (clone) ; inline
 M: array length length>> ; inline
 M: array nth-unsafe [ integer>fixnum ] dip array-nth ; inline