fix directory listing

library/compiler/ppc/fixnum.factor

@@ -1,8 +1,8 @@
 ! Copyright (C) 2005 Slava Pestov.
 ! See http://factor.sf.net/license.txt for BSD license.
 IN: compiler-backend
-USING: assembler compiler kernel math math-internals memory
-namespaces words ;
+USING: assembler compiler kernel kernel-internals math
+math-internals memory namespaces words ;
 
 : >3-imm< ( vop -- out1 in2 in1 )
     [ 0 vop-out v>operand ] keep

library/compiler/ppc/stack.factor

@@ -1,7 +1,8 @@
 ! Copyright (C) 2005 Slava Pestov.
 ! See http://factor.sf.net/license.txt for BSD license.
 IN: compiler-backend
-USING: assembler compiler errors kernel math memory words ;
+USING: assembler compiler errors kernel kernel-internals math
+memory words ;
 
 GENERIC: loc>operand
 

library/io/files.factor

@@ -34,7 +34,7 @@ DEFER: directory.
         dup directory? [
             >r "/" append r>
             dup [ directory. ] curry outline set
-        ] when swap file set
+        ] when file set
     ] make-hash ;
 
 : file. ( dir name -- )