paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-28 04:59:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

* crash with empty strigns

Browse Source
This commit is contained in:
peter 2004-12-02 17:51:40 +00:00
parent 75019cf36a
commit 15e2b21671
1 changed files with 17 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
tests/webtbs/tw3423.pp Normal file
View File

@ -0,0 +1,17 @@
{ Source provided for Free Pascal Bug Report 3423 }
{ Submitted by "Bram Kuijvenhoven" on 2004-12-02 }
{ e-mail: kuifware@hotmail.com }
{$MODE OBJFPC}{$H+}
var
a:ansistring;
s:shortstring;
begin
a:='';
s:='';
a+=s;
end.