6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-01-27 09:33:42 +00:00
Code Issues Projects Releases Wiki Activity

Made struct assignment less hackish.

Browse Source
This commit is contained in:
acqn 2020-08-20 07:56:11 +08:00 committed by Oliver Schmidt
parent d1995fc81a
commit c3a6b39945
1 changed files with 20 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
src/cc65/assignment.c
View File

@ -95,10 +95,13 @@ static int CopyStruct (ExprDesc* LExpr, ExprDesc* RExpr)
/* Store it into the location referred in the primary */
Store (LExpr, stype);
/* Value is in primary as an rvalue */
ED_FinalizeRValLoad (LExpr);
} else {
/* The only way this can happen is in chained assignments */
if (!ED_IsLocPrimary (RExpr)) {
/* The rhs cannot happen to be loaded in the primary as it is too big */
if (!ED_IsLocExpr (RExpr)) {
ED_AddrExpr (RExpr);
LoadExpr (CF_NONE, RExpr);
}
@ -112,16 +115,19 @@ static int CopyStruct (ExprDesc* LExpr, ExprDesc* RExpr)
/* Call the memcpy function */
g_call (CF_FIXARGC, Func_memcpy, 4);
/* The result is an rvalue referenced in the primary */
ED_FinalizeRValLoad (LExpr);
/* Restore the indirection level of lhs */
ED_IndExpr (LExpr);
/* Clear the tested flag set during loading. This is not neccessary
** currently (and probably ever) as a struct/union cannot be converted
** to a boolean in C, but there is no harm to be future-proof.
*/
ED_MarkAsUntested (LExpr);
}
/* Clear the tested flag set during loading. This is not neccessary
** currently (and probably ever) as a struct/union cannot be converted
** to a boolean in C, but there is no harm to be future-proof.
*/
ED_MarkAsUntested (LExpr);
return 1;
}
@ -247,6 +253,9 @@ void Assignment (ExprDesc* Expr)
/* Restore the expression type */
Expr->Type = ltype;
/* Value is in primary as an rvalue */
ED_FinalizeRValLoad (Expr);
} else {
/* Get the address on stack if needed */
@ -264,8 +273,8 @@ void Assignment (ExprDesc* Expr)
/* Generate a store instruction */
Store (Expr, 0);
}
/* Value is in primary as an rvalue */
ED_FinalizeRValLoad (Expr);
/* Value might be still in primary and not an lvalue */
ED_FinalizeRValLoad (Expr);
}
}