paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-11 09:26:15 +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 PQexec(conn:PPGconn; query:Pchar):PPGresult; cdecl;
Function PQgetline(conn:PPGconn; str:Pchar; len:longint):longint; cdecl; Function PQgetline(conn:PPGconn; str:Pchar; len:longint):longint; cdecl;
Function PQendcopy(conn:PPGconn):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 PQresultStatus(res:PPGresult):TExecStatusType; cdecl;
Function PQntuples(res:PPGresult):longint; cdecl; Function PQntuples(res:PPGresult):longint; cdecl;
Function PQnfields(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 PQexec(conn:PPGconn; query:Pchar):PPGresult;cdecl; external;
function PQgetline(conn:PPGconn; str:Pchar; len:longint):longint;cdecl; external; function PQgetline(conn:PPGconn; str:Pchar; len:longint):longint;cdecl; external;
function PQendcopy(conn:PPGconn):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 PQresultStatus(res:PPGresult):TExecStatusType;cdecl; external;
function PQntuples(res:PPGresult):longint;cdecl; external; function PQntuples(res:PPGresult):longint;cdecl; external;
function PQnfields(res:PPGresult):longint;cdecl; external; function PQnfields(res:PPGresult):longint;cdecl; external;
@ -327,4 +327,4 @@ begin
end; end;
{$endif} {$endif}
end. end.