Nicolas Cannasse преди 13 години
родител
ревизия
8524aea321
променени са 1 файла, в които са добавени 1 реда и са изтрити 0 реда
  1. 1 0
      parser.ml

+ 1 - 0
parser.ml

@@ -393,6 +393,7 @@ and type_name = parser
 
 and parse_type_path_or_const = parser
 	(* we can't allow (expr) here *)
+	| [< '(BkOpen,p1); l = parse_array_decl; '(BkClose,p2); s >] -> TPExpr (EArrayDecl l, punion p1 p2)
 	| [< t = parse_complex_type >] -> TPType t
 	| [< '(Const c,p) >] -> TPExpr (EConst c,p)
 	| [< e = expr >] -> TPExpr e