2011-06-15 13:19:50 -05:00
|
|
|
|
|
|
|
|
|
|
|
|
2011-03-27 19:20:12 -05:00
|
|
|
// -*- rust -*-
|
|
|
|
|
|
|
|
// Tests for if as expressions with dynamic type sizes
|
2011-08-12 08:37:25 -05:00
|
|
|
type compare<T> = fn(&T, &T) -> bool ;
|
2011-03-27 19:20:12 -05:00
|
|
|
|
2011-08-12 08:37:25 -05:00
|
|
|
fn test_generic<T>(expected: &T, not_expected: &T, eq: &compare<T>) {
|
2011-07-27 07:19:39 -05:00
|
|
|
let actual: T = if true { expected } else { not_expected };
|
2011-06-15 13:19:50 -05:00
|
|
|
assert (eq(expected, actual));
|
2011-03-27 19:20:12 -05:00
|
|
|
}
|
|
|
|
|
|
|
|
fn test_bool() {
|
2011-07-27 07:19:39 -05:00
|
|
|
fn compare_bool(b1: &bool, b2: &bool) -> bool { ret b1 == b2; }
|
|
|
|
let eq = bind compare_bool(_, _);
|
2011-06-15 13:19:50 -05:00
|
|
|
test_generic[bool](true, false, eq);
|
2011-03-27 19:20:12 -05:00
|
|
|
}
|
|
|
|
|
2011-07-26 07:49:40 -05:00
|
|
|
fn test_rec() {
|
2011-07-27 07:19:39 -05:00
|
|
|
type t = {a: int, b: int};
|
2011-06-15 13:19:50 -05:00
|
|
|
|
2011-07-27 07:19:39 -05:00
|
|
|
fn compare_rec(t1: &t, t2: &t) -> bool { ret t1 == t2; }
|
|
|
|
let eq = bind compare_rec(_, _);
|
|
|
|
test_generic[t]({a: 1, b: 2}, {a: 2, b: 3}, eq);
|
2011-03-27 19:20:12 -05:00
|
|
|
}
|
|
|
|
|
2011-08-10 11:27:22 -05:00
|
|
|
fn main() { test_bool(); test_rec(); }
|