Bladeren bron

* Fixed compilation for case when extended <> cextended.

git-svn-id: branches/targetandroid@23486 -
yury 12 jaren geleden
bovenliggende
commit
475bc2d09d
1 gewijzigde bestanden met toevoegingen van 1 en 1 verwijderingen
  1. 1 1
      tests/test/cg/tcalext6.pp

+ 1 - 1
tests/test/cg/tcalext6.pp

@@ -211,7 +211,7 @@ begin
 end;
 
 {$ifdef FPC_HAS_TYPE_EXTENDED}
-procedure verify(val1, val2 : cextended; nr : Integer); overload;
+procedure verify(val1, val2 : extended; nr : Integer); overload;
 begin
   success := success and (val1 = val2);
   Write('Testing test ', nr , ', was ', val1, ', should be ', val2, '...');