t_id
1236
t_adddate
2004/01/23
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
{ Source provided for Free Pascal Bug Report 2885 } { Submitted by "Michalis Kamburelis" on 2004-01-07 } { e-mail: michalis@camelot.homedns.org } procedure p(const b:Single); overload; begin Writeln('single'); end; procedure p(const b:Double); overload; begin Writeln('double'); halt(1); end; begin p(single(1.0)); end.