mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-14 14:09:20 +02:00
* storebrowsercol returns boolean now
This commit is contained in:
parent
a0e2852b95
commit
40e19412ed
@ -156,7 +156,7 @@ procedure InitBrowserCol;
|
|||||||
procedure DoneBrowserCol;
|
procedure DoneBrowserCol;
|
||||||
|
|
||||||
function LoadBrowserCol(S: PStream): boolean;
|
function LoadBrowserCol(S: PStream): boolean;
|
||||||
procedure StoreBrowserCol(S: PStream);
|
function StoreBrowserCol(S: PStream): boolean;
|
||||||
procedure RegisterSymbols;
|
procedure RegisterSymbols;
|
||||||
|
|
||||||
implementation
|
implementation
|
||||||
@ -443,8 +443,9 @@ begin
|
|||||||
LoadBrowserCol:=true;
|
LoadBrowserCol:=true;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure StoreBrowserCol(S: PStream);
|
function StoreBrowserCol(S: PStream): boolean;
|
||||||
begin
|
begin
|
||||||
|
StoreBrowserCol:=true;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure RegisterSymbols;
|
procedure RegisterSymbols;
|
||||||
@ -500,7 +501,10 @@ begin
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.4 1999-08-17 13:25:16 peter
|
Revision 1.5 2000-01-27 23:42:33 peter
|
||||||
|
* storebrowsercol returns boolean now
|
||||||
|
|
||||||
|
Revision 1.4 1999/08/17 13:25:16 peter
|
||||||
* updates with the compiler browcol
|
* updates with the compiler browcol
|
||||||
|
|
||||||
Revision 1.3 1999/08/05 16:54:35 peter
|
Revision 1.3 1999/08/05 16:54:35 peter
|
||||||
|
Loading…
Reference in New Issue
Block a user