mirror of
https://github.com/postgres/postgres.git
synced 2025-07-21 16:02:15 +03:00
Another pgindent run. Sorry folks.
This commit is contained in:
Bruce Momjian
@ -7,7 +7,7 @@
|
||||
*
|
||||
* Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* $Id: libpgtcl.h,v 1.7 1999/02/13 23:22:36 momjian Exp $
|
||||
* $Id: libpgtcl.h,v 1.8 1999/05/25 22:43:42 momjian Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
@ -17,7 +17,7 @@
|
||||
|
||||
#include "tcl.h"
|
||||
|
||||
extern int Pgtcl_Init(Tcl_Interp * interp);
|
||||
extern int Pgtcl_SafeInit(Tcl_Interp * interp);
|
||||
extern int Pgtcl_Init(Tcl_Interp *interp);
|
||||
extern int Pgtcl_SafeInit(Tcl_Interp *interp);
|
||||
|
||||
#endif /* LIBPGTCL_H */
|
||||
|
||||
@ -9,7 +9,7 @@
|
||||
*
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtcl.c,v 1.14 1999/02/13 23:22:37 momjian Exp $
|
||||
* $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtcl.c,v 1.15 1999/05/25 22:43:43 momjian Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
@ -28,7 +28,7 @@
|
||||
*/
|
||||
|
||||
int
|
||||
Pgtcl_Init(Tcl_Interp * interp)
|
||||
Pgtcl_Init(Tcl_Interp *interp)
|
||||
{
|
||||
|
||||
/*
|
||||
@ -133,7 +133,7 @@ Pgtcl_Init(Tcl_Interp * interp)
|
||||
|
||||
|
||||
int
|
||||
Pgtcl_SafeInit(Tcl_Interp * interp)
|
||||
Pgtcl_SafeInit(Tcl_Interp *interp)
|
||||
{
|
||||
return Pgtcl_Init(interp);
|
||||
}
|
||||
|
||||
@ -7,7 +7,7 @@
|
||||
*
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtclCmds.c,v 1.43 1999/05/25 16:15:06 momjian Exp $
|
||||
* $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtclCmds.c,v 1.44 1999/05/25 22:43:43 momjian Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
@ -237,7 +237,7 @@ tcl_value(char *value)
|
||||
**********************************/
|
||||
|
||||
int
|
||||
Pg_conndefaults(ClientData cData, Tcl_Interp * interp, int argc, char **argv)
|
||||
Pg_conndefaults(ClientData cData, Tcl_Interp *interp, int argc, char **argv)
|
||||
{
|
||||
PQconninfoOption *option;
|
||||
Tcl_DString result;
|
||||
@ -276,7 +276,7 @@ Pg_conndefaults(ClientData cData, Tcl_Interp * interp, int argc, char **argv)
|
||||
**********************************/
|
||||
|
||||
int
|
||||
Pg_connect(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_connect(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
char *pghost = NULL;
|
||||
char *pgtty = NULL;
|
||||
@ -387,7 +387,7 @@ Pg_connect(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
**********************************/
|
||||
|
||||
int
|
||||
Pg_disconnect(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_disconnect(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
Tcl_Channel conn_chan;
|
||||
|
||||
@ -420,7 +420,7 @@ Pg_disconnect(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
**********************************/
|
||||
|
||||
int
|
||||
Pg_exec(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_exec(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
Pg_ConnectionId *connid;
|
||||
PGconn *conn;
|
||||
@ -520,7 +520,7 @@ Pg_exec(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
|
||||
**********************************/
|
||||
int
|
||||
Pg_result(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_result(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
PGresult *result;
|
||||
char *opt;
|
||||
@ -777,7 +777,7 @@ Pg_result_errReturn:
|
||||
**********************/
|
||||
|
||||
int
|
||||
Pg_lo_open(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_lo_open(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
PGconn *conn;
|
||||
int lobjId;
|
||||
@ -847,7 +847,7 @@ Pg_lo_open(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
|
||||
**********************/
|
||||
int
|
||||
Pg_lo_close(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_lo_close(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
PGconn *conn;
|
||||
int fd;
|
||||
@ -880,7 +880,7 @@ Pg_lo_close(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
|
||||
**********************/
|
||||
int
|
||||
Pg_lo_read(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_lo_read(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
PGconn *conn;
|
||||
int fd;
|
||||
@ -931,7 +931,7 @@ Pg_lo_write
|
||||
|
||||
***********************************/
|
||||
int
|
||||
Pg_lo_write(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_lo_write(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
PGconn *conn;
|
||||
char *buf;
|
||||
@ -978,7 +978,7 @@ whence can be either
|
||||
"SEEK_CUR", "SEEK_END", or "SEEK_SET"
|
||||
***********************************/
|
||||
int
|
||||
Pg_lo_lseek(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_lo_lseek(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
PGconn *conn;
|
||||
int fd;
|
||||
@ -1031,7 +1031,7 @@ for now, we don't support any additional storage managers.
|
||||
|
||||
***********************************/
|
||||
int
|
||||
Pg_lo_creat(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_lo_creat(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
PGconn *conn;
|
||||
char *modeStr;
|
||||
@ -1091,7 +1091,7 @@ Pg_lo_tell
|
||||
|
||||
***********************************/
|
||||
int
|
||||
Pg_lo_tell(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_lo_tell(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
PGconn *conn;
|
||||
int fd;
|
||||
@ -1124,7 +1124,7 @@ Pg_lo_unlink
|
||||
|
||||
***********************************/
|
||||
int
|
||||
Pg_lo_unlink(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_lo_unlink(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
PGconn *conn;
|
||||
int lobjId;
|
||||
@ -1166,7 +1166,7 @@ Pg_lo_import
|
||||
***********************************/
|
||||
|
||||
int
|
||||
Pg_lo_import(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_lo_import(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
PGconn *conn;
|
||||
char *filename;
|
||||
@ -1205,7 +1205,7 @@ Pg_lo_export
|
||||
***********************************/
|
||||
|
||||
int
|
||||
Pg_lo_export(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_lo_export(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
PGconn *conn;
|
||||
char *filename;
|
||||
@ -1257,7 +1257,7 @@ Pg_lo_export(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
**********************************/
|
||||
|
||||
int
|
||||
Pg_select(ClientData cData, Tcl_Interp * interp, int argc, char **argv)
|
||||
Pg_select(ClientData cData, Tcl_Interp *interp, int argc, char **argv)
|
||||
{
|
||||
Pg_ConnectionId *connid;
|
||||
PGconn *conn;
|
||||
@ -1375,7 +1375,7 @@ Pg_select(ClientData cData, Tcl_Interp * interp, int argc, char **argv)
|
||||
*/
|
||||
|
||||
static int
|
||||
Pg_have_listener(Pg_ConnectionId * connid, const char *relname)
|
||||
Pg_have_listener(Pg_ConnectionId *connid, const char *relname)
|
||||
{
|
||||
Pg_TclNotifies *notifies;
|
||||
Tcl_HashEntry *entry;
|
||||
@ -1414,7 +1414,7 @@ Pg_listen
|
||||
vwait or update can be used to enter the Tcl event loop.
|
||||
***********************************/
|
||||
int
|
||||
Pg_listen(ClientData cData, Tcl_Interp * interp, int argc, char *argv[])
|
||||
Pg_listen(ClientData cData, Tcl_Interp *interp, int argc, char *argv[])
|
||||
{
|
||||
char *origrelname;
|
||||
char *caserelname;
|
||||
|
||||
@ -5,7 +5,7 @@
|
||||
*
|
||||
* Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* $Id: pgtclCmds.h,v 1.14 1999/05/25 16:15:07 momjian Exp $
|
||||
* $Id: pgtclCmds.h,v 1.15 1999/05/25 22:43:45 momjian Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
@ -38,7 +38,7 @@ typedef struct Pg_TclNotifies_s
|
||||
* got round to deleting the Pg_TclNotifies structure.
|
||||
*/
|
||||
Tcl_HashTable notify_hash; /* Active pg_listen requests */
|
||||
} Pg_TclNotifies;
|
||||
} Pg_TclNotifies;
|
||||
|
||||
typedef struct Pg_ConnectionId_s
|
||||
{
|
||||
@ -55,7 +55,7 @@ typedef struct Pg_ConnectionId_s
|
||||
Pg_TclNotifies *notify_list;/* head of list of notify info */
|
||||
int notifier_running; /* notify event source is live */
|
||||
int notifier_socket;/* PQsocket on which notifier is listening */
|
||||
} Pg_ConnectionId;
|
||||
} Pg_ConnectionId;
|
||||
|
||||
/* Values of res_copyStatus */
|
||||
#define RES_COPY_NONE 0
|
||||
@ -67,38 +67,38 @@ typedef struct Pg_ConnectionId_s
|
||||
/* registered Tcl functions */
|
||||
/* **************************/
|
||||
extern int Pg_conndefaults(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_connect(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_disconnect(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_exec(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_select(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_result(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_lo_open(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_lo_close(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_lo_read(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_lo_write(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_lo_lseek(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_lo_creat(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_lo_tell(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_lo_unlink(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_lo_import(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_lo_export(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
extern int Pg_listen(
|
||||
ClientData cData, Tcl_Interp * interp, int argc, char *argv[]);
|
||||
ClientData cData, Tcl_Interp *interp, int argc, char *argv[]);
|
||||
|
||||
#endif /* PGTCLCMDS_H */
|
||||
|
||||
@ -12,7 +12,7 @@
|
||||
* Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtclId.c,v 1.19 1999/05/25 16:15:07 momjian Exp $
|
||||
* $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtclId.c,v 1.20 1999/05/25 22:43:46 momjian Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
@ -27,7 +27,7 @@
|
||||
|
||||
|
||||
static int
|
||||
PgEndCopy(Pg_ConnectionId * connid, int *errorCodePtr)
|
||||
PgEndCopy(Pg_ConnectionId *connid, int *errorCodePtr)
|
||||
{
|
||||
connid->res_copyStatus = RES_COPY_NONE;
|
||||
if (PQendcopy(connid->conn))
|
||||
@ -156,7 +156,7 @@ Tcl_ChannelType Pg_ConnType = {
|
||||
* Create and register a new channel for the connection
|
||||
*/
|
||||
void
|
||||
PgSetConnectionId(Tcl_Interp * interp, PGconn *conn)
|
||||
PgSetConnectionId(Tcl_Interp *interp, PGconn *conn)
|
||||
{
|
||||
Tcl_Channel conn_chan;
|
||||
Pg_ConnectionId *connid;
|
||||
@ -198,7 +198,7 @@ PgSetConnectionId(Tcl_Interp * interp, PGconn *conn)
|
||||
* Get back the connection from the Id
|
||||
*/
|
||||
PGconn *
|
||||
PgGetConnectionId(Tcl_Interp * interp, char *id, Pg_ConnectionId ** connid_p)
|
||||
PgGetConnectionId(Tcl_Interp *interp, char *id, Pg_ConnectionId **connid_p)
|
||||
{
|
||||
Tcl_Channel conn_chan;
|
||||
Pg_ConnectionId *connid;
|
||||
@ -283,7 +283,7 @@ PgDelConnectionId(DRIVER_DEL_PROTO)
|
||||
* is probably just not clearing result handles like they should.
|
||||
*/
|
||||
int
|
||||
PgSetResultId(Tcl_Interp * interp, char *connid_c, PGresult *res)
|
||||
PgSetResultId(Tcl_Interp *interp, char *connid_c, PGresult *res)
|
||||
{
|
||||
Tcl_Channel conn_chan;
|
||||
Pg_ConnectionId *connid;
|
||||
@ -334,7 +334,7 @@ PgSetResultId(Tcl_Interp * interp, char *connid_c, PGresult *res)
|
||||
}
|
||||
|
||||
static int
|
||||
getresid(Tcl_Interp * interp, char *id, Pg_ConnectionId ** connid_p)
|
||||
getresid(Tcl_Interp *interp, char *id, Pg_ConnectionId **connid_p)
|
||||
{
|
||||
Tcl_Channel conn_chan;
|
||||
char *mark;
|
||||
@ -376,7 +376,7 @@ getresid(Tcl_Interp * interp, char *id, Pg_ConnectionId ** connid_p)
|
||||
* Get back the result pointer from the Id
|
||||
*/
|
||||
PGresult *
|
||||
PgGetResultId(Tcl_Interp * interp, char *id)
|
||||
PgGetResultId(Tcl_Interp *interp, char *id)
|
||||
{
|
||||
Pg_ConnectionId *connid;
|
||||
int resid;
|
||||
@ -394,7 +394,7 @@ PgGetResultId(Tcl_Interp * interp, char *id)
|
||||
* Remove a result Id from the hash tables
|
||||
*/
|
||||
void
|
||||
PgDelResultId(Tcl_Interp * interp, char *id)
|
||||
PgDelResultId(Tcl_Interp *interp, char *id)
|
||||
{
|
||||
Pg_ConnectionId *connid;
|
||||
int resid;
|
||||
@ -410,7 +410,7 @@ PgDelResultId(Tcl_Interp * interp, char *id)
|
||||
* Get the connection Id from the result Id
|
||||
*/
|
||||
int
|
||||
PgGetConnByResultId(Tcl_Interp * interp, char *resid_c)
|
||||
PgGetConnByResultId(Tcl_Interp *interp, char *resid_c)
|
||||
{
|
||||
char *mark;
|
||||
Tcl_Channel conn_chan;
|
||||
@ -478,12 +478,12 @@ typedef struct
|
||||
Tcl_Event header; /* Standard Tcl event info */
|
||||
PGnotify info; /* Notify name from SQL server */
|
||||
Pg_ConnectionId *connid; /* Connection for server */
|
||||
} NotifyEvent;
|
||||
} NotifyEvent;
|
||||
|
||||
/* Dispatch a NotifyEvent that has reached the front of the event queue */
|
||||
|
||||
static int
|
||||
Pg_Notify_EventProc(Tcl_Event * evPtr, int flags)
|
||||
Pg_Notify_EventProc(Tcl_Event *evPtr, int flags)
|
||||
{
|
||||
NotifyEvent *event = (NotifyEvent *) evPtr;
|
||||
Pg_TclNotifies *notifies;
|
||||
@ -570,7 +570,7 @@ Pg_Notify_EventProc(Tcl_Event * evPtr, int flags)
|
||||
*/
|
||||
|
||||
void
|
||||
PgNotifyTransferEvents(Pg_ConnectionId * connid)
|
||||
PgNotifyTransferEvents(Pg_ConnectionId *connid)
|
||||
{
|
||||
PGnotify *notify;
|
||||
|
||||
@ -605,7 +605,7 @@ PgNotifyTransferEvents(Pg_ConnectionId * connid)
|
||||
*/
|
||||
|
||||
void
|
||||
PgNotifyInterpDelete(ClientData clientData, Tcl_Interp * interp)
|
||||
PgNotifyInterpDelete(ClientData clientData, Tcl_Interp *interp)
|
||||
{
|
||||
/* Mark the interpreter dead, but don't do anything else yet */
|
||||
Pg_TclNotifies *notifies = (Pg_TclNotifies *) clientData;
|
||||
@ -626,7 +626,7 @@ PgNotifyInterpDelete(ClientData clientData, Tcl_Interp * interp)
|
||||
* events are executed.
|
||||
*/
|
||||
static int
|
||||
NotifyEventDeleteProc(Tcl_Event * evPtr, ClientData clientData)
|
||||
NotifyEventDeleteProc(Tcl_Event *evPtr, ClientData clientData)
|
||||
{
|
||||
Pg_ConnectionId *connid = (Pg_ConnectionId *) clientData;
|
||||
|
||||
@ -679,7 +679,7 @@ Pg_Notify_FileHandler(ClientData clientData, int mask)
|
||||
*/
|
||||
|
||||
void
|
||||
PgStartNotifyEventSource(Pg_ConnectionId * connid)
|
||||
PgStartNotifyEventSource(Pg_ConnectionId *connid)
|
||||
{
|
||||
/* Start the notify event source if it isn't already running */
|
||||
if (!connid->notifier_running)
|
||||
@ -706,7 +706,7 @@ PgStartNotifyEventSource(Pg_ConnectionId * connid)
|
||||
}
|
||||
|
||||
void
|
||||
PgStopNotifyEventSource(Pg_ConnectionId * connid)
|
||||
PgStopNotifyEventSource(Pg_ConnectionId *connid)
|
||||
{
|
||||
/* Remove the event source */
|
||||
if (connid->notifier_running)
|
||||
|
||||
@ -9,12 +9,12 @@
|
||||
*
|
||||
* Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* $Id: pgtclId.h,v 1.11 1999/05/25 16:15:08 momjian Exp $
|
||||
* $Id: pgtclId.h,v 1.12 1999/05/25 22:43:47 momjian Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
extern void PgSetConnectionId(Tcl_Interp * interp, PGconn *conn);
|
||||
extern void PgSetConnectionId(Tcl_Interp *interp, PGconn *conn);
|
||||
|
||||
#if TCL_MAJOR_VERSION == 7 && TCL_MINOR_VERSION == 5
|
||||
/* Only Tcl 7.5 had drivers with this signature */
|
||||
@ -33,19 +33,19 @@ extern void PgSetConnectionId(Tcl_Interp * interp, PGconn *conn);
|
||||
#define DRIVER_DEL_PROTO ClientData cData, Tcl_Interp *interp
|
||||
#endif
|
||||
|
||||
extern PGconn *PgGetConnectionId(Tcl_Interp * interp, char *id,
|
||||
extern PGconn *PgGetConnectionId(Tcl_Interp *interp, char *id,
|
||||
Pg_ConnectionId **);
|
||||
extern PgDelConnectionId(DRIVER_DEL_PROTO);
|
||||
extern int PgOutputProc(DRIVER_OUTPUT_PROTO);
|
||||
extern PgInputProc(DRIVER_INPUT_PROTO);
|
||||
extern int PgSetResultId(Tcl_Interp * interp, char *connid, PGresult *res);
|
||||
extern PGresult *PgGetResultId(Tcl_Interp * interp, char *id);
|
||||
extern void PgDelResultId(Tcl_Interp * interp, char *id);
|
||||
extern int PgGetConnByResultId(Tcl_Interp * interp, char *resid);
|
||||
extern void PgStartNotifyEventSource(Pg_ConnectionId * connid);
|
||||
extern void PgStopNotifyEventSource(Pg_ConnectionId * connid);
|
||||
extern void PgNotifyTransferEvents(Pg_ConnectionId * connid);
|
||||
extern void PgNotifyInterpDelete(ClientData clientData, Tcl_Interp * interp);
|
||||
extern int PgSetResultId(Tcl_Interp *interp, char *connid, PGresult *res);
|
||||
extern PGresult *PgGetResultId(Tcl_Interp *interp, char *id);
|
||||
extern void PgDelResultId(Tcl_Interp *interp, char *id);
|
||||
extern int PgGetConnByResultId(Tcl_Interp *interp, char *resid);
|
||||
extern void PgStartNotifyEventSource(Pg_ConnectionId *connid);
|
||||
extern void PgStopNotifyEventSource(Pg_ConnectionId *connid);
|
||||
extern void PgNotifyTransferEvents(Pg_ConnectionId *connid);
|
||||
extern void PgNotifyInterpDelete(ClientData clientData, Tcl_Interp *interp);
|
||||
|
||||
/* GetFileProc is needed in Tcl 7.6 *only* ... it went away again in 8.0 */
|
||||
#if TCL_MAJOR_VERSION == 7 && TCL_MINOR_VERSION >= 6
|
||||
|
||||
Reference in New Issue
Block a user