Allow designated initialization of fields named the same as typedefs.

They are in separate name spaces, so this should be permitted.
2022-12-01 14:09:03 -06:00 · 2022-12-01 14:09:03 -06:00 · 48efd462ef
parent 8ad58b0de7
commit 48efd462ef
1 changed files with 1 additions and 1 deletions
--- a/Parser.pas
+++ b/Parser.pas
@ -2623,7 +2623,7 @@ var
                  goto 1;
                  end; {if}
               Match(dotch, 35);
-               if token.kind = ident then begin
+               if token.kind in [ident,typedef] then begin
                  ip := tp^.fieldList;
                  done := false;
                  while (ip <> nil) and not done do