Accept *foo as a pointer to foo.

This is accepted everywhere, since just passing a pointer is safe.

src/comp/front/ast.rs

@@ -323,6 +323,7 @@ fn unop_to_str(unop op) -> str {
     ty_str;
     ty_box(mt);
     ty_vec(mt);
+    ty_ptr(mt);
     ty_task;
     ty_port(@ty);
     ty_chan(@ty);

src/comp/front/parser.rs

@@ -511,6 +511,11 @@ fn parse_ty(&parser p) -> @ast::ty {
         auto mt = parse_mt(p);
         hi = mt.ty.span.hi;
         t = ast::ty_box(mt);
+    } else if (p.peek() == token::BINOP(token::STAR)) {
+        p.bump();
+        auto mt = parse_mt(p);
+        hi = mt.ty.span.hi;
+        t = ast::ty_ptr(mt);
     } else if (eat_word(p, "vec")) {
         expect(p, token::LBRACKET);
         t = ast::ty_vec(parse_mt(p));

src/test/run-pass/type-ptr.rs

@@ -0,0 +1,6 @@
+fn f(*int a) {
+}
+
+fn main(vec[str] args) {
+  ret;
+}