d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Fixed bug: old-style float parameters resulted in wrong addresses for following parameters

Browse source
This commit is contained in:
ceriel 1992-04-16 16:29:35 +00:00
parent b4f6c3fa00
commit 5d9c7f4d9b
1 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lang/cem/cemcom.ansi/idf.c
View file

@ -535,7 +535,12 @@ declare_formals(idf, fp)
word boundaries, i.e. take care that the following word boundaries, i.e. take care that the following
parameter starts on a new word boundary. parameter starts on a new word boundary.
*/ */
f_offset = align(f_offset + def->df_type->tp_size, (int) word_size); if (! hasproto
&& def->df_type->tp_fund == FLOAT
&& def->df_type->tp_size != double_size) {
f_offset = align(f_offset + double_size, (int) word_size);
}
else f_offset = align(f_offset + def->df_type->tp_size, (int) word_size);
RegisterAccount(def->df_address, def->df_type->tp_size, RegisterAccount(def->df_address, def->df_type->tp_size,
regtype(def->df_type), regtype(def->df_type),
def->df_sc); def->df_sc);