2011-06-15 13:19:50 -05:00
|
|
|
|
|
|
|
|
|
|
|
|
2011-03-27 23:46:16 -05:00
|
|
|
// -*- rust -*-
|
|
|
|
|
|
|
|
// Tests for using alt as an expression
|
2011-04-02 18:32:34 -05:00
|
|
|
fn test_basic() {
|
2011-07-27 07:19:39 -05:00
|
|
|
let rs: bool = alt true { true { true } false { false } };
|
2011-06-25 10:45:49 -05:00
|
|
|
assert (rs);
|
2011-07-27 07:19:39 -05:00
|
|
|
rs = alt false { true { false } false { true } };
|
2011-06-25 10:45:49 -05:00
|
|
|
assert (rs);
|
2011-03-27 23:46:16 -05:00
|
|
|
}
|
|
|
|
|
2011-04-02 18:32:34 -05:00
|
|
|
fn test_inferrence() {
|
2011-07-27 07:19:39 -05:00
|
|
|
let rs = alt true { true { true } false { false } };
|
2011-06-25 10:45:49 -05:00
|
|
|
assert (rs);
|
2011-04-02 18:32:34 -05:00
|
|
|
}
|
|
|
|
|
|
|
|
fn test_alt_as_alt_head() {
|
2011-06-15 13:19:50 -05:00
|
|
|
// Yeah, this is kind of confusing ...
|
|
|
|
|
2011-07-27 07:19:39 -05:00
|
|
|
let rs =
|
|
|
|
alt alt false { true { true } false { false } } {
|
|
|
|
true { false }
|
|
|
|
false { true }
|
2011-06-15 13:19:50 -05:00
|
|
|
};
|
2011-06-25 10:45:49 -05:00
|
|
|
assert (rs);
|
2011-04-02 18:32:34 -05:00
|
|
|
}
|
|
|
|
|
|
|
|
fn test_alt_as_block_result() {
|
2011-07-27 07:19:39 -05:00
|
|
|
let rs =
|
|
|
|
alt false {
|
|
|
|
true { false }
|
|
|
|
false { alt true { true { true } false { false } } }
|
2011-06-15 13:19:50 -05:00
|
|
|
};
|
2011-06-25 10:45:49 -05:00
|
|
|
assert (rs);
|
2011-04-02 18:32:34 -05:00
|
|
|
}
|
|
|
|
|
2011-03-27 23:46:16 -05:00
|
|
|
fn main() {
|
2011-06-15 13:19:50 -05:00
|
|
|
test_basic();
|
|
|
|
test_inferrence();
|
|
|
|
test_alt_as_alt_head();
|
|
|
|
test_alt_as_block_result();
|
2011-08-19 17:16:48 -05:00
|
|
|
}
|