steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

combinators: minor improvement to usage example of cond word

db4
Keita Haga 2011-02-04 17:53:00 +09:00
parent 65773e520d
commit c997e43ca8
1 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
core/combinators/combinators-docs.factor
View File

@ -326,12 +326,14 @@ HELP: cond
} }
{ $errors "Throws a " { $link no-cond } " error if none of the test quotations yield a true value." } { $errors "Throws a " { $link no-cond } " error if none of the test quotations yield a true value." }
{ $examples { $examples
{ $code { $example
"{" "USING: combinators io kernel math ;"
" { [ dup 0 > ] [ \"positive\" ] }" "0 {"
" { [ dup 0 < ] [ \"negative\" ] }" " { [ dup 0 > ] [ drop \"positive\" ] }"
" [ \"zero\" ]" " { [ dup 0 < ] [ drop \"negative\" ] }"
"} cond" " [ drop \"zero\" ]"
"} cond print"
"zero"
} }
} ; } ;