mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-16 23:21:57 +02:00
* Removed pqlib and default value. It should always load the lib loaded by postgres3dyn
git-svn-id: trunk@22274 -
This commit is contained in:
parent
13f20b72c7
commit
d02619b8af
@ -14,15 +14,6 @@ uses
|
||||
|
||||
{$PACKRECORDS C}
|
||||
|
||||
{$IFDEF Unix}
|
||||
const
|
||||
pqlib = 'libpq.'+sharedsuffix;
|
||||
{$ENDIF}
|
||||
{$IFDEF Windows}
|
||||
const
|
||||
pqlib = 'libpq.dll';
|
||||
{$ENDIF}
|
||||
|
||||
{$i dllisttypes.inc}
|
||||
|
||||
var
|
||||
@ -43,7 +34,7 @@ var
|
||||
{ Macro translated }
|
||||
Function DLE_VAL(elem : PDlelem) : pointer;
|
||||
|
||||
Procedure InitialiseDllist(libpath:string=pqlib);
|
||||
Procedure InitialiseDllist(libpath:string);
|
||||
Procedure ReleaseDllist;
|
||||
|
||||
var DllistLibraryHandle : TLibHandle;
|
||||
@ -52,7 +43,7 @@ implementation
|
||||
|
||||
var RefCount : integer;
|
||||
|
||||
Procedure InitialiseDllist(libpath:string=pqlib);
|
||||
Procedure InitialiseDllist(libpath:string);
|
||||
|
||||
begin
|
||||
inc(RefCount);
|
||||
|
Loading…
Reference in New Issue
Block a user