paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-19 23:19:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ Fixed PQPutline declaration. Thanks to Armin Diehl <diehl@net-connection.de>

Browse Source
This commit is contained in:
michael 2000-04-07 19:21:35 +00:00
parent eacdf74e5e
commit 5f41b8c639
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
packages/postgres/postgres.pp
View File

@ -189,7 +189,7 @@ procedure PQuntrace(conn:PPGconn); cdecl;
Function PQexec(conn:PPGconn; query:Pchar):PPGresult; cdecl;
Function PQgetline(conn:PPGconn; str:Pchar; len:longint):longint; cdecl;
Function PQendcopy(conn:PPGconn):longint; cdecl;
procedure PQputline(conn:PPGconn; str:Pchar); cdecl;
Function PQputline(conn:PPGconn; str:Pchar) : longint; cdecl;
Function PQresultStatus(res:PPGresult):TExecStatusType; cdecl;
Function PQntuples(res:PPGresult):longint; cdecl;
Function PQnfields(res:PPGresult):longint; cdecl;
@ -268,7 +268,7 @@ implementation
function PQexec(conn:PPGconn; query:Pchar):PPGresult;cdecl; external;
function PQgetline(conn:PPGconn; str:Pchar; len:longint):longint;cdecl; external;
function PQendcopy(conn:PPGconn):longint;cdecl; external;
procedure PQputline(conn:PPGconn; str:Pchar);cdecl; external;
function PQputline(conn:PPGconn; str:Pchar) : longint;cdecl; external;
function PQresultStatus(res:PPGresult):TExecStatusType;cdecl; external;
function PQntuples(res:PPGresult):longint;cdecl; external;
function PQnfields(res:PPGresult):longint;cdecl; external;
@ -327,4 +327,4 @@ begin
end;
{$endif}
end.
end.