瀏覽代碼

* changed write-only parameter of parse_symlist() into an out-parameter

git-svn-id: trunk@27937 -
Jonas Maebe 11 年之前
父節點
當前提交
47c6b08ece
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/pdecvar.pas

+ 1 - 1
compiler/pdecvar.pas

@@ -82,7 +82,7 @@ implementation
 
         { convert a node tree to symlist and return the last
           symbol }
-        function parse_symlist(pl:tpropaccesslist;var def:tdef):boolean;
+        function parse_symlist(pl:tpropaccesslist;out def:tdef):boolean;
           var
             idx : longint;
             sym : tsym;