]> gitweb.factorcode.org Git - factor.git/commitdiff
Fixing test-all and help-lint-all failures
authorSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Mon, 15 Dec 2008 09:33:04 +0000 (03:33 -0600)
committerSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Mon, 15 Dec 2008 09:33:04 +0000 (03:33 -0600)
19 files changed:
basis/concurrency/distributed/distributed-tests.factor
basis/db/pools/pools-tests.factor
basis/db/sqlite/sqlite-tests.factor
basis/db/tuples/tuples-tests.factor
basis/furnace/auth/providers/db/db-tests.factor
basis/furnace/sessions/sessions-tests.factor
basis/http/http-tests.factor
basis/io/directories/windows/tags.txt [new file with mode: 0644]
basis/io/files/info/windows/nt/nt.factor [deleted file]
basis/io/files/info/windows/tags.txt [new file with mode: 0644]
basis/io/files/types/types-docs.factor
basis/io/monitors/linux/linux-tests.factor
basis/io/monitors/recursive/recursive-tests.factor
basis/mime/multipart/multipart-tests.factor
basis/tools/deploy/deploy-tests.factor
core/io/pathnames/pathnames-docs.factor
core/syntax/syntax-docs.factor
extra/mason/common/common-tests.factor
extra/system-info/linux/linux.factor

index 1087823aa0ff2e93ee623c2068b2e8c58a8a3954..996e3db4c0dfb6c3ccdfe33f8bd3d3568ee84635 100644 (file)
@@ -1,7 +1,8 @@
 IN: concurrency.distributed.tests
 USING: tools.test concurrency.distributed kernel io.files
