paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 04:29:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed test for non-mswindows platforms

Browse Source 
git-svn-id: trunk@10338 -
This commit is contained in:
Jonas Maebe 2008-02-16 11:58:15 +00:00
parent 38230735a5
commit 88bdf1d674
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tests/webtbs/tw10825.pp
View File

@ -10,7 +10,9 @@ uses
var
wstr1: widestring;
begin
{$ifdef mswindows}
winwidestringalloc:= false;
{$endif}
//crash exist with winwidestringalloc also but with bigger application only
wstr1:= '123';
wstr1:= 'ABC'+wstr1+'abc';