Browse Source

+ added method make_simple_ref (empty for now, but will be implemented later)

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

+ 7 - 0
compiler/z80/cgcpu.pas

@@ -103,6 +103,8 @@ unit cgcpu;
 
 
         procedure a_adjust_sp(list: TAsmList; value: longint);
         procedure a_adjust_sp(list: TAsmList; value: longint);
 
 
+        procedure make_simple_ref(list:TAsmList;var ref: treference);
+
       protected
       protected
         procedure a_op_reg_reg_internal(list: TAsmList; Op: TOpCG; size: TCGSize; src, srchi, dst, dsthi: TRegister);
         procedure a_op_reg_reg_internal(list: TAsmList; Op: TOpCG; size: TCGSize; src, srchi, dst, dsthi: TRegister);
         procedure a_op_const_reg_internal(list : TAsmList; Op: TOpCG; size: TCGSize; a: tcgint; reg, reghi: TRegister);
         procedure a_op_const_reg_internal(list : TAsmList; Op: TOpCG; size: TCGSize; a: tcgint; reg, reghi: TRegister);
@@ -1616,6 +1618,11 @@ unit cgcpu;
       end;
       end;
 
 
 
 
+    procedure tcgz80.make_simple_ref(list: TAsmList; var ref: treference);
+      begin
+      end;
+
+
     procedure tcgz80.g_proc_entry(list : TAsmList;localsize : longint;nostackframe:boolean);
     procedure tcgz80.g_proc_entry(list : TAsmList;localsize : longint;nostackframe:boolean);
       var
       var
         regsize,stackmisalignment: longint;
         regsize,stackmisalignment: longint;