]> gitweb.factorcode.org Git - factor.git/commitdiff
inline a couple of combinators to fix compile warnings
authorDoug Coleman <erg@jobim.local>
Sat, 28 Mar 2009 21:34:52 +0000 (16:34 -0500)
committerDoug Coleman <erg@jobim.local>
Sat, 28 Mar 2009 21:34:52 +0000 (16:34 -0500)
basis/io/directories/search/search.factor

index a3db10ffff5caf48104a77f90f2183c53de80ca7..6db83ebca6b43e5f4a23768d95426a6f8635d144 100755 (executable)
@@ -65,9 +65,9 @@ ERROR: file-not-found ;
         _ [ _ _ find-file [ file-not-found ] unless* ] attempt-all
     ] [
         drop f
-    ] recover ;
+    ] recover ; inline
 
 : find-all-in-directories ( directories bfs? quot: ( obj -- ? ) -- paths/f )
-    '[ _ _ find-all-files ] map concat ;
+    '[ _ _ find-all-files ] map concat ; inline
 
 os windows? [ "io.directories.search.windows" require ] when