@@ -74,10 +74,15 @@
 	TEST(@"-[indexOfObject:]", [a[0] indexOfObject: c_ary[1]] == 1)
 
 	TEST(@"-[indexOfObjectIdenticalTo:]",
 	    [a[1] indexOfObjectIdenticalTo: c_ary[1]] == 1)
 
+	TEST(@"-[objectsFromIndex:toIndex",
+	    [[a[0] objectsFromIndex: 1
+			    toIndex: 3] isEqual:
+	    ([OFArray arrayWithObjects: c_ary[1], c_ary[2], nil])])
+
 	TEST(@"-[replaceObject:withObject:]",
 	    R([m[0] replaceObject: c_ary[1]
 		       withObject: c_ary[0]]) &&
 	    [[m[0] objectAtIndex: 0] isEqual: c_ary[0]] &&
 	    [[m[0] objectAtIndex: 1] isEqual: c_ary[0]] &&