]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/vocabs/files/files.factor
io.files: exists? -> file-exists? and rename primitive.
[factor.git] / basis / vocabs / files / files.factor
index 96bef7788bc568e8a20f49b1e2ee3338f19c9edd..2203de21c07d18dd7211c7f42b8de02fcc80f344 100644 (file)
@@ -9,7 +9,7 @@ IN: vocabs.files
 
 : vocab-tests-dir ( vocab -- paths )
     dup vocab-dir "tests" append-path vocab-append-path [
-        dup exists? [
+        dup file-exists? [
             dup directory-files [ ".factor" tail? ] filter
             [ append-path ] with map
         ] [ drop f ] if
@@ -18,7 +18,7 @@ IN: vocabs.files
 : vocab-tests ( vocab -- paths )
     vocab-name ".private" ?tail drop
     [
-        [ vocab-tests-path [ dup exists? [ , ] [ drop ] if ] when* ]
+        [ vocab-tests-path [ dup file-exists? [ , ] [ drop ] if ] when* ]
         [ vocab-tests-dir % ] bi
     ] { } make ;