diff --git a/core/sequences/sequences-docs.factor b/core/sequences/sequences-docs.factor index ea3e4cf4d3..22e1eede41 100644 --- a/core/sequences/sequences-docs.factor +++ b/core/sequences/sequences-docs.factor @@ -83,10 +83,12 @@ HELP: empty? HELP: if-empty { $values { "seq" sequence } { "quot1" quotation } { "quot2" quotation } } { $description "Makes an implicit check if the sequence is empty. An empty sequence is dropped and " { $snippet "quot1" } " is called. Otherwise, if the sequence has any elements, " { $snippet "quot2" } " is called on it." } -{ $example - "USING: kernel prettyprint sequences ;" - "{ 1 2 3 } [ \"empty sequence\" ] [ sum ] if-empty ." - "6" +{ $examples + { $example + "USING: kernel prettyprint sequences ;" + "{ 1 2 3 } [ \"empty sequence\" ] [ sum ] if-empty ." + "6" + } } ; HELP: when-empty