new borrowing tests (not all passing)

Author: nikomatsakis

src/test/run-pass/regions-borrow-at.rs

@@ -0,0 +1,11 @@
+// xfail-test it don't work yet
+
+fn foo(x: &uint) -> uint {
+    *x
+}
+
+fn main() {
+    let p = @3u;
+    let r = foo(p);
+    assert r == 3u;
+}

src/test/run-pass/regions-borrow-evec-at.rs

@@ -0,0 +1,11 @@
+// xfail-test it don't work yet
+
+fn foo(x: [uint]/&) -> uint {
+    x[0]
+}
+
+fn main() {
+    let p = [22u]/@;
+    let r = foo(p);
+    assert r == 22u;
+}

src/test/run-pass/regions-borrow-uniq.rs

@@ -0,0 +1,9 @@
+fn foo(x: &uint) -> uint {
+    *x
+}
+
+fn main() {
+    let p = ~3u;
+    let r = foo(p);
+    assert r == 3u;
+}