浏览代码

* More clear comment

Michael Van Canneyt 3 年之前
父节点
当前提交
1b8170d18d
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      packages/fcl-passrc/src/pastree.pp

+ 1 - 1
packages/fcl-passrc/src/pastree.pp

@@ -738,7 +738,7 @@ type
     procedure ForEachCall(const aMethodCall: TOnForEachPasElement;
     procedure ForEachCall(const aMethodCall: TOnForEachPasElement;
       const Arg: Pointer); override;
       const Arg: Pointer); override;
   public
   public
-    Values: TFPList; // list of TPasElement
+    Values: TFPList; // list of TPasExpr
     Members: TPasRecordType;
     Members: TPasRecordType;
   end;
   end;