|
@@ -133,6 +133,7 @@ uses
|
|
function spilling_create_load(const ref:treference;r:tregister):Taicpu;
|
|
function spilling_create_load(const ref:treference;r:tregister):Taicpu;
|
|
function spilling_create_store(r:tregister; const ref:treference):Taicpu;
|
|
function spilling_create_store(r:tregister; const ref:treference):Taicpu;
|
|
|
|
|
|
|
|
+ function is_ref_addr16(const ref:treference): Boolean;
|
|
function is_ref_bc(const ref:treference): Boolean;
|
|
function is_ref_bc(const ref:treference): Boolean;
|
|
function is_ref_de(const ref:treference): Boolean;
|
|
function is_ref_de(const ref:treference): Boolean;
|
|
function is_ref_hl(const ref:treference): Boolean;
|
|
function is_ref_hl(const ref:treference): Boolean;
|
|
@@ -340,6 +341,12 @@ implementation
|
|
end;
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
+ function is_ref_addr16(const ref: treference): Boolean;
|
|
|
|
+ begin
|
|
|
|
+ result:=(ref.base=NR_NO) and (ref.index=NR_NO);
|
|
|
|
+ end;
|
|
|
|
+
|
|
|
|
+
|
|
function is_ref_bc(const ref: treference): Boolean;
|
|
function is_ref_bc(const ref: treference): Boolean;
|
|
begin
|
|
begin
|
|
result:=(((ref.base=NR_BC) and (ref.index=NR_NO)) or
|
|
result:=(((ref.base=NR_BC) and (ref.index=NR_NO)) or
|