paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-01 15:42:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ 146

Browse Source
This commit is contained in:
peter 1998-07-04 11:49:17 +00:00
parent e5557711dc
commit 3a10beb991
2 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
bugs/bug0146.pp Normal file
View File

@ -0,0 +1,11 @@
procedure myfunction(var t : array of char);
begin
writeln(sizeof(t)); { should be 51 }
end;
var
mycharstring : array[0..50] of char;
begin
myfunction(mycharstring);
end.

1
bugs/readme.txt
View File

@ -194,4 +194,5 @@ bug0142.pp sizeof(object) is not tp7 compatible when no constructor is used
bug0143.pp cannot concat string and array of char in $X+ mode
bug0144.pp problem with 'with object do'
bug0145.pp typed files with huges records (needs filerec.size:longint)
bug0146.pp no sizeof() for var arrays and the size is pushed incorrect