mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-03 11:10:37 +02:00
* removed notes
This commit is contained in:
parent
276a486a28
commit
e60344ccf7
@ -69,13 +69,13 @@ Function CheckSequence(p: Pai; Reg: TRegister; Var Found: Longint; Var RegInfo:
|
||||
is returned}
|
||||
Var hp2, hp3{, EndMod}: Pai;
|
||||
PrevNonRemovablePai: Pai;
|
||||
Cnt, OldNrOfMods: Longint;
|
||||
{Cnt,} OldNrOfMods: Longint;
|
||||
OrgRegInfo, HighRegInfo: TRegInfo;
|
||||
HighFound, OrgRegFound: Byte;
|
||||
RegCounter: TRegister;
|
||||
OrgRegResult: Boolean;
|
||||
TmpResult: Boolean;
|
||||
TmpState: Byte;
|
||||
{TmpState: Byte;}
|
||||
Begin {CheckSequence}
|
||||
Reg := Reg32(Reg);
|
||||
TmpResult := False;
|
||||
@ -1181,7 +1181,10 @@ End.
|
||||
|
||||
{
|
||||
$Log$
|
||||
Revision 1.58 2000-04-29 16:57:44 jonas
|
||||
Revision 1.59 2000-06-01 11:01:20 peter
|
||||
* removed notes
|
||||
|
||||
Revision 1.58 2000/04/29 16:57:44 jonas
|
||||
* fixed incompatibility with range chcking code, -O2 and higher
|
||||
now work correctly together with -Cr
|
||||
|
||||
@ -1328,4 +1331,4 @@ End.
|
||||
Revision 1.24 1999/08/25 11:59:58 jonas
|
||||
* changed pai386, paippc and paiapha (same for tai*) to paicpu (taicpu)
|
||||
|
||||
}
|
||||
}
|
||||
|
@ -1343,8 +1343,10 @@ Begin {checks whether the two ops are equal}
|
||||
End;
|
||||
|
||||
Function InstructionsEquivalent(p1, p2: Pai; Var RegInfo: TRegInfo): Boolean;
|
||||
{$ifdef csdebug}
|
||||
var
|
||||
hp: pai;
|
||||
{$endif csdebug}
|
||||
Begin {checks whether two Paicpu instructions are equal}
|
||||
If Assigned(p1) And Assigned(p2) And
|
||||
(Pai(p1)^.typ = ait_instruction) And
|
||||
@ -2335,7 +2337,10 @@ End.
|
||||
|
||||
{
|
||||
$Log$
|
||||
Revision 1.87 2000-04-29 16:56:45 jonas
|
||||
Revision 1.88 2000-06-01 11:01:20 peter
|
||||
* removed notes
|
||||
|
||||
Revision 1.87 2000/04/29 16:56:45 jonas
|
||||
* destroyreg overwrote some memory if the reg was an FPU register
|
||||
|
||||
Revision 1.86 2000/04/10 12:45:56 jonas
|
||||
@ -2433,4 +2438,4 @@ End.
|
||||
Revision 1.62 1999/10/07 16:07:35 jonas
|
||||
* small bugfix in ArrayRefsEq
|
||||
|
||||
}
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user