瀏覽代碼

"import <path> = ident" becomes "import <path> in ident"

Nicolas Cannasse 12 年之前
父節點
當前提交
842b05a29b
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      parser.ml

+ 1 - 1
parser.ml

@@ -262,7 +262,7 @@ and parse_import s p1 =
 				serror());
 				serror());
 		| [< '(Semicolon,p2) >] ->
 		| [< '(Semicolon,p2) >] ->
 			p2, List.rev acc, INormal
 			p2, List.rev acc, INormal
-		| [< '(Binop OpAssign,_); '(Const (Ident name),_); '(Semicolon,p2) >] ->
+		| [< '(Kwd In,_); '(Const (Ident name),_); '(Semicolon,p2) >] ->
 			p2, List.rev acc, IAsName name
 			p2, List.rev acc, IAsName name
 		| [< >] ->
 		| [< >] ->
 			serror()
 			serror()