IN: suffix-arrays.tests
! built from [ all-words 10 head [ name>> ] map ]
-{ } [
+[ ] [
{
"run-tests"
"must-fail-with"
} >suffix-array "suffix-array" set
] unit-test
-{ t }
+[ t ]
[ "suffix-array" get "" swap query empty? not ] unit-test
-{ { } }
+[ { } ]
[ SA{ } "something" swap query ] unit-test
-{ { "unit-test" "(unit-test)" } }
+[ { "unit-test" "(unit-test)" } ]
[ "suffix-array" get "unit-test" swap query ] unit-test
-{ t }
+[ t ]
[ "suffix-array" get "something else" swap query empty? ] unit-test
-{ { "rofl" } } [ SA{ "rofl" } "r" swap query ] unit-test
-{ { "rofl" } } [ SA{ "rofl" } "o" swap query ] unit-test
-{ { "rofl" } } [ SA{ "rofl" } "f" swap query ] unit-test
-{ { "rofl" } } [ SA{ "rofl" } "l" swap query ] unit-test
-{ { } } [ SA{ "rofl" } "t" swap query ] unit-test
+[ { "rofl" } ] [ SA{ "rofl" } "r" swap query ] unit-test
+[ { "rofl" } ] [ SA{ "rofl" } "o" swap query ] unit-test
+[ { "rofl" } ] [ SA{ "rofl" } "f" swap query ] unit-test
+[ { "rofl" } ] [ SA{ "rofl" } "l" swap query ] unit-test
+[ { } ] [ SA{ "rofl" } "t" swap query ] unit-test