Test suite results for test file tbs/tb0024.pp

Test run data :

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

tr_id	run	tr_ok	tr_skip	tr_result
-810492393	729363	True	False	Successfully run

Record count: 1

{ Old file: tbs0028.pp }
{  type enumtype = (a); writeln(ord(a)); }

type
   enumtype = (a);

var
   e : enumtype;

begin
   writeln(ord(e));
end.