t_id
1309
t_adddate
2004/07/01
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
{ Source provided for Free Pascal Bug Report 3174 } { Submitted by "C Western" on 2004-06-19 } { e-mail: mftq75@dsl.pipex.com } program test; procedure Mumble(s: PChar); begin WriteLn(s^); if s^<>'A' then halt(1); end; begin Mumble('A'); end.