From: Doug Coleman <doug.coleman@gmail.com>
Date: Fri, 7 Oct 2022 22:17:48 +0000 (-0500)
Subject: sequences: fix stack effect help for when-empty
X-Git-Tag: 0.99~1057
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=d4162f62f99b832d875cef016f8c2e63baf64490

sequences: fix stack effect help for when-empty
---

diff --git a/core/sequences/sequences-docs.factor b/core/sequences/sequences-docs.factor
index e46441de95..cc1bc5f4bf 100644
--- a/core/sequences/sequences-docs.factor
+++ b/core/sequences/sequences-docs.factor
@@ -92,7 +92,9 @@ HELP: if-empty
 
 HELP: when-empty
 { $values
-     { "seq" sequence } { "quot" "the first quotation of an " { $link if-empty } } }
+    { "seq" sequence } { "quot" "the first quotation of an " { $link if-empty } }
+    { "seq/obj" object }
+}
 { $description "Makes an implicit check if the sequence is empty. An empty sequence is dropped and the " { $snippet "quot" } " is called." }
 { $examples "This word is equivalent to " { $link if-empty } " with an empty second quotation:"
     { $example