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

* remove redundant calls to add_edge_used

Browse Source
This commit is contained in:
peter 2003-12-04 23:27:32 +00:00
parent 48b84272bf
commit 1407a03ff1
2 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/globtype.pas
View File

@ -181,7 +181,11 @@ interface
);
{ Default calling convention }
{$ifdef x86}
pocall_default = pocall_stdcall;
{$else}
pocall_default = pocall_stdcall;
{$endif}
type
stringid = string[maxidlen];
@ -230,7 +234,10 @@ implementation
end.
{
$Log$
Revision 1.44 2003-11-07 15:58:32 florian
Revision 1.45 2003-12-04 23:27:32 peter
* remove redundant calls to add_edge_used
Revision 1.44 2003/11/07 15:58:32 florian
* Florian's culmutative nr. 1; contains:
- invalid calling conventions for a certain cpu are rejected
- arm softfloat calling conventions

9
compiler/rgobj.pas
View File

@ -644,8 +644,6 @@ implementation
begin
supregset_include(unusedregs,supreg);
list.concat(Tai_regalloc.dealloc(r));
add_edges_used(supreg);
add_constraints(r);
end;
end;
@ -1613,8 +1611,6 @@ implementation
list.insert(Tai_regalloc.dealloc(r))
else
list.insertafter(Tai_regalloc.dealloc(r),position);
add_edges_used(supreg);
add_constraints(r);
end;
@ -1822,7 +1818,10 @@ implementation
end.
{
$Log$
Revision 1.97 2003-11-29 17:36:41 peter
Revision 1.98 2003-12-04 23:27:32 peter
* remove redundant calls to add_edge_used
Revision 1.97 2003/11/29 17:36:41 peter
* check for add_move_instruction
Revision 1.96 2003/11/24 15:17:37 florian