Apple-2gs-SW/ORCA-C
1
0
Fork 0
mirror of https://github.com/byteworksinc/ORCA-C.git synced 2024-11-17 05:06:10 +00:00
Code Issues Projects Releases Wiki Activity

Support designated initialization of anonymous member fields.

Browse Source 
As noted previously, there is some ambiguity in the standards about how anonymous structs/unions participate in initialization. ORCA/C follows the model that they do participate as structs or unions, and designated initialization of them is implemented accordingly.

This currently has a slight issue in that extra copies of the anonymous member field name will be printed in #pragma expand output.
This commit is contained in:
Stephen Heumann 2022-11-28 20:55:47 -06:00
parent 4621336c3b
commit 39250629bd
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
Parser.pas
View File

@ -2627,8 +2627,15 @@ var
ip := ip^.next;
if ip = nil then
Error(81);
NextToken;
{TODO if ip is an anonymous member field ...}
if ip^.anonMemberField then begin
PutBackToken(token, false);
token.kind := dotch;
token.class := reservedSymbol;
token.isDigraph := false;
ip := ip^.anonMember;
end {if}
else
NextToken;
if token.kind in [dotch,lbrackch] then
hasNestedDesignator := true
else