Mercurial > hg > xemacs-beta
comparison modules/postgresql/postgresql.c @ 5117:3742ea8250b5 ben-lisp-object ben-lisp-object-final-ws-year-2005
Checking in final CVS version of workspace 'ben-lisp-object'
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Sat, 26 Dec 2009 00:20:27 -0600 |
parents | b7f26b2f78bd |
children | e0db3c197671 |
comparison
equal
deleted
inserted
replaced
5116:e56f73345619 | 5117:3742ea8250b5 |
---|---|
264 } | 264 } |
265 } | 265 } |
266 | 266 |
267 #ifdef RUNNING_XEMACS_21_1 | 267 #ifdef RUNNING_XEMACS_21_1 |
268 DEFINE_LRECORD_IMPLEMENTATION ("pgconn", pgconn, | 268 DEFINE_LRECORD_IMPLEMENTATION ("pgconn", pgconn, |
269 mark_pgconn, print_pgconn, finalize_pgconn, | 269 2mark_pgconn, print_pgconn, finalize_pgconn, |
270 NULL, NULL, | 270 NULL, NULL, |
271 Lisp_PGconn); | 271 Lisp_PGconn); |
272 #else | 272 #elif defined (RUNNING_XEMACS_21_4) |
273 DEFINE_LRECORD_IMPLEMENTATION ("pgconn", pgconn, | 273 DEFINE_LRECORD_IMPLEMENTATION ("pgconn", pgconn, |
274 0, /*dumpable-flag*/ | 274 0, /*dumpable-flag*/ |
275 mark_pgconn, print_pgconn, finalize_pgconn, | 275 mark_pgconn, print_pgconn, finalize_pgconn, |
276 NULL, NULL, | 276 NULL, NULL, |
277 pgconn_description, | 277 pgconn_description, |
278 Lisp_PGconn); | 278 Lisp_PGconn); |
279 #else | |
280 DEFINE_NONDUMPABLE_LRECORD_IMPLEMENTATION ("pgconn", pgconn, | |
281 mark_pgconn, print_pgconn, | |
282 finalize_pgconn, | |
283 NULL, NULL, | |
284 pgconn_description, | |
285 Lisp_PGconn); | |
279 #endif | 286 #endif |
280 /****/ | 287 /****/ |
281 | 288 |
282 /* PGresult is an opaque object and we need to be able to store them in | 289 /* PGresult is an opaque object and we need to be able to store them in |
283 Lisp code. | 290 Lisp code. |