6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-01-10 19:29:45 +00:00
Code Issues Projects Releases Wiki Activity

Make struct work as documented

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@2716 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz 2003-12-06 13:35:05 +00:00
parent 35e639aac6
commit ad86e4679a
1 changed files with 7 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/ca65/struct.c
View File

@ -83,6 +83,11 @@ static long Member (long AllocSize)
AllocSize *= Multiplicator;
}
/* Check the size for a reasonable value */
if (AllocSize >= 0x10000) {
Error ("Range error");
}
/* Return the size */
return AllocSize;
}
@ -99,13 +104,7 @@ static long DoStructInternal (long Offs, unsigned Type)
* is started.
*/
int Anon = (Tok != TOK_IDENT);
if (Anon) {
unsigned char T = GetCurrentSymTabType ();
if (T != ST_STRUCT) {
ErrorSkip ("Struct/union needs a name");
return 0;
}
} else {
if (!Anon) {
/* Enter a new scope, then skip the name */
SymEnterLevel (SVal, ST_STRUCT, ADDR_SIZE_ABS);
NextTok ();
@ -178,10 +177,8 @@ static long DoStructInternal (long Offs, unsigned Type)
Error ("Not a struct/union");
} else {
SymEntry* SizeSym = GetSizeOfScope (Struct);
if (!SymIsDef (SizeSym)) {
if (!SymIsDef (SizeSym) || !SymIsConst (SizeSym, &MemberSize)) {
Error ("Size of struct/union is unknown");
} else {
MemberSize = GetSymVal (SizeSym);
}
}
MemberSize *= Member (MemberSize);