diff --git a/basis/io/files/links/links-tests.factor b/basis/io/files/links/unix/unix-tests.factor similarity index 96% rename from basis/io/files/links/links-tests.factor rename to basis/io/files/links/unix/unix-tests.factor index bc03e42f92..b1d2c5b8fa 100644 --- a/basis/io/files/links/links-tests.factor +++ b/basis/io/files/links/unix/unix-tests.factor @@ -1,7 +1,7 @@ USING: io.directories io.files.links tools.test sequences io.files.unique tools.files fry math kernel math.parser io.pathnames namespaces ; -IN: io.files.links.tests +IN: io.files.links.unix.tests : make-test-links ( n path -- ) [ '[ [ 1+ ] keep [ number>string _ prepend ] bi@ make-link ] each ] diff --git a/core/kernel/kernel-tests.factor b/core/kernel/kernel-tests.factor index 0702f4931f..eae225e543 100644 --- a/core/kernel/kernel-tests.factor +++ b/core/kernel/kernel-tests.factor @@ -1,7 +1,7 @@ USING: arrays byte-arrays kernel kernel.private math memory namespaces sequences tools.test math.private quotations continuations prettyprint io.streams.string debugger assocs -sequences.private accessors ; +sequences.private accessors locals.backend ; IN: kernel.tests [ 0 ] [ f size ] unit-test @@ -35,7 +35,7 @@ IN: kernel.tests [ ] [ [ :c ] with-string-writer drop ] unit-test -: overflow-r 3 [ overflow-r ] dip ; +: overflow-r 3 load-local overflow-r ; [ overflow-r ] [ { "kernel-error" 14 f f } = ] must-fail-with