6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-07-09 01:28:58 +00:00
Code Issues Projects Releases Wiki Activity

Syntax change

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@2708 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz 2003-12-03 19:51:07 +00:00
parent c15fd58d3b
commit 788208d7dc
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/ca65/struct.c
View File

@ -73,9 +73,8 @@ static long Member (long AllocSize)
{
long Multiplicator;
/* A comma and a multiplicator may follow */
if (Tok == TOK_COMMA) {
NextTok ();
/* A multiplicator may follow */
if (Tok != TOK_SEP) {
Multiplicator = ConstExpression ();
if (Multiplicator <= 0) {
Error ("Range error");
@ -163,7 +162,11 @@ static long DoStructInternal (long Offs, unsigned Type)
break;
case TOK_RES:
Error ("Not implemented");
if (Tok == TOK_SEP) {
Error ("Size is missing");
} else {
MemberSize = Member (1);
}
break;
case TOK_TAG:
@ -181,6 +184,7 @@ static long DoStructInternal (long Offs, unsigned Type)
MemberSize = GetSymVal (SizeSym);
}
}
MemberSize *= Member (MemberSize);
break;
case TOK_STRUCT: