sequences: fix example for unless-empty.

char-rename
John Benediktsson 2017-05-03 18:24:14 -07:00
parent 4982bcce27
commit 1898c2bb3a
1 changed files with 2 additions and 2 deletions

View File

@ -114,12 +114,12 @@ HELP: unless-empty
{ $examples "This word is equivalent to " { $link if-empty } " with an empty first quotation:"
{ $example
"USING: sequences prettyprint ;"
"{ 4 5 6 } [ ] [ sum ] if-empty ."
"{ 4 5 6 } [ ] [ sum . ] if-empty"
"15"
}
{ $example
"USING: sequences prettyprint ;"
"{ 4 5 6 } [ sum ] unless-empty ."
"{ 4 5 6 } [ sum . ] unless-empty"
"15"
}
} ;