|
@@ -254,7 +254,7 @@ uses
|
|
function findreg_by_number(r:Tregister):tregisterindex;
|
|
function findreg_by_number(r:Tregister):tregisterindex;
|
|
function std_regnum_search(const s:string):Tregister;
|
|
function std_regnum_search(const s:string):Tregister;
|
|
function std_regname(r:Tregister):string;
|
|
function std_regname(r:Tregister):string;
|
|
- function dwarf_reg(r:tregister):byte;
|
|
|
|
|
|
+ function dwarf_reg(r:tregister):shortint;
|
|
|
|
|
|
function inverse_cond(const c: TAsmCond): TAsmCond; {$ifdef USEINLINE}inline;{$endif USEINLINE}
|
|
function inverse_cond(const c: TAsmCond): TAsmCond; {$ifdef USEINLINE}inline;{$endif USEINLINE}
|
|
function conditions_equal(const c1, c2: TAsmCond): boolean; {$ifdef USEINLINE}inline;{$endif USEINLINE}
|
|
function conditions_equal(const c1, c2: TAsmCond): boolean; {$ifdef USEINLINE}inline;{$endif USEINLINE}
|
|
@@ -472,7 +472,7 @@ implementation
|
|
end;
|
|
end;
|
|
|
|
|
|
|
|
|
|
- function dwarf_reg(r:tregister):byte;
|
|
|
|
|
|
+ function dwarf_reg(r:tregister):shortint;
|
|
begin
|
|
begin
|
|
result:=regdwarf_table[findreg_by_number(r)];
|
|
result:=regdwarf_table[findreg_by_number(r)];
|
|
if result=-1 then
|
|
if result=-1 then
|