[fpc-devel] Need patch for bugs : 0011503 / 0009472

[Boian Mitov]

No,

function  TOWLock.StopLock() : IOWLockSection;
{$ENDIF}
begin
  Result := TOWSimpleStopLockSection.Create( Self );
end;

  With best regards,
    Boian Mitov

--------------------------------------------------------------------
Mitov Software
http://www.mitov.com
--------------------------------------------------------------------


----- Original Message ----- 
From: "Florian Klaempfl" <florian at freepascal.org>
To: "FPC developers' list" <fpc-devel at lists.freepascal.org>
Sent: Thursday, June 19, 2008 6:16 AM
Subject: Re: [fpc-devel] Need patch for bugs : 0011503 / 0009472


> Boian Mitov schrieb:
>>     Hi Florian,
>>
>> FLock is not interface. There is no error with the FLock.
>
> To which instance is WriteLock an interface? FLock?
>
>> WriteLock is interface, and I have to destroy it before I destroy the 
>> FLock. The order of destruction is obviously crucial.
>
>> The error is the fact that WriteLock referenced object is not released 
>> when WriteLock is assigned to NIL. I have found a number of work arounds 
>> for this, but some will not work in more complex scenarious :-( . As I 
>> mentioned this is a very simple case where the bug is obvious.
>>
> _______________________________________________
> fpc-devel maillist  -  fpc-devel at lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-devel