diff --git a/wst/trunk/tests/test_suite/testformatter_unit.pas b/wst/trunk/tests/test_suite/testformatter_unit.pas
index e2b55635f..af834a116 100644
--- a/wst/trunk/tests/test_suite/testformatter_unit.pas
+++ b/wst/trunk/tests/test_suite/testformatter_unit.pas
@@ -703,7 +703,7 @@ begin
f.EndScope();
s := TMemoryStream.Create();
- f.SaveToStream(s);
+ f.SaveToStream(s);s.SaveToFile(ClassName + '.Test_Single_4.xml');
tmpVal := 0;
f := CreateFormatter(TypeInfo(TClass_Float));
@@ -739,7 +739,7 @@ begin
f.EndScope();
s := TMemoryStream.Create();
- f.SaveToStream(s);
+ f.SaveToStream(s);s.SaveToFile(ClassName + '.Test_Double_8.xml');
tmpVal := 0;
f := CreateFormatter(TypeInfo(TClass_Float));
@@ -775,7 +775,7 @@ begin
f.EndScope();
s := TMemoryStream.Create();
- f.SaveToStream(s);
+ f.SaveToStream(s);s.SaveToFile(ClassName + '.Test_Currency_8.xml');
tmpVal := 0;
f := CreateFormatter(TypeInfo(TClass_Float));
@@ -811,7 +811,7 @@ begin
f.EndScope();
s := TMemoryStream.Create();
- f.SaveToStream(s);
+ f.SaveToStream(s);s.SaveToFile(ClassName + '.Test_Extended_10.xml');
tmpVal := 0;
f := CreateFormatter(TypeInfo(TClass_Float));
diff --git a/wst/trunk/tests/test_suite/wst_test_suite.lpi b/wst/trunk/tests/test_suite/wst_test_suite.lpi
index 4a0f9cc41..dd11d30d6 100644
--- a/wst/trunk/tests/test_suite/wst_test_suite.lpi
+++ b/wst/trunk/tests/test_suite/wst_test_suite.lpi
@@ -7,7 +7,7 @@
-
+
@@ -32,16 +32,18 @@
-
+
+
+
-
-
+
+
@@ -71,7 +73,7 @@
-
+
@@ -93,8 +95,8 @@
-
-
+
+
@@ -113,7 +115,7 @@
-
+
@@ -142,7 +144,7 @@
-
+
@@ -172,7 +174,7 @@
-
+
@@ -471,7 +473,7 @@
-
+
@@ -487,7 +489,7 @@
-
+
@@ -524,23 +526,19 @@
-
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
-
-
diff --git a/wst/trunk/tests/test_suite/wst_test_suite.lpr b/wst/trunk/tests/test_suite/wst_test_suite.lpr
index 2d48456d0..c561f7d8a 100644
--- a/wst/trunk/tests/test_suite/wst_test_suite.lpr
+++ b/wst/trunk/tests/test_suite/wst_test_suite.lpr
@@ -2,7 +2,13 @@ program wst_test_suite;
{$mode objfpc}{$H+}
+{$DEFINE UseCThreads}
+
uses
+ {$IFDEF UNIX}{$IFDEF UseCThreads}
+ cthreads,
+ {$ENDIF}{$ENDIF}
+
custapp, classes, sysutils, fpcunit, testreport, testregistry,
TestFormatter_unit, testmetadata_unit,
server_service_soap, soap_formatter, base_binary_formatter,