godzil/ack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

newer version with some bug fixes

Browse Source
This commit is contained in:
ceriel
1986-10-22 15:38:24 +00:00
parent aac1207beb
commit ca44bfc681
11 changed files with 106 additions and 59 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lang/m2/comp/declar.g
View File

@@ -219,7 +219,7 @@ ArrayType(struct type **ptp;)
RecordType(struct type **ptp;)
{
register struct scope *scope;
arith size;
arith size = 0;
int xalign = struct_align;
}
:
@@ -301,9 +301,10 @@ FieldList(struct scope *scope; arith *cnt; int *palign;)
}
df->df_type = tp;
df->fld_off = align(*cnt, tp->tp_align);
*cnt = tcnt = df->fld_off + tp->tp_size;
*cnt = df->fld_off + tp->tp_size;
df->df_flags |= D_QEXPORTED;
}
tcnt = *cnt;
}
OF variant(scope, &tcnt, tp, palign)
{ max = tcnt; tcnt = *cnt; }