Tidy up (I think) a couple typos from patrick's last commit.
This commit is contained in:
parent
df0eebcf1e
commit
e828b2a94d
@ -481,8 +481,8 @@ let process_crate (cx:ctxt) (crate:Ast.crate) : unit =
|
|||||||
in
|
in
|
||||||
Array.iteri check_elem tvs;
|
Array.iteri check_elem tvs;
|
||||||
ty
|
ty
|
||||||
| Ast.TY_exterior ty -> Ast.TY_exterior ty
|
| Ast.TY_exterior ty -> Ast.TY_exterior (unify ty)
|
||||||
| Ast.TY_mutable ty -> Ast.TY_mutable ty
|
| Ast.TY_mutable ty -> Ast.TY_mutable (unify ty)
|
||||||
| _ -> fail ()
|
| _ -> fail ()
|
||||||
in
|
in
|
||||||
TYSPEC_resolved (params, unify ty)
|
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)) ->
|
| (TYSPEC_vector tv, TYSPEC_resolved (params, ty)) ->
|
||||||
let rec unify ty =
|
let rec unify ty =
|
||||||
match ty with
|
match ty with
|
||||||
Ast.TY_vec ty -> unify_ty ty tv; ty
|
Ast.TY_vec ty' -> unify_ty ty' tv; ty
|
||||||
| Ast.TY_exterior ty -> Ast.TY_exterior ty
|
| Ast.TY_exterior ty -> Ast.TY_exterior (unify ty)
|
||||||
| Ast.TY_mutable ty -> Ast.TY_mutable ty
|
| Ast.TY_mutable ty -> Ast.TY_mutable (unify ty)
|
||||||
| _ -> fail ()
|
| _ -> fail ()
|
||||||
in
|
in
|
||||||
TYSPEC_resolved (params, unify ty)
|
TYSPEC_resolved (params, unify ty)
|
||||||
|
Loading…
x
Reference in New Issue
Block a user