Răsfoiți Sursa

* 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 ani în urmă
părinte
comite
abcf441c00
1 a modificat fișierele cu 2 adăugiri și 1 ștergeri
  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}