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

fn test_generic<@T>(expected: T, eq: compare<T>) {
    let actual: T = alt true { true { expected } };
    assert (eq(expected, actual));
}

fn test_vec() {
    fn compare_box(v1: @int, v2: @int) -> bool { ret v1 == v2; }
    let eq = bind compare_box(_, _);
    test_generic::<@int>(@1, eq);
}

fn main() { test_vec(); }