[fpc-devel]array of char
    Konkoly Tamas 
    tcc_inq at freemail.hu
       
    Fri Sep 29 06:35:05 CEST 2000
    
    
  
I found an error.
Source:
const
 CharsDes1:array[0..383]of char=
  '0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF'+
  '0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF'+
  '0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF'+
  '0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF'+
  '0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF'+
  '0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF';
var rr,rt:longint;
begin
 for rr:=0 to 383 do begin
  write(CharsDes1[rr]);
 end;
end.
The program just writes the first 255 characters and
the other characters instead of write zero codes.
I think it's a bug because the 'string' isn't equal 'array[0..x]of char'.
--
.,--/'{[< Tcc of Inquisition >]}'\--,.
    
    
More information about the fpc-devel
mailing list