mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-06 15:50:30 +02:00
* avoid result no set warning in regtoreg64
This commit is contained in:
parent
a47951f647
commit
2d793b8c98
@ -1322,6 +1322,8 @@ unit i386;
|
||||
function regtoreg64(reg : tregister) : tregister;
|
||||
|
||||
begin
|
||||
{ to avoid warning }
|
||||
regtoreg64:=R_NO;
|
||||
internalerror(6464);
|
||||
end;
|
||||
|
||||
@ -1952,7 +1954,10 @@ Begin
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.29 1999-01-19 10:19:02 florian
|
||||
Revision 1.30 1999-01-19 10:50:01 pierre
|
||||
* avoid result no set warning in regtoreg64
|
||||
|
||||
Revision 1.29 1999/01/19 10:19:02 florian
|
||||
* bug with mul. of dwords fixed, reported by Alexander Stohr
|
||||
* some changes to compile with TP
|
||||
+ small enhancements for the new code generator
|
||||
|
Loading…
Reference in New Issue
Block a user