|REBOL 3 Docs||Guide||Concepts||Functions||Datatypes||Errors|
|TOC < Back Next >||Updated: 18-Feb-2009 Edit History|
As previously mentioned, blocks are not normally evaluated. A do function is required to force a block to be evaluated. There are times when you may need to conditionally evaluate a block. The following section describes several ways to do this.
The if function takes two arguments. The first argument is a condition and the second argument is a block. If the condition is true , the block is evaluated, otherwise it is not evaluated.
if now/time > 12:00 [print "past noon"] past noon
The condition is normally an expression that evaluates to true or false ; however, other values can also be supplied. Only a false or a none! value prevents the block from being evaluated. All other values (including zero) are treated as true, and cause the block to be evaluated. This can be useful for checking the results of find, select, next, and other functions that return none! :
string: "let's talk about REBOL" if find string "talk" [print "found"] found
either now/time > 12:00 [ print "after lunch" ][ print "before lunch" ] after lunch
Both the if and either functions return the result of evaluating their blocks. In the case of an if, the block value is only returned if the block is evaluated; otherwise, a none! is returned. The if function is useful for conditional initialization of variables:
flag: if time > 13:00 ["lunch eaten"] print flag lunch eaten
Making use of the result of the either function, the previous example could be rewritten as follows:
print either now/time > 12:00 [ "after lunch" ][ "before lunch" ] after lunch
Since both if and either are functions, their block arguments can be any expression that results in a block when evaluated. In the following examples, words are used to represent the block argument for if and either.
notice: [print "Wake up!"] if now/time > 7:00 notice Wake up!
notices: [ [print "It's past sunrise!"] [print "It's past noon!"] [print "It's past sunset!"] ] if now/time > 12:00 second notices It's past noon!
sleep: [print "Keep sleeping"] either now/time > 7:00 notice sleep Wake up!
The any and all functions offer a shortcut to evaluating some types of conditional expressions. These functions can be used in a number of ways:either in conjunction with if, either, and other conditional functions, or separately.
Both any and all accept a block of expressions, which is evaluated one expression at a time. The any function returns on the first true expression, and the all function returns on the first false expression. Keep in mind that a false expression can also be none!, and that a true expression is any value other than false or none!.
Both the any and all functions only evaluate as much as they need. For example, once any has found a true expression, none of the remaining expressions are evaluated. Here is an example of using any :
size: 50 if any [size < 10 size > 90] [ print "Size is out of range." ]
number: none print number: any [number 100] 100
Similarly, if you have various potential values, you can use the first one that actually has a value (is not none! ):
num1: num2: none num3: 80 print number: any [num1 num2 num3] 80
data: [123 456 789] print any [find data 432 999] 999
Similarly, all can be used for conditions that require all expressions to be true :
if all [size > 10 size < 90] [print "Size is in range"] Size is in range
You can verify that values have been set up before evaluating a function:
a: "REBOL/" b: none probe all [string? a string? b append a b] none
b: "Core" probe all [string? a string? b append a b] REBOL/Core
The until function repeats a block until the evaluation of the block returns true (that is, not false or none! ). The evaluation block is always evaluated at least once. The until function returns the value of its block.
The example below will print each word in the color block. The block begins by printing the first word of the block. It then moves to the next color for each color in the block. The tail? function checks for the end of the block, and will return true, which will cause the until function to exit.
color: [red green blue] until [ print first color tail? color: next color ] red green blue
The while function repeats the evaluation of its two block arguments while the first block returns true. The first block is the condition block, the second block is the evaluation block. When the condition block returns false or none!, the expression block will no longer be evaluated and the loop terminates.
Here is a similar example to that show above. The while loop will continue to print a color while there are still colors to print.
color: [red green blue] while [not tail? color] [ print first color color: next color ] red green blue
The condition block can contain any number of expressions, so long as the last expression returns the condition. To illustrate this, the next example adds a print to the condition block. This will print the index value of the color. It will then check for the tail of the color block, which is the condition used for the loop.
color: [red green blue] while [ print index? color not tail? color ][ print first color color: next color ] 1 red 2 green 3 blue 4
The last value of the block is returned from the while function.
A break can be used to escape from the loop at any time.
|TOC < Back Next >||REBOL.com - WIP Wiki||Feedback Admin|