paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-14 14:49:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

* change op_* const parameters to aint for consistency

Browse Source 
git-svn-id: trunk@36434 -
This commit is contained in:
florian 2017-06-05 21:37:48 +00:00
parent 053124f78a
commit dcf8de3253
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
compiler/sparcgen/aasmcpu.pas
View File

@ -43,13 +43,13 @@ uses
constructor op_none(op : tasmop);
constructor op_reg(op : tasmop;_op1 : tregister);
constructor op_const(op : tasmop;_op1 : LongInt);
constructor op_const(op : tasmop;_op1 : aint);
constructor op_ref(op : tasmop;const _op1 : treference);
constructor op_reg_reg(op : tasmop;_op1,_op2 : tregister);
constructor op_reg_ref(op : tasmop;_op1 : tregister;const _op2 : treference);
constructor op_reg_const(op:tasmop; _op1: tregister; _op2: LongInt);
constructor op_const_reg(op:tasmop; _op1: LongInt; _op2: tregister);
constructor op_reg_const(op:tasmop; _op1: tregister; _op2: aint);
constructor op_const_reg(op:tasmop; _op1: aint; _op2: tregister);
constructor op_ref_reg(op : tasmop;const _op1 : treference;_op2 : tregister);
constructor op_reg_reg_reg(op : tasmop;_op1,_op2,_op3 : tregister);
@ -59,7 +59,7 @@ uses
{ this is for Jmp instructions }
constructor op_cond_sym(op : tasmop;cond:TAsmCond;_op1 : tasmsymbol);
constructor op_sym(op : tasmop;_op1 : tasmsymbol);
constructor op_sym_ofs(op : tasmop;_op1 : tasmsymbol;_op1ofs:longint);
constructor op_sym_ofs(op : tasmop;_op1 : tasmsymbol;_op1ofs:aint);
procedure loadbool(opidx:longint;_b:boolean);
{ register allocation }
function is_same_reg_move(regtype: Tregistertype):boolean; override;
@ -120,7 +120,7 @@ implementation
end;
constructor taicpu.op_const(op : tasmop;_op1 : LongInt);
constructor taicpu.op_const(op : tasmop;_op1 : aint);
begin
inherited create(op);
ops:=1;
@ -136,7 +136,7 @@ implementation
loadreg(1,_op2);
end;
constructor taicpu.op_reg_const(op:tasmop; _op1: tregister; _op2: LongInt);
constructor taicpu.op_reg_const(op:tasmop; _op1: tregister; _op2: aint);
begin
inherited create(op);
ops:=2;
@ -144,7 +144,7 @@ implementation
loadconst(1,_op2);
end;
constructor taicpu.op_const_reg(op:tasmop; _op1: LongInt; _op2: tregister);
constructor taicpu.op_const_reg(op:tasmop; _op1: aint; _op2: tregister);
begin
inherited create(op);
ops:=2;
@ -223,7 +223,7 @@ implementation
end;
constructor taicpu.op_sym_ofs(op : tasmop;_op1 : tasmsymbol;_op1ofs:longint);
constructor taicpu.op_sym_ofs(op : tasmop;_op1 : tasmsymbol;_op1ofs:aint);
begin
inherited create(op);
ops:=1;