about summary refs log tree commit diff
path: root/src/boot
diff options
context:
space:
mode:
authorGraydon Hoare <graydon@mozilla.com>2010-06-30 01:45:36 -0700
committerGraydon Hoare <graydon@mozilla.com>2010-06-30 01:45:36 -0700
commite828b2a94decc8ba7be531aa32e0fefbfc468909 (patch)
treeaef6c98e44cd945f63db3339855ecf01eb58e06f /src/boot
parentdf0eebcf1e31496106da43bcde40ac4983857bb1 (diff)
downloadrust-e828b2a94decc8ba7be531aa32e0fefbfc468909.tar.gz
rust-e828b2a94decc8ba7be531aa32e0fefbfc468909.zip
Tidy up (I think) a couple typos from patrick's last commit.
Diffstat (limited to 'src/boot')
-rw-r--r--src/boot/me/type.ml10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/boot/me/type.ml b/src/boot/me/type.ml
index 660066ad001..0c39ab8044a 100644
--- a/src/boot/me/type.ml
+++ b/src/boot/me/type.ml
@@ -481,8 +481,8 @@ let process_crate (cx:ctxt) (crate:Ast.crate) : unit =
                         in
                           Array.iteri check_elem tvs;
                           ty
-                  | Ast.TY_exterior ty -> Ast.TY_exterior ty
-                  | Ast.TY_mutable ty -> Ast.TY_mutable ty
+                  | Ast.TY_exterior ty -> Ast.TY_exterior (unify ty)
+                  | Ast.TY_mutable ty -> Ast.TY_mutable (unify ty)
                   | _ -> fail ()
               in
               TYSPEC_resolved (params, unify ty)
@@ -491,9 +491,9 @@ let process_crate (cx:ctxt) (crate:Ast.crate) : unit =
           | (TYSPEC_vector tv, TYSPEC_resolved (params, ty)) ->
               let rec unify ty =
                 match ty with
-                    Ast.TY_vec ty -> unify_ty ty tv; ty
-                  | Ast.TY_exterior ty -> Ast.TY_exterior ty
-                  | Ast.TY_mutable ty -> Ast.TY_mutable ty
+                    Ast.TY_vec ty' -> unify_ty ty' tv; ty
+                  | Ast.TY_exterior ty -> Ast.TY_exterior (unify ty)
+                  | Ast.TY_mutable ty -> Ast.TY_mutable (unify ty)
                   | _ -> fail ()
               in
               TYSPEC_resolved (params, unify ty)