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

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

Overview
Comment:{5433} fixed Delphi compilation of SynCurl unit
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 0eaf4c1cc3aa0aa6590434ae71b9590d845cf60e
User & Date: ab 2019-10-27 19:11:31
Context
2019-10-29
11:27
{5434} moved DDD TCountry type to a dedicated unit - with some refactoring and improvements for low-level access check-in: a59ec45368 user: ab tags: trunk
2019-10-27
19:11
{5433} fixed Delphi compilation of SynCurl unit check-in: 0eaf4c1cc3 user: ab tags: trunk
2019-10-26
20:38
{5432} revert PropIsIDTypeCastedField() correct code check-in: 5662a94809 user: ab tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to SQLite3/TestSQL3.dpr.

112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
    SynLZO in '..\SynLZO.pas',
    SynLizard in '..\SynLizard.pas',
    SynCrypto in '..\SynCrypto.pas',
    SynEcc in '..\SynEcc.pas',
    SynCrtSock in '..\SynCrtSock.pas',
    SynBidirSock in '..\SynBiDirSock.pas',
    {$ifdef USELIBCURL}
      SynCurl,
    {$endif USELIBCURL}
    //SynOpenSSL,
    SynCommons in '..\SynCommons.pas',
    SynLog in '..\SynLog.pas',
    SynTests in '..\SynTests.pas',
    {$ifndef DELPHI5OROLDER}
      {$ifndef LVCL}






|







112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
    SynLZO in '..\SynLZO.pas',
    SynLizard in '..\SynLizard.pas',
    SynCrypto in '..\SynCrypto.pas',
    SynEcc in '..\SynEcc.pas',
    SynCrtSock in '..\SynCrtSock.pas',
    SynBidirSock in '..\SynBiDirSock.pas',
    {$ifdef USELIBCURL}
      SynCurl in '..\SynCurl.pas',
    {$endif USELIBCURL}
    //SynOpenSSL,
    SynCommons in '..\SynCommons.pas',
    SynLog in '..\SynLog.pas',
    SynTests in '..\SynTests.pas',
    {$ifndef DELPHI5OROLDER}
      {$ifndef LVCL}

Changes to SynCurl.pas.

602
603
604
605
606
607
608



609
610
611
612
613
614
615
      end;
    end;
  finally
    LeaveCriticalSection(SynSockCS);
  end;
end;




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

end.






>
>
>







602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
      end;
    end;
  finally
    LeaveCriticalSection(SynSockCS);
  end;
end;


initialization

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

end.

Changes to SynopseCommit.inc.

1
'1.18.5432'
|
1
'1.18.5433'