mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-13 09:59:25 +02:00
parent
489b23cecd
commit
caba4a2050
1
.gitattributes
vendored
1
.gitattributes
vendored
@ -13762,6 +13762,7 @@ tests/webtbs/tw2425.pp svneol=native#text/plain
|
||||
tests/webtbs/tw2432.pp svneol=native#text/plain
|
||||
tests/webtbs/tw2435.pp svneol=native#text/plain
|
||||
tests/webtbs/tw2438.pp svneol=native#text/plain
|
||||
tests/webtbs/tw24410.pp svneol=native#text/pascal
|
||||
tests/webtbs/tw2442.pp svneol=native#text/plain
|
||||
tests/webtbs/tw24453.pp svneol=native#text/pascal
|
||||
tests/webtbs/tw24458.pp svneol=native#text/pascal
|
||||
|
9
tests/webtbs/tw24410.pp
Normal file
9
tests/webtbs/tw24410.pp
Normal file
@ -0,0 +1,9 @@
|
||||
{$mode objfpc}
|
||||
|
||||
procedure xx(var s:shortstring);
|
||||
var dirbuf:array[0..1321] of widechar;
|
||||
begin
|
||||
s:=dirbuf;
|
||||
end;
|
||||
begin
|
||||
end.
|
Loading…
Reference in New Issue
Block a user