소스 검색

* moved tllvmshadowsymtable items default property from private to public
section (although the compiler doesn't seem to care about it)

git-svn-id: trunk@32716 -

Jonas Maebe 9 년 전
부모
커밋
abcf441c00
1개의 변경된 파일2개의 추가작업 그리고 1개의 파일을 삭제
  1. 2 1
      compiler/symtable.pas

+ 2 - 1
compiler/symtable.pas

@@ -162,6 +162,8 @@ interface
 
          constructor create(st: tabstractrecordsymtable);
          destructor destroy; override;
+
+         property items[index: tfieldvarsym]: tllvmshadowsymtableentry read get; default;
         private
          // generate the table
          procedure generate;
@@ -171,7 +173,6 @@ interface
          procedure addalignmentpadding(finalsize: aint);
          procedure buildmapping(variantstarts: tfplist);
          procedure buildtable(variantstarts: tfplist);
-         property items[index: tfieldvarsym]: tllvmshadowsymtableentry read get; default;
        end;
 {$endif llvm}