* SharedSuffix moved to include files to reduce number of ifdefs

git-svn-id: trunk@14902 -
This commit is contained in:
Tomas Hajny 2010-02-13 15:44:12 +00:00
parent ef4954f8d9
commit 5c31042f6a
6 changed files with 14 additions and 15 deletions

View File

@ -113,21 +113,6 @@ function LoadLibrarySymbols(const Lib: TLibHandle; const Symbols: PLibSymbol; co
procedure ClearLibrarySymbols(const Symbols: PLibSymbol; const Count: Integer);
// these are for easier crossplatform construction of dll names in dynloading libs.
Const
{$ifdef Windows}
SharedSuffix = 'dll';
{$else}
{$ifdef Darwin}
SharedSuffix = 'dylib';
{$else}
{$ifdef OS2}
SharedSuffix = 'dll';
{$else}
SharedSuffix = 'so';
{$endif}
{$endif}
{$endif}
Implementation

View File

@ -24,6 +24,8 @@ Type
Const
NilHandle = Nil;
// these are for easier crossplatform construction of dll names in dynloading libs.
SharedSuffix = 'so';
{$else}

View File

@ -25,6 +25,8 @@ type
const
NilHandle = 0;
// these are for easier crossplatform construction of dll names in dynloading libs.
SharedSuffix = 'dll';
{$else}

View File

@ -25,6 +25,12 @@ Type
Const
NilHandle = TLibHandle(0);
// these are for easier crossplatform construction of dll names in dynloading libs.
{$ifdef Darwin}
SharedSuffix = 'dylib';
{$else Darwin}
SharedSuffix = 'so';
{$endif Darwin}
{$else}

View File

@ -25,6 +25,8 @@ Type
Const
NilHandle = 0;
// these are for easier crossplatform construction of dll names in dynloading libs.
SharedSuffix = 'dll';
{$else}

View File

@ -25,6 +25,8 @@ Type
Const
NilHandle = 0;
// these are for easier crossplatform construction of dll names in dynloading libs.
SharedSuffix = 'dll';
{$else}