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

* newoptimizations define added

Browse Source
This commit is contained in:
peter 1999-12-02 11:26:41 +00:00
parent e85d23980b
commit ad2b1fb278
4 changed files with 45 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
compiler/cpubase.pas
View File

@ -25,6 +25,14 @@
****************************************************************************
}
unit cpubase;
{$ifdef newOptimizations}
{$define foropt}
{$define replacereg}
{$define arithopt}
{$define foldarithops}
{$endif newOptimizations}
interface
{$ifdef TP}
{$L-,Y-}
@ -887,7 +895,10 @@ end;
end.
{
$Log$
Revision 1.17 1999-11-09 23:06:45 peter
Revision 1.18 1999-12-02 11:26:41 peter
* newoptimizations define added
Revision 1.17 1999/11/09 23:06:45 peter
* esi_offset -> selfpointer_offset to be newcg compatible
* hcogegen -> cgbase fixes for newcg

12
compiler/csopt386.pas
View File

@ -22,6 +22,13 @@
}
Unit CSOpt386;
{$ifdef newOptimizations}
{$define foropt}
{$define replacereg}
{$define arithopt}
{$define foldarithops}
{$endif newOptimizations}
Interface
Uses aasm;
@ -1054,7 +1061,10 @@ End.
{
$Log$
Revision 1.34 1999-11-21 13:09:41 jonas
Revision 1.35 1999-12-02 11:26:41 peter
* newoptimizations define added
Revision 1.34 1999/11/21 13:09:41 jonas
* fixed some missed optimizations because 8bit regs were not always
taken into account

12
compiler/daopt386.pas
View File

@ -28,6 +28,13 @@
Unit DAOpt386;
{$ifdef newOptimizations}
{$define foropt}
{$define replacereg}
{$define arithopt}
{$define foldarithops}
{$endif newOptimizations}
Interface
Uses
@ -1936,7 +1943,10 @@ End.
{
$Log$
Revision 1.73 1999-11-27 23:45:43 jonas
Revision 1.74 1999-12-02 11:26:41 peter
* newoptimizations define added
Revision 1.73 1999/11/27 23:45:43 jonas
* even more missing register deallocations are added!
Revision 1.72 1999/11/21 13:06:30 jonas

12
compiler/popt386.pas
View File

@ -22,6 +22,13 @@
}
Unit POpt386;
{$ifdef newOptimizations}
{$define foropt}
{$define replacereg}
{$define arithopt}
{$define foldarithops}
{$endif newOptimizations}
Interface
Uses Aasm;
@ -1728,7 +1735,10 @@ End.
{
$Log$
Revision 1.72 1999-11-30 10:40:45 peter
Revision 1.73 1999-12-02 11:26:41 peter
* newoptimizations define added
Revision 1.72 1999/11/30 10:40:45 peter
+ ttype, tsymlist
Revision 1.71 1999/11/27 23:47:55 jonas