Mercurial > emacs
annotate src/indent.h @ 23164:ecc4641bf00a
(Vnext_selection_coding_system): New variable.
(syms_of_win16select): DEFVAR_LISP it. No need to staticpro
Vselection_coding_system.
(Fw16_set_clipboard_data): Always convert multibyte strings. Use
Vnext_selection_coding_system if non-nil.
(Fw16_get_clipboard_data): Always convert a string that includes
non-ASCII characters. Use Vnext_selection_coding_system if
non-nil.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Tue, 01 Sep 1998 13:26:41 +0000 |
| parents | 64b4e34d34c2 |
| children | 488e6b8dc9ae |
| rev | line source |
|---|---|
| 484 | 1 /* Definitions for interface to indent.c |
| 2 Copyright (C) 1985, 1986 Free Software Foundation, Inc. | |
| 3 | |
| 4 This file is part of GNU Emacs. | |
| 5 | |
| 6 GNU Emacs is free software; you can redistribute it and/or modify | |
| 7 it under the terms of the GNU General Public License as published by | |
| 12244 | 8 the Free Software Foundation; either version 2, or (at your option) |
| 484 | 9 any later version. |
| 10 | |
| 11 GNU Emacs is distributed in the hope that it will be useful, | |
| 12 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 14 GNU General Public License for more details. | |
| 15 | |
| 16 You should have received a copy of the GNU General Public License | |
| 17 along with GNU Emacs; see the file COPYING. If not, write to | |
|
14186
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
12244
diff
changeset
|
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
|
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
12244
diff
changeset
|
19 Boston, MA 02111-1307, USA. */ |
| 484 | 20 |
|
17018
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
21 /* We introduce new member `tab_offset'. We need it because of the |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
22 existence of wide-column characters. There is a case that the |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
23 line-break occurs at a wide-column character and the number of |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
24 colums of the line gets less than width. |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
25 |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
26 Example (where W_ stands for a wide-column character): |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
27 ---------- |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
28 abcdefgh\\ |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
29 W_ |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
30 ---------- |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
31 |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
32 To handle this case, we should not calculate the tab offset by |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
33 tab_offset += width; |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
34 |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
35 Instead, we must remember tab_offset of the line. |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
36 |
|
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
37 */ |
| 484 | 38 |
| 39 struct position | |
| 40 { | |
| 41 int bufpos; | |
|
20540
64b4e34d34c2
(struct position): New field bytepos.
Richard M. Stallman <rms@gnu.org>
parents:
17018
diff
changeset
|
42 int bytepos; |
| 484 | 43 int hpos; |
| 44 int vpos; | |
| 45 int prevhpos; | |
| 46 int contin; | |
|
16403
a388d0109b9e
(struct position): New field ovstring_chars_done.
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
47 /* Number of characters we have already handled |
|
a388d0109b9e
(struct position): New field ovstring_chars_done.
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
48 from the before and after strings at this position. */ |
|
a388d0109b9e
(struct position): New field ovstring_chars_done.
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
49 int ovstring_chars_done; |
|
17018
f13a67b3ec8d
(struct position): New member tab_offset to accumulate tab offset.
Karl Heuer <kwzh@gnu.org>
parents:
16403
diff
changeset
|
50 int tab_offset; |
| 484 | 51 }; |
| 52 | |
| 53 struct position *compute_motion (); | |
| 54 struct position *vmotion (); | |
| 55 | |
| 56 /* Value of point when current_column was called */ | |
| 57 extern int last_known_column_point; | |
|
9408
99429d6c8b4e
* indent.h (disptab_matches_widthtab, recompute_width_table): New
Jim Blandy <jimb@redhat.com>
parents:
484
diff
changeset
|
58 |
|
99429d6c8b4e
* indent.h (disptab_matches_widthtab, recompute_width_table): New
Jim Blandy <jimb@redhat.com>
parents:
484
diff
changeset
|
59 /* Functions for dealing with the column cache. */ |
|
99429d6c8b4e
* indent.h (disptab_matches_widthtab, recompute_width_table): New
Jim Blandy <jimb@redhat.com>
parents:
484
diff
changeset
|
60 |
|
99429d6c8b4e
* indent.h (disptab_matches_widthtab, recompute_width_table): New
Jim Blandy <jimb@redhat.com>
parents:
484
diff
changeset
|
61 /* Return true iff the display table DISPTAB specifies the same widths |
|
99429d6c8b4e
* indent.h (disptab_matches_widthtab, recompute_width_table): New
Jim Blandy <jimb@redhat.com>
parents:
484
diff
changeset
|
62 for characters as WIDTHTAB. We use this to decide when to |
|
99429d6c8b4e
* indent.h (disptab_matches_widthtab, recompute_width_table): New
Jim Blandy <jimb@redhat.com>
parents:
484
diff
changeset
|
63 invalidate the buffer's column_cache. */ |
|
99429d6c8b4e
* indent.h (disptab_matches_widthtab, recompute_width_table): New
Jim Blandy <jimb@redhat.com>
parents:
484
diff
changeset
|
64 extern int disptab_matches_widthtab ( /* struct Lisp_Vector *disptab, |
|
99429d6c8b4e
* indent.h (disptab_matches_widthtab, recompute_width_table): New
Jim Blandy <jimb@redhat.com>
parents:
484
diff
changeset
|
65 struct Lisp_Vector *widthtab */ ); |
|
99429d6c8b4e
* indent.h (disptab_matches_widthtab, recompute_width_table): New
Jim Blandy <jimb@redhat.com>
parents:
484
diff
changeset
|
66 |
|
99429d6c8b4e
* indent.h (disptab_matches_widthtab, recompute_width_table): New
Jim Blandy <jimb@redhat.com>
parents:
484
diff
changeset
|
67 /* Recompute BUF's width table, using the display table DISPTAB. */ |
|
99429d6c8b4e
* indent.h (disptab_matches_widthtab, recompute_width_table): New
Jim Blandy <jimb@redhat.com>
parents:
484
diff
changeset
|
68 extern void recompute_width_table ( /* struct buffer *buf, |
|
99429d6c8b4e
* indent.h (disptab_matches_widthtab, recompute_width_table): New
Jim Blandy <jimb@redhat.com>
parents:
484
diff
changeset
|
69 struct Lisp_Vector *disptab */ ); |
