diff --git a/Parser.pas b/Parser.pas index 57d5557..a1b8c5f 100644 --- a/Parser.pas +++ b/Parser.pas @@ -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