소스 검색

* support (expr[,expr]) recovery for postfixoperators

git-svn-id: trunk@9521 -
peter 18 년 전
부모
커밋
537319385b
1개의 변경된 파일7개의 추가작업 그리고 0개의 파일을 삭제
  1. 7 0
      compiler/pexpr.pas

+ 7 - 0
compiler/pexpr.pas

@@ -1785,6 +1785,13 @@ implementation
                     until not try_to_consume(_COMMA);
                     consume(_RECKKLAMMER);
                   end
+                else if try_to_consume(_LKLAMMER) then
+                  begin
+                    repeat
+                      comp_expr(true);
+                    until not try_to_consume(_COMMA);
+                    consume(_RKLAMMER);
+                  end
                 else
                   break;
             until false;