* added {$mode objfpc} to fix test

git-svn-id: trunk@16212 -

tests/test/tbsx1.pp

@@ -1,3 +1,5 @@
+{$mode objfpc}
+
 program testbitscan;
 
 function test_byte: boolean;