Browse Source

* fixed setting of alignment of C records for darwin (only do it for
records, not for objects)

git-svn-id: trunk@3752 -

Jonas Maebe 19 years ago
parent
commit
f6d4f38bc0
1 changed files with 1 additions and 0 deletions
  1. 1 0
      compiler/pdecvar.pas

+ 1 - 0
compiler/pdecvar.pas

@@ -1127,6 +1127,7 @@ implementation
              }
              if (target_info.system in [system_powerpc_darwin, system_powerpc_macos]) and
                 is_first_field and
+                (symtablestack.top.symtabletype = recordsymtable) and
                 (trecordsymtable(symtablestack.top).usefieldalignment = -1) then
                begin
                  tempdef := tt.def;