Factor 0.79

[factor.git] / library / collections / arrays.factor

diff --git a/library/collections/arrays.factor b/library/collections/arrays.factor
index ed822103398259884a30019ce7eeeeb15f3855b8..ce931b7775bbdded9fd2c94bc23f28d789ccbeb1 100644 (file)
--- a/library/collections/arrays.factor
+++ b/library/collections/arrays.factor
@@ -18,8 +18,8 @@ IN: arrays
 
 M: array clone (clone) ;
 M: array length array-capacity ;
-M: array nth bounds-check array-nth ;
-M: array set-nth bounds-check set-array-nth ;
+M: array nth bounds-check >r >fixnum r> array-nth ;
+M: array set-nth bounds-check >r >fixnum r> set-array-nth ;
 M: array nth-unsafe >r >fixnum r> array-nth ;
 M: array set-nth-unsafe >r >fixnum r> set-array-nth ;
 M: array resize resize-array ;