Browse Source

[parser] fix typedef final position

Dan Korostelev 9 years ago
parent
commit
d0c4ed81e4
1 changed files with 1 additions and 1 deletions
  1. 1 1
      src/syntax/parser.ml

+ 1 - 1
src/syntax/parser.ml

@@ -627,7 +627,7 @@ and parse_type_decl s =
 				d_params = tl;
 				d_flags = List.map snd c;
 				d_data = t;
-			}, punion p1 p2)
+			}, punion p1 (pos t))
 		| [< '(Kwd Abstract,p1); name = type_name; tl = parse_constraint_params; st = parse_abstract_subtype; sl = plist parse_abstract_relations; '(BrOpen,_); fl, p2 = parse_class_fields false p1 >] ->
 			let flags = List.map (fun (_,c) -> match c with EPrivate -> APrivAbstract | EExtern -> AExtern) c in
 			let flags = (match st with None -> flags | Some t -> AIsType t :: flags) in