- disabled multithreading because it has causes crashes

git-svn-id: trunk@22363 -

packages/fpmkunit/src/fpmkunit.pp

@@ -4068,7 +4068,12 @@ begin
 {$endif}
 {$ifndef NO_THREADING}
     else if CheckOption(I,'T','threads') then
+    { currently broken because the concurrent calls to GlobalDictionary.Substitute
+      are not thread safe, and this leads to crashs
       Defaults.ThreadsAmount:=StrToIntDef(OptionArg(I),-1)
+    }
+      { skip number argument }
+      OptionArg(I)
 {$endif NO_THREADING}
     else if CheckOption(I,'B','baseinstalldir') then
       Defaults.BaseInstallDir:=OptionArg(I)