t_id
1544
t_adddate
2005/04/03
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
{ Source provided for Free Pascal Bug Report 3774 } { Submitted by "Sergey@michint" on 2005-03-11 } { e-mail: } {$C+} var i, ec: Integer; begin Val('0x123', i, ec); Assert(ec=0); Assert(i=$123); writeln('ok'); end.