Mercurial > hg > xemacs-beta
annotate modules/postgresql/postgresql.h @ 5879:77d7b77909c2
Move extents.c to working in byte positions only; fix a bug, extent_detach()
src/ChangeLog addition:
2015-03-27 Aidan Kehoe <kehoea@parhasard.net>
Fix a small bug, extent_detach(); minimise needless char-byte
conversion, extents.c, sticking to byte positions in general in
this file.
* extents.c:
* extents.c (signal_single_extent_changed):
Pass byte endpoints to
gutter_extent_signal_changed_region_maybe(),
buffer_extent_signal_changed_region().
* extents.c (extent_detach):
Call signal_extent_changed() correctly, pass both extent endpoints
rather than just the byte and character variants of the start.
* extents.c (struct report_extent_modification_closure):
Do this in terms of byte positions.
* extents.c (report_extent_modification_mapper):
Use byte positions, only converting to characters when we are
definitely calling Lisp.
* extents.c (report_extent_modification):
Use byte positions in this API, move the byte-char conversion to
our callers, simplifying extents.c (it all now works in byte
positions).
* extents.h:
Update report_extent_modification's prototype.
* gutter.c (gutter_extent_signal_changed_region_maybe):
Use byte positions here, avoids needless byte-char conversion.
* gutter.h:
Update the prototype here.
* insdel.c:
* insdel.c (buffer_extent_signal_changed_region):
Implement this in terms of byte positions.
* insdel.c (signal_before_change):
* insdel.c (signal_after_change):
Call report_extent_modification() with byte positions, doing the
char->byte conversion here rather than leaving it to extents.c.
* insdel.h:
* insdel.h (struct each_buffer_change_data):
The extent unchanged info now describes bytecounts.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Fri, 27 Mar 2015 23:39:49 +0000 |
| parents | 8bda66cd0414 |
| children |
| rev | line source |
|---|---|
| 996 | 1 /* |
| 2 postgresql.h -- Emacs Lisp binding to libpq.so | |
| 3 Copyright (C) 2000 Electrotechnical Laboratory, JAPAN. | |
| 4 Licensed to the Free Software Foundation. | |
| 5 | |
| 3820 | 6 Author: SL Baur <steve@xemacs.org> |
| 7 Maintainer: SL Baur <steve@xemacs.org> | |
| 996 | 8 |
|
5425
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
9 This file is part of XEmacs. |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
10 |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
11 XEmacs is free software: you can redistribute it and/or modify it |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
12 under the terms of the GNU General Public License as published by the |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
13 Free Software Foundation, either version 3 of the License, or (at your |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
14 option) any later version. |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
15 |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
16 XEmacs is distributed in the hope that it will be useful, but WITHOUT |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
17 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
18 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
19 for more details. |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
20 |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
21 You should have received a copy of the GNU General Public License |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
22 along with XEmacs. If not, see <http://www.gnu.org/licenses/>. |
|
8bda66cd0414
Convert misc remaining files with GPLv2 or later to GPLv3 or later
Mats Lidell <matsl@xemacs.org>
parents:
5127
diff
changeset
|
23 |
| 996 | 24 Please send patches to this file to me first before submitting them to |
| 25 xemacs-patches. | |
| 26 */ | |
| 27 | |
| 28 #ifndef INCLUDED_postgresql_h_ | |
| 29 #define INCLUDED_postgresql_h_ 1 | |
| 30 | |
| 31 #define message message_ /* Yuck */ | |
| 32 #include LIBPQ_FE_H_FILE /* main PostgreSQL header file */ | |
| 33 #undef message | |
| 34 | |
| 35 #define BLCKSZ 8192 /* size of a default Postgres disk block */ | |
| 36 /* | |
| 37 This file contains the GCC bug workaround code for the private | |
| 38 LRECORD types. | |
| 39 */ | |
| 40 | |
| 41 /* PGconn is an opaque object and we need to be able to store them in | |
| 42 Lisp code because libpq supports multiple connections. | |
| 43 */ | |
| 44 struct Lisp_PGconn | |
| 45 { | |
|
5127
a9c41067dd88
more cleanups, terminology clarification, lots of doc work
Ben Wing <ben@xemacs.org>
parents:
5120
diff
changeset
|
46 NORMAL_LISP_OBJECT_HEADER header; |
| 996 | 47 PGconn *pgconn; |
| 48 }; | |
| 49 typedef struct Lisp_PGconn Lisp_PGconn; | |
| 50 | |
|
5118
e0db3c197671
merge up to latest default branch, doesn't compile yet
Ben Wing <ben@xemacs.org>
parents:
3820
diff
changeset
|
51 DECLARE_LISP_OBJECT (pgconn, Lisp_PGconn); |
| 996 | 52 |
| 53 #define XPGCONN(x) XRECORD (x, pgconn, Lisp_PGconn) | |
| 54 #define wrap_pgconn(p) wrap_record (p, pgconn) | |
| 55 #define PGCONNP(x) RECORDP (x, pgconn) | |
| 56 #define CHECK_PGCONN(x) CHECK_RECORD (x, pgconn) | |
| 57 #define CONCHECK_PGCONN(x) CONCHECK_RECORD (x, pgconn) | |
| 58 | |
| 59 /****/ | |
| 60 | |
| 61 /* PGresult is an opaque object and we need to be able to store them in | |
| 62 Lisp code. | |
| 63 */ | |
| 64 struct Lisp_PGresult | |
| 65 { | |
|
5127
a9c41067dd88
more cleanups, terminology clarification, lots of doc work
Ben Wing <ben@xemacs.org>
parents:
5120
diff
changeset
|
66 NORMAL_LISP_OBJECT_HEADER header; |
| 996 | 67 PGresult *pgresult; |
| 68 }; | |
| 69 typedef struct Lisp_PGresult Lisp_PGresult; | |
| 70 | |
|
5118
e0db3c197671
merge up to latest default branch, doesn't compile yet
Ben Wing <ben@xemacs.org>
parents:
3820
diff
changeset
|
71 DECLARE_LISP_OBJECT (pgresult, Lisp_PGresult); |
| 996 | 72 |
| 73 #define XPGRESULT(x) XRECORD (x, pgresult, Lisp_PGresult) | |
| 74 #define wrap_pgresult(p) wrap_record (p, pgresult) | |
| 75 #define PGRESULTP(x) RECORDP (x, pgresult) | |
| 76 #define CHECK_PGRESULT(x) CHECK_RECORD (x, pgresult) | |
| 77 #define CONCHECK_PGRESULT(x) CONCHECK_RECORD (x, pgresult) | |
| 78 | |
| 79 #endif /* INCLUDED_postgresql_h_ */ |