about summary refs log tree commit diff
path: root/src/test/run-pass/expr-block-generic-unique1.rs
blob: 436689f68aac70e1b8aaead636ee5ec93f1a4876 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21


// -*- rust -*-
type compare<T> = fn@(~T, ~T) -> bool;

fn test_generic<copy T>(expected: ~T, eq: compare<T>) {
    let actual: ~T = { expected };
    assert (eq(expected, actual));
}

fn test_box() {
    fn compare_box(b1: ~bool, b2: ~bool) -> bool {
        log *b1;
        log *b2;
        ret *b1 == *b2;
    }
    let eq = bind compare_box(_, _);
    test_generic::<bool>(~true, eq);
}

fn main() { test_box(); }