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

Changed use of word_align: it now only indicates the alignment on

Browse Source 
which word-operations are allowed to take place
This commit is contained in:
ceriel 1988-02-17 14:29:57 +00:00
parent 36b86a6b9a
commit 2b231f7815
2 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lang/cem/cemcom/eval.c
View File

@ -482,7 +482,7 @@ EVAL(expr, val, code, true_label, false_label)
if (gencode) { if (gencode) {
if (is_struct_or_union(tp->tp_fund)) { if (is_struct_or_union(tp->tp_fund)) {
C_lfr(pointer_size); C_lfr(pointer_size);
load_block(tp->tp_size, word_align); load_block(tp->tp_size, (int) word_size);
} }
else else
C_lfr(ATW(tp->tp_size)); C_lfr(ATW(tp->tp_size));

12
lang/cem/cemcom/struct.c
View File

@ -414,9 +414,9 @@ add_field(szp, fd, fdtpp, idf, stp)
/* align this selector on the next boundary : /* align this selector on the next boundary :
the previous selector wasn't a bitfield. the previous selector wasn't a bitfield.
*/ */
field_offset = align(*szp, word_align); field_offset = align(*szp, int_align);
*szp = field_offset + word_size; *szp = field_offset + int_size;
stp->tp_align = lcm(stp->tp_align, word_align); stp->tp_align = lcm(stp->tp_align, int_align);
bits_declared = (arith)0; bits_declared = (arith)0;
field_busy = 1; field_busy = 1;
} }
@ -424,9 +424,9 @@ add_field(szp, fd, fdtpp, idf, stp)
if (fd->fd_width > bits_in_type - bits_declared) { if (fd->fd_width > bits_in_type - bits_declared) {
/* field overflow: fetch next memory unit /* field overflow: fetch next memory unit
*/ */
field_offset = align(*szp, word_align); field_offset = align(*szp, int_align);
*szp = field_offset + word_size; *szp = field_offset + int_size;
stp->tp_align = lcm(stp->tp_align, word_align); stp->tp_align = lcm(stp->tp_align, int_align);
bits_declared = fd->fd_width; bits_declared = fd->fd_width;
} }
else else