* fixed real:=variant for non-x86

git-svn-id: trunk@6847 -

rtl/inc/variant.inc

@@ -462,7 +462,7 @@ end;
 {$ifndef VER2_0}
 operator :=(const source : variant) dest : real;{$ifdef SYSTEMINLINE}inline;{$endif}
 begin
-  dest:=comp(variantmanager.vartoreal(source));
+  dest:=variantmanager.vartoreal(source);
 end;
 {$endif VER2_0}