Browse Source

+ implemented tcgmos6502.a_jmp_flags

Nikolay Nikolov 1 year ago
parent
commit
31fc87a29f
1 changed files with 5 additions and 5 deletions
  1. 5 5
      compiler/mos6502/cgcpu.pas

+ 5 - 5
compiler/mos6502/cgcpu.pas

@@ -1899,12 +1899,12 @@ unit cgcpu;
 
 
     procedure tcgmos6502.a_jmp_flags(list : TAsmList;const f : TResFlags;l: tasmlabel);
-      //var
-      //  ai : taicpu;
+      var
+        ai : taicpu;
       begin
-        //ai:=taicpu.op_cond_sym(A_Bxx,flags_to_cond(f),l);
-        //ai.is_jmp:=true;
-        //list.concat(ai);
+        ai:=taicpu.op_cond_sym(A_Bxx,flags_to_cond(f),l);
+        ai.is_jmp:=true;
+        list.concat(ai);
       end;