factor: second stab at [ ] [ ] unit-test -> { } [ ] unit-test

[factor.git] / basis / io / files / links / unix / unix-tests.factor

diff --git a/basis/io/files/links/unix/unix-tests.factor b/basis/io/files/links/unix/unix-tests.factor
index 23de95f519c591a9c83147d45b6e88e811e2905b..22c1156ddf3cbcba4199bbfdcbfbb7fb59a50943 100644 (file)
--- a/basis/io/files/links/unix/unix-tests.factor
+++ b/basis/io/files/links/unix/unix-tests.factor
@@ -7,7 +7,7 @@ IN: io.files.links.unix.tests
     [ '[ [ 1 + ] keep [ number>string _ prepend ] bi@ make-link ] each-integer ]
     [ [ number>string ] dip prepend touch-file ] 2bi ; inline
 
-[ t ] [
+{ t } [
     [
         current-temporary-directory get [
             5 "lol" make-test-links
@@ -25,7 +25,7 @@ IN: io.files.links.unix.tests
     ] with-unique-directory
 ] [ too-many-symlinks? ] must-fail-with
 
-[ t ] [
+{ t } [
     110 symlink-depth [
         [
             current-temporary-directory get [