mORMot and Open Source friends
Check-in [d7afff6ea6]
Not logged in

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:SynGSSAPI: fix finalization part. Thanks, Chaa
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: d7afff6ea66d26d2d3698f34ff78ca3ce7160311
User & Date: mpv 2018-05-30 15:47:31
Context
2018-05-30
20:47
{4591} introducing TSynPersistentStore.fLoadFromLastAlgo protected field check-in: 76bc61797e user: ab tags: trunk
15:47
SynGSSAPI: fix finalization part. Thanks, Chaa check-in: d7afff6ea6 user: mpv tags: trunk
2018-05-28
19:02
{4590} tried to please some versions of the FPC compiler check-in: e833fd63f1 user: ab tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to SynGSSAPI.pas.

475
476
477
478
479
480
481
482

483
484
485
  FMajorStatus := AMajorStatus;
  FMinorStatus := AMinorStatus;
end;

finalization
  if GSSAPI<>nil then begin
    FreeLibrary(GSSAPI^.gsslib);
    FreeAndNil(GSSAPI);

  end;
end.







|
>



475
476
477
478
479
480
481
482
483
484
485
486
  FMajorStatus := AMajorStatus;
  FMinorStatus := AMinorStatus;
end;

finalization
  if GSSAPI<>nil then begin
    FreeLibrary(GSSAPI^.gsslib);
    Dispose(GSSAPI);
    GSSAPI := nil;
  end;
end.