Browse Source

* generate an internal error in tcgz80.a_cmp_reg_reg_label, because that's not yet implemented

git-svn-id: branches/z80@45018 -
nickysn 5 years ago
parent
commit
d54a2b7cb6
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/z80/cgcpu.pas

+ 1 - 1
compiler/z80/cgcpu.pas

@@ -1724,7 +1724,7 @@ unit cgcpu;
         tmpreg : tregister;
         tmpreg : tregister;
         i : byte;
         i : byte;
       begin
       begin
-        list.Concat(tai_comment.Create(strpnew('WARNING! not implemented: a_cmp_reg_reg_label')));
+        internalerror(2020042301);
         //swapped:=false;
         //swapped:=false;
         //{ swap parameters? }
         //{ swap parameters? }
         //case cmp_op of
         //case cmp_op of