factor: more top level forms.

[factor.git] / basis / io / files / unique / unique.factor

diff --git a/basis/io/files/unique/unique.factor b/basis/io/files/unique/unique.factor
index e0452567ef7714046aaa94ebf3856d52ff63a801..1a61aac3fc70a0213629ba882bfb99a83dad9a28 100644 (file)
--- a/basis/io/files/unique/unique.factor
+++ b/basis/io/files/unique/unique.factor
@@ -2,7 +2,7 @@
 ! See http://factorcode.org/license.txt for BSD license.
 USING: combinators continuations fry io.backend io.directories
 io.pathnames kernel locals namespaces random.data sequences
-system vocabs ;
+system vocabs vocabs.platforms ;
 IN: io.files.unique
 
 <PRIVATE
@@ -72,7 +72,5 @@ PRIVATE>
     [ path quot with-directory ]
     [ path delete-tree ] finally ; inline
 
-{
-    { [ os unix? ] [ "io.files.unique.unix" ] }
-    { [ os windows? ] [ "io.files.unique.windows" ] }
-} cond require
+USE-UNIX: io.files.unique.unix
+USE-WINDOWS: io.files.unique.windows