mirror of
https://github.com/byteworksinc/ORCA-C.git
synced 2024-05-29 04:41:27 +00:00
Report an error if a type name is missing in a _Generic expression.
This commit is contained in:
parent
8fd091e119
commit
4381b97f86
|
@ -1914,6 +1914,11 @@ var
|
||||||
NextToken;
|
NextToken;
|
||||||
typesMatch := false;
|
typesMatch := false;
|
||||||
if token.kind <> defaultsy then begin
|
if token.kind <> defaultsy then begin
|
||||||
|
if not (token.kind in specifierQualifierListElement) then begin
|
||||||
|
Error(26);
|
||||||
|
while not (token.kind in [colonch,commach,rparench,eofsy]) do
|
||||||
|
NextToken;
|
||||||
|
end; {if}
|
||||||
TypeName; {get the type name}
|
TypeName; {get the type name}
|
||||||
currentType := typeSpec;
|
currentType := typeSpec;
|
||||||
if (currentType^.size = 0) or (currentType^.kind = functionType) then
|
if (currentType^.size = 0) or (currentType^.kind = functionType) then
|
||||||
|
|
Loading…
Reference in New Issue
Block a user