Merge remote-tracking branch 'origin/master' into modern-harvey3

.gitignore

@@ -1,33 +1,34 @@
-*~
-*.gch*
-*.obj
-*.o
-*.s
-*.exe
-Factor/factor
-*.a
-*.dll
-*.lib
-*.exp
-*.res
-*.RES
-*.image
-factor.image.fresh
-*.dylib
-factor.com
 *#*#
-.DS_Store
-.gdb_history
 *.*.marks
+*.RES
+*.a
+*.bak
+*.dll
+*.dylib
+*.exe
+*.exp
+*.gch*
+*.image
+*.lib
+*.o
+*.obj
+*.res
+*.s
+*.so
+*~
+.#*
 .*.swm
 .*.swn
 .*.swo
 .*.swp
-logs
+.DS_Store
-work
+.gdb_history
-*.bak
+/factor
-.#*
+/logs
-checksums.txt
+/work
-*.so
+Factor.app/Contents/MacOS/factor
-a.out
 Factor.app/Contents/_CodeSignature
+a.out
+checksums.txt
+factor.com
+factor.image.fresh

basis/alien/data/data-docs.factor

@@ -74,7 +74,7 @@ $nl
 "If no initial value is specified, the contents of the allocated memory are undefined." }
 { $warning "Reading or writing a scoped allocation buffer outside of the given quotation will cause memory corruption." }
 { $examples
-    { $example
+    { $unchecked-example
         "USING: accessors alien.c-types alien.data
 classes.struct kernel math math.functions
 prettyprint ;

basis/editors/ui/authors.txt

@@ -0,0 +1 @@
+Doug Coleman

basis/furnace/auth/auth-docs.factor

@@ -121,7 +121,6 @@ $nl
     "furnace.auth.providers.null"
     "furnace.auth.providers.assoc"
     "furnace.auth.providers.db"
-    "furnace.auth.providers.couchdb"
 } ;
 
 ARTICLE: "furnace.auth.features" "Optional authentication features"

basis/furnace/auth/providers/couchdb/couchdb-docs.factor

@@ -25,12 +25,12 @@ HELP: couchdb-auth-provider
 
 ARTICLE: "furnace.auth.providers.couchdb" "CouchDB Authentication Provider"
     "The " { $vocab-link "furnace.auth.providers.couchdb" } " vocabulary implements an authentication provider "
-    "which looks up authentication requests in a CouchDB. It is necessary to create a view "
+    "which looks up authentication requests in CouchDB. It is necessary to create a view "
     "associating usernames with user documents before using this vocabulary; see documentation "
     "for " { $link couchdb-auth-provider } "."
     $nl
     "Although this implementation guarantees that users with duplicate IDs/emails"
-    " cannot be created in a single CouchDB database, it provides so such guarentee if you are clustering "
+    " cannot be created in a single CouchDB database, it provides no such guarantee if you are clustering "
     "multiple DBs. In this case, you are responsible for ensuring the uniqueness of users across "
     "databases."
     $nl

basis/help/tutorial/tutorial.factor

@@ -132,7 +132,7 @@ $nl
 { $unchecked-example "\"A man, a plan, a canal: Panama.\" palindrome? ." "f" }
 $nl
 "We would like it to output " { $link t } " there. We can encode this requirement with a unit test that we add to " { $snippet "palindrome-tests.factor" } ":"
-{ $code "[ t ] [ \"A man, a plan, a canal: Panama.\" palindrome? ] unit-test" }
+{ $code "{ t } [ \"A man, a plan, a canal: Panama.\" palindrome? ] unit-test" }
 $nl
 "If you now run unit tests, you will see a unit test failure:"
 { $code "\"palindrome\" test" }
@@ -178,7 +178,7 @@ $nl
 "This code starts with a string on the stack, removes non-alphabetical characters, and converts the result to lower case, leaving a new string on the stack. We put this code in a new word, and add the new word to " { $snippet "palindrome.factor" } ":"
 { $code ": normalize ( string -- string' ) [ Letter? ] filter >lower ;" }
 $nl
-"You will need to add " { $vocab-link "unicode.case" } " and " { $vocab-link "unicode.categories" } " to the vocabulary search path, so that " { $link >lower } " and " { $link Letter? } " can be used in the source file."
+"You will need to add " { $vocab-link "unicode" } " to the vocabulary search path, so that " { $link >lower } " and " { $link Letter? } " can be used in the source file."
 $nl
 "We modify " { $snippet "palindrome?" } " to first apply " { $snippet "normalize" } " to its input:"
 { $code ": palindrome? ( string -- ? ) normalize dup reverse = ;" }

basis/tools/hexdump/hexdump.factor

@@ -85,8 +85,7 @@ M: byte-vector hexdump. all-bytes underlying>> hexdump-bytes ;
 
 : hexdump-main ( -- )
     command-line get [
-        input-stream get dup decoder? [ stream>> ] when
+        input-stream get binary re-decode hexdump-stream
-        hexdump-stream
     ] [
         [ hexdump-file ] each
     ] if-empty ;