2012-10-19 08:01:01 -05:00
|
|
|
fn of<T>() -> @fn(T) { fail; }
|
|
|
|
fn subtype<T>(x: @fn(T)) { fail; }
|
2012-05-31 19:41:01 -05:00
|
|
|
|
2012-10-19 08:01:01 -05:00
|
|
|
fn test_fn<T>(_x: &x/T, _y: &y/T, _z: &z/T) {
|
|
|
|
// Here, x, y, and z are free. Other letters
|
|
|
|
// are bound. Note that the arrangement
|
|
|
|
// subtype::<T1>(of::<T2>()) will typecheck
|
|
|
|
// iff T1 <: T2.
|
2012-05-31 19:41:01 -05:00
|
|
|
|
2012-10-19 08:01:01 -05:00
|
|
|
subtype::<fn(&a/T)>(
|
|
|
|
of::<fn(&a/T)>());
|
|
|
|
|
|
|
|
subtype::<fn(&a/T)>(
|
|
|
|
of::<fn(&b/T)>());
|
|
|
|
|
|
|
|
subtype::<fn(&b/T)>(
|
|
|
|
of::<fn(&x/T)>());
|
|
|
|
|
|
|
|
subtype::<fn(&x/T)>(
|
|
|
|
of::<fn(&b/T)>()); //~ ERROR mismatched types
|
|
|
|
|
|
|
|
subtype::<fn(&a/T, &b/T)>(
|
|
|
|
of::<fn(&a/T, &a/T)>());
|
2012-05-31 19:41:01 -05:00
|
|
|
|
2012-10-19 08:01:01 -05:00
|
|
|
subtype::<fn(&a/T, &a/T)>(
|
|
|
|
of::<fn(&a/T, &b/T)>()); //~ ERROR mismatched types
|
|
|
|
|
|
|
|
subtype::<fn(&a/T, &b/T)>(
|
|
|
|
of::<fn(&x/T, &y/T)>());
|
|
|
|
|
|
|
|
subtype::<fn(&x/T, &y/T)>(
|
|
|
|
of::<fn(&a/T, &b/T)>()); //~ ERROR mismatched types
|
|
|
|
|
|
|
|
subtype::<fn(&x/T) -> @fn(&a/T)>(
|
|
|
|
of::<fn(&x/T) -> @fn(&a/T)>());
|
|
|
|
|
|
|
|
subtype::<fn(&a/T) -> @fn(&a/T)>(
|
|
|
|
of::<fn(&a/T) -> @fn(&b/T)>()); //~ ERROR mismatched types
|
|
|
|
|
|
|
|
subtype::<fn(&a/T) -> @fn(&a/T)>(
|
|
|
|
of::<fn(&x/T) -> @fn(&b/T)>()); //~ ERROR mismatched types
|
|
|
|
|
|
|
|
subtype::<fn(&a/T) -> @fn(&b/T)>(
|
|
|
|
of::<fn(&a/T) -> @fn(&a/T)>());
|
|
|
|
}
|
2012-05-31 19:41:01 -05:00
|
|
|
|
2012-10-19 08:01:01 -05:00
|
|
|
fn main() {}
|