Try to ix compilation failures in units/fpcunit directory

git-svn-id: trunk@40601 -

tests/test/units/fpcunit/tcbucketlist.pp

@@ -6,7 +6,7 @@ interface
 
 uses
   Classes, SysUtils, fpcunit, testutils, testregistry,
-  BucketList;
+  contnrs;
 
 type
   TMyBucketList = Class(TBucketList)

tests/test/units/fpcunit/tccompstreaming.pp

@@ -1,5 +1,7 @@
 Unit tccompstreaming;
 
+{$mode objfpc}
+
 interface
 
 Uses

tests/test/units/fpcunit/tctparser.pp

@@ -8,7 +8,7 @@ uses
   Classes, SysUtils, fpcunit, testutils, testregistry;
 
   { TTestToString }
-
+type
   TTestToString= class(TTestCase)
   private
     fStream : TMemoryStream;
@@ -908,4 +908,4 @@ initialization
 
   RegisterTests([TTestToString,TTestTokenInt,TTestTokenFloat,TTestSymbol,TTestBinary]);
 
-end.
+end.

tests/test/units/fpcunit/testcomps.pp

@@ -1,5 +1,7 @@
 unit testcomps;
 
+{$mode objfpc}
+
 interface
 
 uses classes, sysutils;