]> gitweb.factorcode.org Git - factor.git/commitdiff
More doc fixes
authorSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Fri, 16 Jan 2009 20:20:29 +0000 (14:20 -0600)
committerSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Fri, 16 Jan 2009 20:20:29 +0000 (14:20 -0600)
basis/grouping/grouping-docs.factor
basis/help/lint/lint.factor
basis/io/sockets/sockets-docs.factor

index 4136209f4be2259527b241099d6364ea4cf74522..e4ad97abd0c7a3a33c3f157d5ee0f25ee432284b 100644 (file)
@@ -134,9 +134,9 @@ HELP: monotonic?
 { $description "Applies the relation to successive pairs of elements in the sequence, testing for a truth value. The relation should be a transitive relation, such as a total order or an equality relation." }
 { $examples
     "Testing if a sequence is non-decreasing:"
-    { $example "USING: math prettyprint sequences ;" "{ 1 1 2 } [ <= ] monotonic? ." "t" }
+    { $example "USING: grouping math prettyprint ;" "{ 1 1 2 } [ <= ] monotonic? ." "t" }
     "Testing if a sequence is decreasing:"
-    { $example "USING: math prettyprint sequences ;" "{ 9 8 6 7 } [ < ] monotonic? ." "f" }
+    { $example "USING: grouping math prettyprint ;" "{ 9 8 6 7 } [ < ] monotonic? ." "f" }
 } ;
 
 HELP: all-equal?
index 831a6e55096fe6279c90dfc76295d15595e96831..2f61d05a614e04025de13f5d6ff87477bcb01e16 100644 (file)
@@ -58,9 +58,9 @@ IN: help.lint
             [ contains-funky-elements? ]
             bi* or
         ] [
-            [ effect-values >array ]
-            [ extract-values >array ]
-            bi* =
+            [ effect-values ]
+            [ extract-values ]
+            bi* sequence=
         ]
     } 2|| [ "$values don't match stack effect" throw ] unless ;
 
index caa268d85ca2628faceea6651bb587614de57e45..a66ed1d0c008feccada997d1ca3a351e3432529d 100644 (file)
@@ -86,7 +86,7 @@ HELP: inet
 } ;
 
 HELP: <inet>
-{ $values { "host" "a host name" } { "port" "a port number" } }
+{ $values { "host" "a host name" } { "port" "a port number" } { "inet" inet } }
 { $description "Creates a new " { $link inet } " address specifier." } ;
 
 HELP: inet4
@@ -97,7 +97,7 @@ HELP: inet4
 } ;
 
 HELP: <inet4>
-{ $values { "host" "an IPv4 address" } { "port" "a port number" } }
+{ $values { "host" "an IPv4 address" } { "port" "a port number" } { "inet4" inet4 } }
 { $description "Creates a new " { $link inet4 } " address specifier." } ;
 
 HELP: inet6
@@ -108,7 +108,7 @@ HELP: inet6
 } ;
 
 HELP: <inet6>
-{ $values { "host" "an IPv6 address" } { "port" "a port number" } }
+{ $values { "host" "an IPv6 address" } { "port" "a port number" } { "inet6" inet6 } }
 { $description "Creates a new " { $link inet6 } " address specifier." } ;
 
 HELP: <client>