Delphiでは、なぜ、直接比較可能なthreadvarタイプの浮動小数点はありませんか？

Question

これをDelphi 6,7およびXE2でテストしましたが、すべてこのエラーが表示されます。
私はこのように、直接のスレッドで2つの浮動小数点数を比較したいと思います：

threadvar 
    a,b : Double; 

procedure test; 
begin 
    if a > b then 
    ; 
end; 

が、コンパイルするときに、DCCは、私はこのようにそれを変え内部error.So発生しました：

threadvar 
    a,b : Double; 

procedure test; 
begin 
    if a - b > 0 then 
    ; 
end; 

を

エラーが消えた理由は何ですか？

Answer 1

これは明らかにコンパイラのバグです。私はこのバグをQuality Central QC#101656に報告しました。このバグは32ビットコンパイラにのみ影響しますが、それは誰にも大きな慰めになるでしょう！あなたはこのようなレコードであなたの変数を置くことによって、それを回避することができます

：Delphiコンパイラで

threadvar 
    r: record 
    a,b: Double; 
    end; 

procedure test; 
begin 
    if r.a > r.b then 
    ; 
end;