io.files: exists? -> file-exists? and rename primitive.

[factor.git] / extra / machine-learning / data-sets / data-sets.factor

diff --git a/extra/machine-learning/data-sets/data-sets.factor b/extra/machine-learning/data-sets/data-sets.factor
index 2d38cb4c39717087b15c3dbe1f9e6f226cc1e44d..0770d1a0b10ff01e30d137218b6659582c01aec5 100644 (file)
--- a/extra/machine-learning/data-sets/data-sets.factor
+++ b/extra/machine-learning/data-sets/data-sets.factor
@@ -68,7 +68,7 @@ PRIVATE>
 : download-to-directory ( url directory -- )
     dup make-directories
     [
-        dup { [ download-name exists? ] [ file-stem exists? ] } 1|| [
+        dup { [ download-name file-exists? ] [ file-stem file-exists? ] } 1|| [
             drop
         ] [
             download
@@ -107,7 +107,7 @@ PRIVATE>
             "http://yann.lecun.com/exdb/mnist/t10k-labels-idx1-ubyte.gz"
         }
         [ [ "resource:datasets/" download-to-directory ] parallel-each ]
-        [ [ dup file-stem exists? [ drop ] [ file-name gzip-decompress-file ] if ] each ]
+        [ [ dup file-stem file-exists? [ drop ] [ file-name gzip-decompress-file ] if ] each ]
         [ [ file-stem binary file-contents ] map ] tri
         first4 {
             [ mnist-data>array ]