[dylan,tests] Add correct cases to range-5 test

* sources/dylan/apple-dylan-test-suite/test-range.dylan Add correct cases to range-5 test, in addition to existing incorrect cases
dylan-lang · Mar 21, 2016 · 9a9c16b · 9a9c16b
1 parent c69f8a7
commit 9a9c16b
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/sources/dylan/apple-dylan-test-suite/test-range.dylan b/sources/dylan/apple-dylan-test-suite/test-range.dylan
@@ -47,6 +47,10 @@ define test range-4 (description: "BY:")
 end test range-4;
 
 define test range-5 (description: "to:, by:, and size:")
+  check-true("", range(to: 5, by: 2, size: 3) = #(0, 2, 4));
+  check-true("", range(to: 6, by: 2, size: 4) = #(0, 2, 4, 6));
+  check-true("", range(to: -5, by: -2, size: 3) = #(0, -2, -4));
+  check-true("", range(to: -6, by: -2, size: 4) = #(0, -2, -4, -6));
   check-condition("", <error>, range(to: 6, by: 2, size: 3));
   check-condition("", <error>, range(to: 6, by: 2, size: 3));
   check-condition("", <error>, range(to: -6, by: -2, size: 3));