2012-07-04 16:53:12 -05:00
|
|
|
//! Operations on tuples
|
2012-03-15 20:58:14 -05:00
|
|
|
|
2012-07-17 18:49:54 -05:00
|
|
|
trait tuple_ops<T,U> {
|
|
|
|
pure fn first() -> T;
|
|
|
|
pure fn second() -> U;
|
|
|
|
pure fn swap() -> (U, T);
|
|
|
|
}
|
2012-01-17 12:14:05 -06:00
|
|
|
|
2012-07-17 18:49:54 -05:00
|
|
|
impl extensions <T:copy, U:copy> of tuple_ops<T,U> for (T, U) {
|
2012-07-16 16:32:59 -05:00
|
|
|
|
|
|
|
/// Return the first element of self
|
|
|
|
pure fn first() -> T {
|
|
|
|
let (t, _) = self;
|
|
|
|
ret t;
|
|
|
|
}
|
|
|
|
|
|
|
|
/// Return the second element of self
|
|
|
|
pure fn second() -> U {
|
|
|
|
let (_, u) = self;
|
|
|
|
ret u;
|
|
|
|
}
|
|
|
|
|
|
|
|
/// Return the results of swapping the two elements of self
|
|
|
|
pure fn swap() -> (U, T) {
|
|
|
|
let (t, u) = self;
|
|
|
|
ret (u, t);
|
|
|
|
}
|
2012-01-17 12:14:05 -06:00
|
|
|
|
|
|
|
}
|
|
|
|
|
2012-07-17 18:49:54 -05:00
|
|
|
trait extended_tuple_ops<A,B> {
|
|
|
|
fn zip() -> ~[(A, B)];
|
|
|
|
fn map<C>(f: fn(A, B) -> C) -> ~[C];
|
|
|
|
}
|
|
|
|
|
|
|
|
impl extensions<A: copy, B: copy> of extended_tuple_ops<A,B>
|
|
|
|
for (&[A], &[B]) {
|
|
|
|
|
2012-07-16 19:27:04 -05:00
|
|
|
fn zip() -> ~[(A, B)] {
|
|
|
|
let (a, b) = self;
|
|
|
|
vec::zip(a, b)
|
|
|
|
}
|
|
|
|
|
|
|
|
fn map<C>(f: fn(A, B) -> C) -> ~[C] {
|
|
|
|
let (a, b) = self;
|
|
|
|
vec::map2(a, b, f)
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2012-07-17 18:49:54 -05:00
|
|
|
impl extensions<A: copy, B: copy> of extended_tuple_ops<A,B>
|
|
|
|
for (~[A], ~[B]) {
|
|
|
|
|
2012-07-16 19:27:04 -05:00
|
|
|
fn zip() -> ~[(A, B)] {
|
|
|
|
let (a, b) = self;
|
|
|
|
vec::zip(a, b)
|
|
|
|
}
|
|
|
|
|
|
|
|
fn map<C>(f: fn(A, B) -> C) -> ~[C] {
|
|
|
|
let (a, b) = self;
|
|
|
|
vec::map2(a, b, f)
|
|
|
|
}
|
|
|
|
}
|
2012-01-17 12:14:05 -06:00
|
|
|
|
|
|
|
#[test]
|
|
|
|
fn test_tuple() {
|
2012-07-16 16:32:59 -05:00
|
|
|
assert (948, 4039.48).first() == 948;
|
|
|
|
assert (34.5, ~"foo").second() == ~"foo";
|
|
|
|
assert ('a', 2).swap() == (2, 'a');
|
2012-01-17 12:14:05 -06:00
|
|
|
}
|
|
|
|
|