t_id
1547
t_adddate
2005/04/05
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
950433692 | 1015742 | True | False | Successfully run |
Record count: 1
{ Source provided for Free Pascal Bug Report 3865 } { Submitted by "Jernej" on 2005-04-01 } { e-mail: jernejcoder@gmail.com } uses SysUtils; procedure wantitchars(const text: string; var wot: array of char); begin fillchar(wot, sizeof(wot), 0); StrPCopy(wot, text); // FPC ERROR: incompatible type for arg no. 1: got "array of char", expected "pchar" end; var a : array[0..10] of char; begin wantitchars('test',a); writeln(a); if a<>'test' then halt(1); end.