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

* optimizer files fixed

Browse Source
This commit is contained in:
florian 2005-02-20 19:36:03 +00:00
parent 871fd8d2b8
commit 2b67164568
3 changed files with 25 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/arm/aoptcpu.pas
View File

@ -25,12 +25,14 @@
Unit aoptcpu;
{$i fpcdefs.inc}
Interface
uses cpubase, aoptobj, aoptcpub;
Type
TAOptCpu = Object(TAoptObj)
TAOptCpu = class(TAoptObj)
{ uses the same constructor as TAopObj }
End;
@ -39,7 +41,10 @@ Implementation
End.
{
$Log$
Revision 1.1 2005-02-20 19:11:04 florian
Revision 1.2 2005-02-20 19:36:03 florian
* optimizer files fixed
Revision 1.1 2005/02/20 19:11:04 florian
* initial commit
Revision 1.6 2005/02/14 17:13:10 peter

14
compiler/arm/aoptcpub.pas
View File

@ -24,6 +24,8 @@
}
Unit aoptcpub; { Assembler OPTimizer CPU specific Base }
{$i fpcdefs.inc}
{ enable the following define if memory references can have both a base and }
{ index register in 1 operand }
@ -41,7 +43,7 @@ Unit aoptcpub; { Assembler OPTimizer CPU specific Base }
Interface
Uses
aasmcpu,AOptBase;
cpubase,aasmcpu,AOptBase;
Type
@ -62,7 +64,7 @@ Type
{ **************************** TAoptBaseCpu ******************************* }
{ ************************************************************************* }
TAoptBaseCpu = Object(TAoptBase)
TAoptBaseCpu = class(TAoptBase)
End;
@ -100,6 +102,9 @@ Const
StoreDst = 1;
aopt_uncondjmp = A_B;
aopt_condjmp = A_B;
Implementation
{ ************************************************************************* }
@ -117,7 +122,10 @@ End.
{
$Log$
Revision 1.1 2005-02-20 19:11:04 florian
Revision 1.2 2005-02-20 19:36:03 florian
* optimizer files fixed
Revision 1.1 2005/02/20 19:11:04 florian
* initial commit
Revision 1.7 2005/02/14 17:13:10 peter

10
compiler/arm/aoptcpud.pas
View File

@ -24,14 +24,15 @@
}
Unit aoptcpud;
{$i fpcdefs.inc}
Interface
uses
AOptDA;
Type
PAOptDFACpu = ^TAOptDFACpu;
TAOptDFACpu = Object(TAOptDFA)
TAOptDFACpu = class(TAOptDFA)
End;
Implementation
@ -41,7 +42,10 @@ End.
{
$Log$
Revision 1.1 2005-02-20 19:11:04 florian
Revision 1.2 2005-02-20 19:36:03 florian
* optimizer files fixed
Revision 1.1 2005/02/20 19:11:04 florian
* initial commit
Revision 1.6 2005/02/14 17:13:10 peter