From 065a0d44d8f12b9fe20d63684c9057055119cbf3 Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Wed, 1 Apr 2020 23:32:02 +0000
Subject: [PATCH] * tcg64favr renamed tcg64fz80

git-svn-id: branches/z80@44504 -
---
 compiler/z80/cgcpu.pas | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/compiler/z80/cgcpu.pas b/compiler/z80/cgcpu.pas
index d63241aced..d6def6b2f4 100644
--- a/compiler/z80/cgcpu.pas
+++ b/compiler/z80/cgcpu.pas
@@ -106,7 +106,7 @@ unit cgcpu;
         procedure maybegetcpuregister(list : tasmlist; reg : tregister);
       end;
 
-      tcg64favr = class(tcg64f32)
+      tcg64fz80 = class(tcg64f32)
         procedure a_op64_reg_reg(list : TAsmList;op:TOpCG;size : tcgsize;regsrc,regdst : tregister64);override;
         procedure a_op64_const_reg(list : TAsmList;op:TOpCG;size : tcgsize;value : int64;reg : tregister64);override;
       end;
@@ -1913,7 +1913,7 @@ unit cgcpu;
       end;
 
 
-    procedure tcg64favr.a_op64_reg_reg(list : TAsmList;op:TOpCG;size : tcgsize;regsrc,regdst : tregister64);
+    procedure tcg64fz80.a_op64_reg_reg(list : TAsmList;op:TOpCG;size : tcgsize;regsrc,regdst : tregister64);
       begin
          if not(size in [OS_S64,OS_64]) then
            internalerror(2012102402);
@@ -1921,7 +1921,7 @@ unit cgcpu;
       end;
 
 
-    procedure tcg64favr.a_op64_const_reg(list : TAsmList;op:TOpCG;size : tcgsize;value : int64;reg : tregister64);
+    procedure tcg64fz80.a_op64_const_reg(list : TAsmList;op:TOpCG;size : tcgsize;value : int64;reg : tregister64);
       begin
         tcgz80(cg).a_op_const_reg_internal(list,Op,size,value,reg.reglo,reg.reghi);
       end;
@@ -1958,7 +1958,7 @@ unit cgcpu;
     procedure create_codegen;
       begin
         cg:=tcgz80.create;
-        cg64:=tcg64favr.create;
+        cg64:=tcg64fz80.create;
       end;
 
 end.