瀏覽代碼

* fixed test

git-svn-id: trunk@8043 -
Vincent Snijders 18 年之前
父節點
當前提交
d4f033bb78
共有 1 個文件被更改,包括 3 次插入3 次删除
  1. 3 3
      tests/webtbs/tw2129.pp

+ 3 - 3
tests/webtbs/tw2129.pp

@@ -36,14 +36,14 @@ begin
   comp1:=swap(comp1);
 {$endif FPC_DOUBLE_HILO_SWAPPED}
   str(comp1,s);
-{$ifdef FPC_HAS_EXTENDED}
+{$ifdef FPC_HAS_TYPE_EXTENDED}
   if s<>'-6.53142228756617E+0018' then
-{$else FPC_HAS_EXTENDED}
+{$else FPC_HAS_TYPE_EXTENDED}
   { this constant has been verified and is correct (FK) }
   { doubles have slightly different precision on processors <> x86, because }
   { intermediate calculations are not performed in 80 bit there (JM)        }
   if Copy(s,1,Length(s)-1)<>'-653142228756617021' then
-{$endif FPC_HAS_EXTENDED}
+{$endif FPC_HAS_TYPE_EXTENDED}
     begin
       writeln(s);
       writeln('error');