Explorar o código

* better fix for detecting Comp's type

git-svn-id: trunk@36879 -
svenbarth %!s(int64=8) %!d(string=hai) anos
pai
achega
677c35c083
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      tests/test/trtti17.pp

+ 1 - 1
tests/test/trtti17.pp

@@ -91,7 +91,7 @@ begin
   specialize TestTypeKind<Double>(tkFloat);
   specialize TestTypeKind<Extended>(tkFloat);
   specialize TestTypeKind<Currency>(tkFloat);
-{$if not (defined(CPUI386) or defined(CPUX86_64)) or (defined(WIN64) and sizeof(Extended) = sizeof(Double))}
+{$ifdef FPC_COMP_IS_INT64}
   specialize TestTypeKind<Comp>(tkInt64);
 {$else}
   specialize TestTypeKind<Comp>(tkFloat);