|
@@ -96,17 +96,8 @@ interface
|
|
|
|
|
|
|
|
|
gas_opsize2str : array[topsize] of string[2] =
|
|
|
- ('','.b','.w','.l','.s','.d','.x',''
|
|
|
- );
|
|
|
-{
|
|
|
- gas_reg2str : treg2strtable =
|
|
|
- ('', '%d0','%d1','%d2','%d3','%d4','%d5','%d6','%d7',
|
|
|
- '%a0','%a1','%a2','%a3','%a4','%a5','%a6','%sp',
|
|
|
- '-(%sp)','(%sp)+',
|
|
|
- '%ccr','%fp0','%fp1','%fp2','%fp3','%fp4','%fp5',
|
|
|
- '%fp6','%fp7','%fpcr','%sr','%ssp','%dfc',
|
|
|
- '%sfc','%vbr','%fpsr');
|
|
|
-}
|
|
|
+ ('','.b','.w','.l','.s','.d','.x','');
|
|
|
+
|
|
|
|
|
|
implementation
|
|
|
|
|
@@ -201,10 +192,8 @@ interface
|
|
|
i : tsuperregister;
|
|
|
begin
|
|
|
case o.typ of
|
|
|
- top_reg: begin
|
|
|
+ top_reg:
|
|
|
getopstr:=gas_regname(o.reg);
|
|
|
-// writeln('top_reg:',getopstr,'!');
|
|
|
- end;
|
|
|
top_ref:
|
|
|
if o.ref^.refaddr=addr_full then
|
|
|
begin
|