Merge pull request #51 from ksherlock/debugger_forward_struct_decl

Fix debugger symbol tables with forward declared structs
This commit is contained in:
Stephen Heumann 2018-02-10 21:17:03 -06:00 committed by GitHub
commit bd110d7e21
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 3 additions and 0 deletions

View File

@ -982,6 +982,9 @@ var
begin {ExpandStructType}
ip := tp^.fieldList;
{ fieldList is nil if this is a forward declared struct. }
if ip = nil then ip := defaultStruct^.fieldList;
while ip <> nil do begin
GenSymbol(ip, none);
ip := ip^.next;