-arrays io.sockets system combinators threads math sequences
-concurrency.messaging continuations accessors prettyprint ;
+io.files.temp io.directories arrays io.sockets system
+combinators threads math sequences concurrency.messaging
+continuations accessors prettyprint ;
 
 : test-node ( -- addrspec )
     {
index 0a68db501b9a1404edc02bfff95c86389883e979..7ff2a33d92239fcba935a00cd5c72726953b4d38 100644 (file)
@@ -1,6 +1,6 @@
 IN: db.pools.tests
-USING: db.pools tools.test continuations io.files namespaces
-accessors kernel math destructors ;
+USING: db.pools tools.test continuations io.files io.files.temp
+io.directories namespaces accessors kernel math destructors ;
 
 \ <db-pool> must-infer
 
index fe95980bcf9658cad74a7ffd53691a1ef1eefc2b..b816e414baaf4ec442e088690ec1614d81324b23 100644 (file)
@@ -1,5 +1,5 @@
-USING: io io.files io.launcher kernel namespaces
-prettyprint tools.test db.sqlite db sequences
+USING: io io.files io.files.temp io.directories io.launcher
+kernel namespaces prettyprint tools.test db.sqlite db sequences
 continuations db.types db.tuples unicode.case ;
 IN: db.sqlite.tests
 
index 0432f3868381da552a5228240f38ee141e05e9f8..b834c2c9909a399608e49b8c69927b680b82507e 100644 (file)
@@ -1,6 +1,6 @@
 ! Copyright (C) 2008 Doug Coleman.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: io.files kernel tools.test db db.tuples classes
+USING: io.files io.files.temp kernel tools.test db db.tuples classes
 db.types continuations namespaces math math.ranges
 prettyprint calendar sequences db.sqlite math.intervals
 db.postgresql accessors random math.bitwise system
index 3bcd82a15dbb7b127abb3f414c5131bede3732a5..de7650d9ef2da9accdeb6ce1343084de475f2552 100644 (file)
@@ -5,7 +5,7 @@ furnace.auth.login
 furnace.auth.providers\r
 furnace.auth.providers.db tools.test\r
 namespaces db db.sqlite db.tuples continuations\r
-io.files accessors kernel ;\r
+io.files io.files.temp io.directories accessors kernel ;\r
 \r
 <action> "test" <login-realm> realm set\r
 \r
index 907e657125b514e65ba2107003929b1beb24d35c..14cdce3811b908e6ea111dbea459c053c74e3f70 100644 (file)
@@ -2,9 +2,9 @@ IN: furnace.sessions.tests
 USING: tools.test http furnace.sessions furnace.actions\r
 http.server http.server.responses math namespaces make kernel\r
 accessors io.sockets io.servers.connection prettyprint\r
-io.streams.string io.files splitting destructors sequences db\r
-db.tuples db.sqlite continuations urls math.parser furnace\r
-furnace.utilities ;\r
+io.streams.string io.files io.files.temp io.directories\r
+splitting destructors sequences db db.tuples db.sqlite\r
+continuations urls math.parser furnace furnace.utilities ;\r
 \r
 : with-session\r
     [\r
index 6e93d5ee3acbab7592cb6a1dea7b824d0c9ddf29..92a296c2d3ef6f225a2bf88192cf9f1c2aec0df2 100644 (file)
@@ -179,7 +179,7 @@ Set-Cookie: oo="bar; a=b"; comment="your mom"; httponly=yes
 ! Live-fire exercise
 USING: http.server http.server.static furnace.sessions furnace.alloy
 furnace.actions furnace.auth furnace.auth.login furnace.db http.client
-io.servers.connection io.files io io.encodings.ascii
+io.servers.connection io.files io.files.temp io.directories io io.encodings.ascii
 accessors namespaces threads
 http.server.responses http.server.redirection furnace.redirection
 http.server.dispatchers db.tuples ;
diff --git a/basis/io/directories/windows/tags.txt b/basis/io/directories/windows/tags.txt
new file mode 100644 (file)
index 0000000..6bf6830
--- /dev/null
@@ -0,0 +1 @@
+unportable
diff --git a/basis/io/files/info/windows/nt/nt.factor b/basis/io/files/info/windows/nt/nt.factor
deleted file mode 100755 (executable)
index 19ea086..0000000
+++ /dev/null
@@ -1,4 +0,0 @@
-! Copyright (C) 2008 Doug Coleman.
-! See http://factorcode.org/license.txt for BSD license.
-IN: io.files.info.windows.nt
-
diff --git a/basis/io/files/info/windows/tags.txt b/basis/io/files/info/windows/tags.txt
new file mode 100644 (file)
index 0000000..6bf6830
--- /dev/null
@@ -0,0 +1 @@
+unportable
index 48df9b2328d7aab13ccc7458c023236fd6639b37..a6402851ea38b1081fcdaf4cbf1e25ddcbed698a 100644 (file)
@@ -2,13 +2,13 @@ USING: help.markup help.syntax ;
 IN: io.files.types
 
 HELP: +regular-file+
-{ $description "A regular file. This type exists on all platforms. See " { $link "file-streams" } " for words operating on files." } ;
+{ $description "A regular file. This type exists on all platforms. See " { $link "io.files" } " for words operating on files." } ;
 
 HELP: +directory+
-{ $description "A directory. This type exists on all platforms. See " { $link "directories" } " for words operating on directories." } ;
+{ $description "A directory. This type exists on all platforms. See " { $link "io.directories" } " for words operating on directories." } ;
 
 HELP: +symbolic-link+
-{ $description "A symbolic link file.  This type is currently implemented on Unix platforms only. See " { $link "symbolic-links" } " for words operating on symbolic links." } ;
+{ $description "A symbolic link file.  This type is currently implemented on Unix platforms only. See " { $link "io.files.links" } " for words operating on symbolic links." } ;
 
 HELP: +character-device+
 { $description "A Unix character device file. This type exists on Unix platforms only." } ;
index 8e2cebc3a4823a64dbe36ac11e87ffa948f995ef..67558942f80e62c2d1d9111cba877fa6e21805a3 100644 (file)
@@ -1,7 +1,8 @@
 IN: io.monitors.linux.tests
-USING: io.monitors tools.test io.files system sequences
-continuations namespaces concurrency.count-downs kernel io
-threads calendar prettyprint destructors io.timeouts ;
+USING: io.monitors tools.test io.files io.files.temp
+io.directories system sequences continuations namespaces
+concurrency.count-downs kernel io threads calendar prettyprint
+destructors io.timeouts ;
 
 ! On Linux, a notification on the directory itself would report an invalid
 ! path name
index fba879a6d278c26dbf855e8f848cd405dd6fd3c6..ace93ace4434615e08e73ef569baa642a1793354 100644 (file)
@@ -1,6 +1,7 @@
 USING: accessors math kernel namespaces continuations
 io.files io.monitors io.monitors.recursive io.backend
-concurrency.mailboxes tools.test destructors ;
+concurrency.mailboxes tools.test destructors io.files.info
+io.pathnames io.files.temp io.directories.hierarchy ;
 IN: io.monitors.recursive.tests
 
 \ pump-thread must-infer
index 1445af8309e38566c8442944224ac9c824d92fa9..1fb2530705de3b7930926c5a2ef2890346523c1f 100644 (file)
@@ -1,7 +1,8 @@
 USING: accessors checksums checksums.md5 io io.encodings.ascii
-io.encodings.binary io.files io.streams.byte-array
-io.streams.string kernel make mime.multipart
-mime.multipart.private multiline sequences strings tools.test ;
+io.encodings.binary io.files io.files.temp io.files.info
+io.streams.byte-array io.streams.string kernel make
+mime.multipart mime.multipart.private multiline sequences
+strings tools.test ;
 IN: mime.multipart.tests
 
 [ { "a" } ] [
index d5cb4ab387ad5a536f1b050e8992746a06fd7b86..0275f7fdf000a64bfee11b2f3de5af3f543c5d02 100644 (file)
@@ -3,7 +3,7 @@ USING: tools.test system io.files io.files.temp kernel
 tools.deploy.config tools.deploy.config.editor\r
 tools.deploy.backend math sequences io.launcher arrays\r
 namespaces continuations layouts accessors io.encodings.ascii\r
-urls math.parser ;\r
+urls math.parser io.directories ;\r
 \r
 : shake-and-bake ( vocab -- )\r
     [ "test.image" temp-file delete-file ] ignore-errors\r
index 3ba864d471f1a153345442046313a416c26b354e..8ef0de86b71d27fa6b1978170dc9ecb35c658b79 100644 (file)
@@ -6,20 +6,20 @@ HELP: path-separator?
 { $description "Tests if the code point is a platform-specific path separator." }
 { $examples
     "On Unix:"
-    { $example "USING: io.files prettyprint ;" "CHAR: / path-separator? ." "t" }
+    { $example "USING: io.pathnames prettyprint ;" "CHAR: / path-separator? ." "t" }
 } ;
 
 HELP: parent-directory
 { $values { "path" "a pathname string" } { "parent" "a pathname string" } }
 { $description "Strips the last component off a pathname." }
-{ $examples { $example "USING: io io.files ;" "\"/etc/passwd\" parent-directory print" "/etc/" } } ;
+{ $examples { $example "USING: io io.pathnames ;" "\"/etc/passwd\" parent-directory print" "/etc/" } } ;
 
 HELP: file-name
 { $values { "path" "a pathname string" } { "string" string } }
 { $description "Outputs the last component of a pathname string." }
 { $examples
-    { $example "USING: io.files prettyprint ;" "\"/usr/bin/gcc\" file-name ." "\"gcc\"" }
-    { $example "USING: io.files prettyprint ;" "\"/usr/libexec/awk/\" file-name ." "\"awk\"" }
+    { $example "USING: io.pathnames prettyprint ;" "\"/usr/bin/gcc\" file-name ." "\"gcc\"" }
+    { $example "USING: io.pathnames prettyprint ;" "\"/usr/libexec/awk/\" file-name ." "\"awk\"" }
 } ;
 
 HELP: append-path
index c1e12ea133610605a7d0b70c349ee8db1cc2e269..7a1cb5fd923743796cf6bdf8d15d548b030c7542 100644 (file)
@@ -144,7 +144,7 @@ ARTICLE: "syntax-byte-arrays" "Byte array syntax"
 
 ARTICLE: "syntax-pathnames" "Pathname syntax"
 { $subsection POSTPONE: P" }
-"Pathnames are documented in " { $link "pathnames" } "." ;
+"Pathnames are documented in " { $link "io.pathnames" } "." ;
 
 ARTICLE: "syntax-literals" "Literals"
 "Many different types of objects can be constructed at parse time via literal syntax. Numbers are a special case since support for reading them is built-in to the parser. All other literals are constructed via parsing words."
index ed6ffecdd11f749fd5d93406bfdde3b59fd18443..095cbd1a80aa16ed726bc7085679db377ba17326 100644 (file)
@@ -1,6 +1,6 @@
 IN: mason.common.tests
 USING: prettyprint mason.common mason.config
-namespaces calendar tools.test io.files io.encodings.utf8 ;
+namespaces calendar tools.test io.files io.files.temp io.encodings.utf8 ;
 
 [ "00:01:01" ] [ 61000 milli-seconds>time ] unit-test
 
index d7f53fb9fb83d0e7554e26efe9998e877a26bc75..d9c39ca6cf751325890dd6466674fec5ba1702f6 100644 (file)
@@ -1,7 +1,7 @@
 ! Copyright (C) 2008 Doug Coleman.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: unix alien alien.c-types kernel math sequences strings
-io.unix.backend splitting ;
+io.backend.unix splitting ;
 IN: system-info.linux
 
 : (uname) ( buf -- int )