From 392516e845321ea98d61a68f262c7ecfcc162065 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Fri, 16 Jan 2009 14:20:29 -0600 Subject: [PATCH] More doc fixes --- basis/grouping/grouping-docs.factor | 4 ++-- basis/help/lint/lint.factor | 6 +++--- basis/io/sockets/sockets-docs.factor | 6 +++--- 3 files changed, 8 insertions(+), 8 deletions(-) diff --git a/basis/grouping/grouping-docs.factor b/basis/grouping/grouping-docs.factor index 4136209f4b..e4ad97abd0 100644 --- a/basis/grouping/grouping-docs.factor +++ b/basis/grouping/grouping-docs.factor @@ -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? diff --git a/basis/help/lint/lint.factor b/basis/help/lint/lint.factor index 831a6e5509..2f61d05a61 100644 --- a/basis/help/lint/lint.factor +++ b/basis/help/lint/lint.factor @@ -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 ; diff --git a/basis/io/sockets/sockets-docs.factor b/basis/io/sockets/sockets-docs.factor index caa268d85c..a66ed1d0c0 100644 --- a/basis/io/sockets/sockets-docs.factor +++ b/basis/io/sockets/sockets-docs.factor @@ -86,7 +86,7 @@ HELP: inet } ; HELP: -{ $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: -{ $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: -{ $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: