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

fixed several bugs with object sizes

Browse Source
This commit is contained in:
eck
1990-08-14 09:59:37 +00:00
parent 36b11dc296
commit 0f2f6da38f
2 changed files with 47 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lang/pc/comp/code.c
View File

@@ -264,10 +264,14 @@ CodeEndBlock(df, StackAdjustment)
C_cal("_nfa");
C_asp(word_size);
}
if( tp->tp_size == word_size )
C_lol(-tp->tp_size);
if( tp->tp_size == 2 * word_size )
C_ldl(-tp->tp_size);
else
C_lol(-tp->tp_size);
else {
C_lal(-tp->tp_size);
C_loi(tp->tp_size);
}
C_ret(tp->tp_size);
}