Mercurial > hg > xemacs-beta
comparison modules/postgresql/postgresql.h @ 5178:97eb4942aec8
merge
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Mon, 29 Mar 2010 21:28:13 -0500 |
parents | a9c41067dd88 |
children | 8bda66cd0414 |
comparison
equal
deleted
inserted
replaced
5177:b785049378e3 | 5178:97eb4942aec8 |
---|---|
26 /* PGconn is an opaque object and we need to be able to store them in | 26 /* PGconn is an opaque object and we need to be able to store them in |
27 Lisp code because libpq supports multiple connections. | 27 Lisp code because libpq supports multiple connections. |
28 */ | 28 */ |
29 struct Lisp_PGconn | 29 struct Lisp_PGconn |
30 { | 30 { |
31 struct LCRECORD_HEADER header; | 31 NORMAL_LISP_OBJECT_HEADER header; |
32 PGconn *pgconn; | 32 PGconn *pgconn; |
33 }; | 33 }; |
34 typedef struct Lisp_PGconn Lisp_PGconn; | 34 typedef struct Lisp_PGconn Lisp_PGconn; |
35 | 35 |
36 DECLARE_LRECORD (pgconn, Lisp_PGconn); | 36 DECLARE_LISP_OBJECT (pgconn, Lisp_PGconn); |
37 | 37 |
38 #define XPGCONN(x) XRECORD (x, pgconn, Lisp_PGconn) | 38 #define XPGCONN(x) XRECORD (x, pgconn, Lisp_PGconn) |
39 #define wrap_pgconn(p) wrap_record (p, pgconn) | 39 #define wrap_pgconn(p) wrap_record (p, pgconn) |
40 #define PGCONNP(x) RECORDP (x, pgconn) | 40 #define PGCONNP(x) RECORDP (x, pgconn) |
41 #define CHECK_PGCONN(x) CHECK_RECORD (x, pgconn) | 41 #define CHECK_PGCONN(x) CHECK_RECORD (x, pgconn) |
46 /* PGresult is an opaque object and we need to be able to store them in | 46 /* PGresult is an opaque object and we need to be able to store them in |
47 Lisp code. | 47 Lisp code. |
48 */ | 48 */ |
49 struct Lisp_PGresult | 49 struct Lisp_PGresult |
50 { | 50 { |
51 struct LCRECORD_HEADER header; | 51 NORMAL_LISP_OBJECT_HEADER header; |
52 PGresult *pgresult; | 52 PGresult *pgresult; |
53 }; | 53 }; |
54 typedef struct Lisp_PGresult Lisp_PGresult; | 54 typedef struct Lisp_PGresult Lisp_PGresult; |
55 | 55 |
56 DECLARE_LRECORD (pgresult, Lisp_PGresult); | 56 DECLARE_LISP_OBJECT (pgresult, Lisp_PGresult); |
57 | 57 |
58 #define XPGRESULT(x) XRECORD (x, pgresult, Lisp_PGresult) | 58 #define XPGRESULT(x) XRECORD (x, pgresult, Lisp_PGresult) |
59 #define wrap_pgresult(p) wrap_record (p, pgresult) | 59 #define wrap_pgresult(p) wrap_record (p, pgresult) |
60 #define PGRESULTP(x) RECORDP (x, pgresult) | 60 #define PGRESULTP(x) RECORDP (x, pgresult) |
61 #define CHECK_PGRESULT(x) CHECK_RECORD (x, pgresult) | 61 #define CHECK_PGRESULT(x) CHECK_RECORD (x, pgresult) |