2012-07-04 16:53:12 -05:00
|
|
|
//! Operations on shared box types
|
2012-03-06 21:09:32 -06:00
|
|
|
|
2012-08-13 19:11:33 -05:00
|
|
|
// NB: transitionary, de-mode-ing.
|
|
|
|
#[forbid(deprecated_mode)];
|
|
|
|
#[forbid(deprecated_pattern)];
|
|
|
|
|
2012-09-04 13:12:17 -05:00
|
|
|
use cmp::{Eq, Ord};
|
2012-08-27 18:26:35 -05:00
|
|
|
|
2011-12-13 18:25:51 -06:00
|
|
|
export ptr_eq;
|
|
|
|
|
2012-06-24 22:18:18 -05:00
|
|
|
pure fn ptr_eq<T>(a: @T, b: @T) -> bool {
|
2012-07-04 16:53:12 -05:00
|
|
|
//! Determine if two shared boxes point to the same object
|
2012-06-24 22:18:18 -05:00
|
|
|
unsafe { ptr::addr_of(*a) == ptr::addr_of(*b) }
|
2011-12-13 18:25:51 -06:00
|
|
|
}
|
2012-01-17 19:28:21 -06:00
|
|
|
|
2012-08-27 18:26:35 -05:00
|
|
|
impl<T:Eq> @const T : Eq {
|
|
|
|
pure fn eq(&&other: @const T) -> bool { *self == *other }
|
|
|
|
}
|
|
|
|
|
|
|
|
impl<T:Ord> @const T : Ord {
|
|
|
|
pure fn lt(&&other: @const T) -> bool { *self < *other }
|
2012-08-29 21:23:15 -05:00
|
|
|
pure fn le(&&other: @const T) -> bool { *self <= *other }
|
|
|
|
pure fn ge(&&other: @const T) -> bool { *self >= *other }
|
|
|
|
pure fn gt(&&other: @const T) -> bool { *self > *other }
|
2012-08-27 18:26:35 -05:00
|
|
|
}
|
|
|
|
|
2012-01-17 19:28:21 -06:00
|
|
|
#[test]
|
|
|
|
fn test() {
|
|
|
|
let x = @3;
|
|
|
|
let y = @3;
|
|
|
|
assert (ptr_eq::<int>(x, x));
|
|
|
|
assert (ptr_eq::<int>(y, y));
|
|
|
|
assert (!ptr_eq::<int>(x, y));
|
|
|
|
assert (!ptr_eq::<int>(y, x));
|
|
|
|
}
|