* Fixed test to be locale independent.

git-svn-id: trunk@7761 -

tests/webtbs/tw8434.pp

@@ -3,6 +3,7 @@ uses sysutils;
 var
   x: double;
 begin
+  DecimalSeparator:='.';
   x := 0.099991;
   if (Format('%5.2f', [x]) <> ' 0.10') then
     halt(1);