[t/spec] Bring some tests in line with the spec.

git-svn-id: http://svn.pugscode.org/pugs@30062 c213334d-75ef-0310-aa23-eaa082d1ae64
Raku · Mar 13, 2010 · ae8ff8d · ae8ff8d
1 parent 3092574
commit ae8ff8d
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/S03-smartmatch/array-array.t b/S03-smartmatch/array-array.t
@@ -8,10 +8,10 @@ plan *;
     ok(!((1, 2) ~~ (1, 1)), "1 2 !~~ 1 1");
     ok(!((1, 2, 3) ~~ (1, 2)), "1 2 3 !~~ 1 2");
     ok(!((1, 2) ~~ (1, 2, 3)), "1 2 !~~ 1 2 3");
-    ok(!(list() ~~ list(1)), "array smartmatch boundary conditions");
-    ok(!(list(1) ~~ list()), "array smartmatch boundary conditions");
-    ok((list() ~~ list()), "array smartmatch boundary conditions");
-    ok((list(1) ~~ list(1)), "array smartmatch boundary conditions");
+    ok(!([] ~~ [1]), "array smartmatch boundary conditions");
+    ok(!([1] ~~ []), "array smartmatch boundary conditions");
+    ok(([] ~~ []), "array smartmatch boundary conditions");
+    ok(([1] ~~ [1]), "array smartmatch boundary conditions");
     ok((1,2,3,4) ~~ (1,*), 'array smartmatch dwims * at end');
     ok((1,2,3,4) ~~ (1,*,*), 'array smartmatch dwims * at end (many *s)');
     ok((1,2,3,4) ~~ (*,4), 'array smartmatch dwims * at start');