Group related tests

Raku · Jul 4, 2016 · 2f8f0a4 · 2f8f0a4
1 parent b4254c2
commit 2f8f0a4
Showing 1 changed file with 10 additions and 8 deletions.
diff --git a/S32-list/combinations.t b/S32-list/combinations.t
@@ -17,11 +17,13 @@ is (1, 2, 3).combinations.list.perl, ((), (1,), (2,), (3,), (1, 2), (1, 3), (2,
 is combinations(3,2).list.perl, ((0, 1), (0, 2), (1, 2)).perl, "combinations function";
 
 # RT #127778
-is combinations(-2,2).list.perl, ((),).perl,
-    'negative $n in sub combinations (1)';
-is combinations(-9999999999999999999,2).list.perl, ((),).perl,
-    'negative $n in sub combinations (2)';
-is combinations(2,-2).list.perl, ().perl,
-    'negative $k in sub combinations gives empty list (1)';
-is combinations(-2,-2).list.perl, ().perl,
-    'negative $k in sub combinations gives empty list (2)';
+{
+    is combinations(-2,2).list.perl, ((),).perl,
+        'negative $n in sub combinations (1)';
+    is combinations(-9999999999999999999,2).list.perl, ((),).perl,
+        'negative $n in sub combinations (2)';
+    is combinations(2,-2).list.perl, ().perl,
+        'negative $k in sub combinations gives empty list (1)';
+    is combinations(-2,-2).list.perl, ().perl,
+        'negative $k in sub combinations gives empty list (2)';
+}