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

* fix from Peter for double bug reported 20/05/1999

Browse Source
This commit is contained in:
pierre 1999-05-20 22:18:51 +00:00
parent d6d6139c05
commit 8101571683
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/aasm.pas
View File

@ -226,7 +226,7 @@ unit aasm;
{ generates a double (64 bit real) } { generates a double (64 bit real) }
pai_real_64bit = ^tai_real_64bit; pai_real_64bit = ^tai_real_64bit;
tai_real_64bit = object(tai) tai_real_64bit = object(tai)
value : ts80real; value : ts64real;
constructor init(_value : ts64real); constructor init(_value : ts64real);
end; end;
@ -984,7 +984,10 @@ uses
end. end.
{ {
$Log$ $Log$
Revision 1.44 1999-05-12 00:19:34 peter Revision 1.45 1999-05-20 22:18:51 pierre
* fix from Peter for double bug reported 20/05/1999
Revision 1.44 1999/05/12 00:19:34 peter
* removed R_DEFAULT_SEG * removed R_DEFAULT_SEG
* uniform float names * uniform float names