paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-07 08:50:35 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ No optional parameters in 1.0.6

Browse Source
This commit is contained in:
michael 2002-07-21 12:04:49 +00:00
parent 0af1f3883c
commit 44f94bdc9d
1 changed files with 13 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
fcl/inc/contnrs.pp
View File

@ -23,7 +23,8 @@ unit contnrs;
private
ffreeobjects : boolean;
public
constructor create(freeobjects : boolean = true);
constructor create;
constructor create(freeobjects : boolean);
end;
TOrderedList = class
@ -40,11 +41,21 @@ unit contnrs;
inherited create;
ffreeobjects:=freeobjects;
end;
constructor tobjectlist.create;
begin
inherited create;
ffreeobjects:=True;
end;
end.
{
$Log$
Revision 1.1 2002-07-16 13:34:39 florian
Revision 1.2 2002-07-21 12:04:49 michael
+ No optional parameters in 1.0.6
Revision 1.1 2002/07/16 13:34:39 florian
+ skeleton for contnr.pp added
}