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

Fix cycle failure after last commit

Browse Source 
git-svn-id: trunk@37298 -
This commit is contained in:
pierre 2017-09-21 15:47:49 +00:00
parent 735f9363d8
commit b14feadfe1
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/assemble.pas
View File

@ -1804,8 +1804,10 @@ Implementation
{$if defined(cpuextended) and defined(FPC_HAS_TYPE_EXTENDED)} {$if defined(cpuextended) and defined(FPC_HAS_TYPE_EXTENDED)}
eextended : extended; eextended : extended;
{$else} {$else}
{$ifdef FPC_SOFT_FPUX80}
eextended : floatx80; eextended : floatx80;
{$endif} {$endif}
{$endif}
ccomp : comp; ccomp : comp;
tmp : word; tmp : word;
cpu: tcputype; cpu: tcputype;