paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-20 11:32:11 +01:00
Code Issues Packages Projects Releases Wiki Activity

* small typo fixed, compiles with 1.0.x again

Browse Source
This commit is contained in:
florian 2002-07-24 14:38:00 +00:00
parent ea53f048aa
commit 156fc666c8
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/powerpc/nppccnv.pas
View File

@ -128,7 +128,7 @@ implementation
{ the "and" is because 1.0.x will sign-extend the $80000000 to } { the "and" is because 1.0.x will sign-extend the $80000000 to }
{ $ffffffff80000000 when converting it to int64 (JM) } { $ffffffff80000000 when converting it to int64 (JM) }
dummy1 := int64($80000000) and (int64($43300000) shl 32); dummy1 := int64($80000000) and (int64($43300000) shl 32);
dymmy2 := int64($43300000) shl 32; dummy2 := int64($43300000) shl 32;
{$endif VER1_0} {$endif VER1_0}
valuereg_is_scratch := false; valuereg_is_scratch := false;
@ -384,7 +384,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.15 2002-07-21 16:57:22 jonas Revision 1.16 2002-07-24 14:38:00 florian
* small typo fixed, compiles with 1.0.x again
Revision 1.15 2002/07/21 16:57:22 jonas
* hopefully final fix for second_int_to_real() * hopefully final fix for second_int_to_real()
Revision 1.14 2002/07/20 11:58:05 florian Revision 1.14 2002/07/20 11:58:05 florian