Skip to content
Permalink
Browse files

move curl finalization to SynCurl

  • Loading branch information...
pavel.mash
pavel.mash committed Oct 26, 2019
1 parent ffd6c5e commit 5869fb467370e9691e751a743b584a0bdd007c7a
Showing with 6 additions and 6 deletions.
  1. +0 −6 SynCrtSock.pas
  2. +6 −0 SynCurl.pas
@@ -12563,12 +12563,6 @@ initialization
Initialize;

finalization
{$ifdef USELIBCURL}
if PtrInt(curl.Module)>0 then begin
curl.global_cleanup;
FreeLibrary(curl.Module);
end;
{$endif USELIBCURL}
if WsaDataOnce.wVersion<>0 then
try
{$ifdef MSWINDOWS}
@@ -606,4 +606,10 @@ procedure LibCurlInitialize(engines: TCurlGlobalInit; const dllname: TFileName);
end;
end;

finalization
if PtrInt(curl.Module)>0 then begin
curl.global_cleanup;
FreeLibrary(curl.Module);
end;

end.

0 comments on commit 5869fb4

Please sign in to comment.
You can’t perform that action at this time.