fn region_identity(x: &r.uint) -> &r.uint { x }

fn apply<T>(t: T, f: fn(T) -> T) -> T { f(t) }

fn parameterized(x: &uint) -> uint {
    let z = apply(x) {|y|
        region_identity(y)
    };
    *z
}

fn main() {
    let x = 3u;
    assert parameterized(&x) == 3u;
}