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

[factor.git] / extra / c / preprocessor / preprocessor.factor

diff --git a/extra/c/preprocessor/preprocessor.factor b/extra/c/preprocessor/preprocessor.factor
index 1a128c57b339c6e2e3be8c49a17c0a4e1eac5c2b..22c7f0fb381fbf380ea988f60d75a7d306769809 100644 (file)
--- a/extra/c/preprocessor/preprocessor.factor
+++ b/extra/c/preprocessor/preprocessor.factor
@@ -49,7 +49,7 @@ ERROR: header-file-missing path ;
 
 :: read-standard-include ( preprocessor-state path -- )
     preprocessor-state dup library-paths>>
-    [ path append-path exists? ] find nip
+    [ path append-path file-exists? ] find nip
     [
         dup [
             path append-path
@@ -61,7 +61,7 @@ ERROR: header-file-missing path ;
     ] if* ;
 
 : read-local-include ( preprocessor-state path -- )
-    dup exists? [ preprocess-file ] [ 2drop ] if ;
+    dup file-exists? [ preprocess-file ] [ 2drop ] if ;
 
 : skip-whitespace/comments ( sequence-parser -- sequence-parser )
     skip-whitespace