Browse Source

* fixed missing list.concat in tcgmos6502.a_load_const_reg

Nikolay Nikolov 1 year ago
parent
commit
7af9a1f6e0
1 changed files with 3 additions and 3 deletions
  1. 3 3
      compiler/mos6502/cgcpu.pas

+ 3 - 3
compiler/mos6502/cgcpu.pas

@@ -1306,11 +1306,11 @@ unit cgcpu;
              if not (size in [OS_8,OS_S8]) then
              if not (size in [OS_8,OS_S8]) then
                internalerror(2024040704);
                internalerror(2024040704);
              if reg=NR_A then
              if reg=NR_A then
-               taicpu.op_const(A_LDA,byte(a))
+               list.Concat(taicpu.op_const(A_LDA,byte(a)))
              else if reg=NR_X then
              else if reg=NR_X then
-               taicpu.op_const(A_LDX,byte(a))
+               list.Concat(taicpu.op_const(A_LDX,byte(a)))
              else if reg=NR_Y then
              else if reg=NR_Y then
-               taicpu.op_const(A_LDY,byte(a))
+               list.Concat(taicpu.op_const(A_LDY,byte(a)))
              else
              else
                internalerror(2024040705);
                internalerror(2024040705);
            end
            end