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

* fixed range error

Browse Source 
git-svn-id: trunk@6519 -
This commit is contained in:
Jonas Maebe 2007-02-16 23:35:36 +00:00
parent 5aef9bc086
commit 5b6a1fcef8
1 changed files with 1 additions and 1 deletions

2
tests/webtbs/tw1856.pp
View File

@ -19,7 +19,7 @@ var
begin
setlength(flow, 10);
setlength(flow, 1);
flow[1]:=TFlowItem.Create;
flow[0]:=TFlowItem.Create;
{ release }
setlength(flow, 0);