2
0
Nicolas Cannasse 13 жил өмнө
parent
commit
df4df4f49a
1 өөрчлөгдсөн 1 нэмэгдсэн , 0 устгасан
  1. 1 0
      parser.ml

+ 1 - 0
parser.ml

@@ -553,6 +553,7 @@ and parse_obj_decl = parser
 	| [< '(Comma,_); s >] ->
 		(match s with parser
 		| [< name, _ = any_ident; '(DblDot,_); e = expr; l = parse_obj_decl >] -> (name,e) :: l
+		| [< '(Const (String name),_); '(DblDot,_); e = expr; l = parse_obj_decl >] -> (name,e) :: l
 		| [< >] -> [])
 	| [< >] -> []