Test suite results for test file tbs/tb0334.pp

Test run data :

Test file "tbs/tb0334.pp" information:

t_id 553
t_adddate 2003/10/03
t_result 0
t_knownrunerror 0

Detailed test run results:

Record count: 1

No log of 948037.

Source:

{$mode objfpc}

uses
   sysutils;

var
   s : tintegerset;

begin
   if sizeof(s)<>sizeof(integer) then
     begin
        writeln('Wrong size of Sysutils.TIntegerSet (',sizeof(s),')');
        halt(1);
     end;
end.

Link to SVN view of tbs/tb0334.pp source.