fn borrow(_v: &int) {}

fn box_mut(v: @mut ~int) {
    borrow(*v); //~ ERROR illegal borrow unless pure: unique value in aliasable, mutable location
    //~^ NOTE impure due to access to impure function
}

fn box_rec_mut(v: @{mut f: ~int}) {
    borrow(v.f); //~ ERROR illegal borrow unless pure: unique value in aliasable, mutable location
    //~^ NOTE impure due to access to impure function
}

fn box_mut_rec(v: @mut {f: ~int}) {
    borrow(v.f); //~ ERROR illegal borrow unless pure: unique value in aliasable, mutable location
    //~^ NOTE impure due to access to impure function
}

fn box_mut_recs(v: @mut {f: {g: {h: ~int}}}) {
    borrow(v.f.g.h); //~ ERROR illegal borrow unless pure: unique value in aliasable, mutable location
    //~^ NOTE impure due to access to impure function
}

fn box_imm(v: @~int) {
    borrow(*v); // OK
}

fn box_imm_rec(v: @{f: ~int}) {
    borrow(v.f); // OK
}

fn box_imm_recs(v: @{f: {g: {h: ~int}}}) {
    borrow(v.f.g.h); // OK
}

fn box_const(v: @const ~int) {
    borrow(*v); //~ ERROR illegal borrow unless pure: unique value in aliasable, mutable location
    //~^ NOTE impure due to access to impure function
}

fn box_rec_const(v: @{const f: ~int}) {
    borrow(v.f); //~ ERROR illegal borrow unless pure: unique value in aliasable, mutable location
    //~^ NOTE impure due to access to impure function
}

fn box_recs_const(v: @{f: {g: {const h: ~int}}}) {
    borrow(v.f.g.h); //~ ERROR illegal borrow unless pure: unique value in aliasable, mutable location
    //~^ NOTE impure due to access to impure function
}

fn box_const_rec(v: @const {f: ~int}) {
    borrow(v.f); //~ ERROR illegal borrow unless pure: unique value in aliasable, mutable location
    //~^ NOTE impure due to access to impure function
}

fn box_const_recs(v: @const {f: {g: {h: ~int}}}) {
    borrow(v.f.g.h); //~ ERROR illegal borrow unless pure: unique value in aliasable, mutable location
    //~^ NOTE impure due to access to impure function
}

fn main() {
}
