]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/sequences/modified/modified-tests.factor
factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring tool!
[factor.git] / extra / sequences / modified / modified-tests.factor
index 4bcbb29da6982d49ef309bed687e91c80d89536f..c097a257e5fdf4f19385d74d7f44ef639f6d6aee 100644 (file)
@@ -1,15 +1,15 @@
 USING: accessors arrays kernel sequences sequences.modified tools.test ;
 IN: sequences.modified.tests
 
-[ { 2 4 6 } ] [ { 1 2 3 } 2 scale ] unit-test
-[ { 1 4 3 } ] [ { 1 2 3 } 2 <scaled> 8 1 pick set-nth seq>> ] unit-test
-[ { 2 8 6 } ] [ { 1 2 3 } 2 <scaled> 8 1 pick set-nth >array ] unit-test
+{ { 2 4 6 } } [ { 1 2 3 } 2 scale ] unit-test
+{ { 1 4 3 } } [ { 1 2 3 } 2 <scaled> 8 1 pick set-nth seq>> ] unit-test
+{ { 2 8 6 } } [ { 1 2 3 } 2 <scaled> 8 1 pick set-nth >array ] unit-test
 
-[ { 2 3 4 } ] [ { 1 2 3 } 1 seq-offset ] unit-test
-[ { 1 5 3 } ] [ { 1 2 3 } 1 <offset> 6 1 pick set-nth seq>> ] unit-test
-[ { 2 6 4 } ] [ { 1 2 3 } 1 <offset> 6 1 pick set-nth >array ] unit-test
+{ { 2 3 4 } } [ { 1 2 3 } 1 seq-offset ] unit-test
+{ { 1 5 3 } } [ { 1 2 3 } 1 <offset> 6 1 pick set-nth seq>> ] unit-test
+{ { 2 6 4 } } [ { 1 2 3 } 1 <offset> 6 1 pick set-nth >array ] unit-test
 
-[ 4 ] [ { { 1 2 } { 3 4 } } <summed> 0 swap nth ] unit-test
-[ 6 ] [ { { 1 2 } { 3 4 } } <summed> 1 swap nth ] unit-test
-[ 2 ] [ { { 1 2 } { 3 4 } } <summed> length ] unit-test
-[ { 4 6 } ] [ { { 1 2 } { 3 4 } } <summed> >array ] unit-test
+{ 4 } [ { { 1 2 } { 3 4 } } <summed> 0 swap nth ] unit-test
+{ 6 } [ { { 1 2 } { 3 4 } } <summed> 1 swap nth ] unit-test
+{ 2 } [ { { 1 2 } { 3 4 } } <summed> length ] unit-test
+{ { 4 6 } } [ { { 1 2 } { 3 4 } } <summed> >array ] unit-test