diff options
| author | Matt Armstrong | 2022-10-19 15:56:07 -0700 |
|---|---|---|
| committer | Stefan Monnier | 2022-10-19 21:35:09 -0400 |
| commit | f421b58db5d34f45773a73c699b4b1a5a5b9da03 (patch) | |
| tree | 3bddc5b3bb76bb6054e30fbae30765d8211a37f8 /src/buffer.c | |
| parent | 06252617b2c4cc9bcdd9407f1e709a7e0908cf27 (diff) | |
| download | emacs-f421b58db5d34f45773a73c699b4b1a5a5b9da03.tar.gz emacs-f421b58db5d34f45773a73c699b4b1a5a5b9da03.zip | |
Prefix all itree.h type names with itree_
Rename interval_node -> itree_node, interval_tree -> itree_tree,
interval_tree_order -> itree_order.
* src/alloc.c: Renames.
* src/buffer.c: ditto.
* src/itree.c: ditto.
* src/itree.h: ditto.
* src/lisp.h: ditto.
* src/pdumper.h: ditto.
* src/textprop.h: ditto.
* src/xdisp.h: ditto.
Diffstat (limited to 'src/buffer.c')
| -rw-r--r-- | src/buffer.c | 40 |
1 files changed, 20 insertions, 20 deletions
diff --git a/src/buffer.c b/src/buffer.c index 74c6705cbd3..228c6e60560 100644 --- a/src/buffer.c +++ b/src/buffer.c | |||
| @@ -655,7 +655,7 @@ static void | |||
| 655 | copy_overlays (struct buffer *from, struct buffer *to) | 655 | copy_overlays (struct buffer *from, struct buffer *to) |
| 656 | { | 656 | { |
| 657 | eassert (to && ! to->overlays); | 657 | eassert (to && ! to->overlays); |
| 658 | struct interval_node *node; | 658 | struct itree_node *node; |
| 659 | 659 | ||
| 660 | ITREE_FOREACH (node, from->overlays, PTRDIFF_MIN, PTRDIFF_MAX, ASCENDING) | 660 | ITREE_FOREACH (node, from->overlays, PTRDIFF_MIN, PTRDIFF_MAX, ASCENDING) |
| 661 | { | 661 | { |
| @@ -932,13 +932,13 @@ drop_overlay (struct Lisp_Overlay *ov) | |||
| 932 | void | 932 | void |
| 933 | delete_all_overlays (struct buffer *b) | 933 | delete_all_overlays (struct buffer *b) |
| 934 | { | 934 | { |
| 935 | struct interval_node *node; | 935 | struct itree_node *node; |
| 936 | 936 | ||
| 937 | if (! b->overlays) | 937 | if (! b->overlays) |
| 938 | return; | 938 | return; |
| 939 | 939 | ||
| 940 | /* FIXME: This loop sets the overlays' `buffer` field to NULL but | 940 | /* FIXME: This loop sets the overlays' `buffer` field to NULL but |
| 941 | doesn't set the interval_nodes' `parent`, `left` and `right` | 941 | doesn't set the itree_nodes' `parent`, `left` and `right` |
| 942 | fields accordingly. I believe it's harmless, but a bit untidy since | 942 | fields accordingly. I believe it's harmless, but a bit untidy since |
| 943 | other parts of the code are careful to set those fields to NULL when | 943 | other parts of the code are careful to set those fields to NULL when |
| 944 | the overlay is deleted. | 944 | the overlay is deleted. |
| @@ -978,8 +978,8 @@ set_overlays_multibyte (bool multibyte) | |||
| 978 | if (! current_buffer->overlays || Z == Z_BYTE) | 978 | if (! current_buffer->overlays || Z == Z_BYTE) |
| 979 | return; | 979 | return; |
| 980 | 980 | ||
| 981 | struct interval_node **nodes = NULL; | 981 | struct itree_node **nodes = NULL; |
| 982 | struct interval_tree *tree = current_buffer->overlays; | 982 | struct itree_tree *tree = current_buffer->overlays; |
| 983 | const intmax_t size = interval_tree_size (tree); | 983 | const intmax_t size = interval_tree_size (tree); |
| 984 | 984 | ||
| 985 | /* We can't use `interval_node_set_region` at the same time | 985 | /* We can't use `interval_node_set_region` at the same time |
| @@ -988,14 +988,14 @@ set_overlays_multibyte (bool multibyte) | |||
| 988 | USE_SAFE_ALLOCA; | 988 | USE_SAFE_ALLOCA; |
| 989 | SAFE_NALLOCA (nodes, 1, size); | 989 | SAFE_NALLOCA (nodes, 1, size); |
| 990 | { | 990 | { |
| 991 | struct interval_node *node, **cursor = nodes; | 991 | struct itree_node *node, **cursor = nodes; |
| 992 | ITREE_FOREACH (node, tree, PTRDIFF_MIN, PTRDIFF_MAX, ASCENDING) | 992 | ITREE_FOREACH (node, tree, PTRDIFF_MIN, PTRDIFF_MAX, ASCENDING) |
| 993 | *(cursor++) = node; | 993 | *(cursor++) = node; |
| 994 | } | 994 | } |
| 995 | 995 | ||
| 996 | for (int i = 0; i < size; ++i, ++nodes) | 996 | for (int i = 0; i < size; ++i, ++nodes) |
| 997 | { | 997 | { |
| 998 | struct interval_node * const node = *nodes; | 998 | struct itree_node * const node = *nodes; |
| 999 | 999 | ||
| 1000 | if (multibyte) | 1000 | if (multibyte) |
| 1001 | { | 1001 | { |
| @@ -2436,7 +2436,7 @@ advance_to_char_boundary (ptrdiff_t byte_pos) | |||
| 2436 | static void | 2436 | static void |
| 2437 | swap_buffer_overlays (struct buffer *buffer, struct buffer *other) | 2437 | swap_buffer_overlays (struct buffer *buffer, struct buffer *other) |
| 2438 | { | 2438 | { |
| 2439 | struct interval_node *node; | 2439 | struct itree_node *node; |
| 2440 | 2440 | ||
| 2441 | ITREE_FOREACH (node, buffer->overlays, PTRDIFF_MIN, PTRDIFF_MAX, ASCENDING) | 2441 | ITREE_FOREACH (node, buffer->overlays, PTRDIFF_MIN, PTRDIFF_MAX, ASCENDING) |
| 2442 | XOVERLAY (node->data)->buffer = other; | 2442 | XOVERLAY (node->data)->buffer = other; |
| @@ -2965,7 +2965,7 @@ overlays_in (ptrdiff_t beg, ptrdiff_t end, bool extend, | |||
| 2965 | ptrdiff_t len = *len_ptr; | 2965 | ptrdiff_t len = *len_ptr; |
| 2966 | ptrdiff_t next = ZV; | 2966 | ptrdiff_t next = ZV; |
| 2967 | Lisp_Object *vec = *vec_ptr; | 2967 | Lisp_Object *vec = *vec_ptr; |
| 2968 | struct interval_node *node; | 2968 | struct itree_node *node; |
| 2969 | 2969 | ||
| 2970 | ITREE_FOREACH (node, current_buffer->overlays, beg, | 2970 | ITREE_FOREACH (node, current_buffer->overlays, beg, |
| 2971 | /* Find empty OV at Z ? */ | 2971 | /* Find empty OV at Z ? */ |
| @@ -3026,7 +3026,7 @@ ptrdiff_t | |||
| 3026 | next_overlay_change (ptrdiff_t pos) | 3026 | next_overlay_change (ptrdiff_t pos) |
| 3027 | { | 3027 | { |
| 3028 | ptrdiff_t next = ZV; | 3028 | ptrdiff_t next = ZV; |
| 3029 | struct interval_node *node; | 3029 | struct itree_node *node; |
| 3030 | 3030 | ||
| 3031 | ITREE_FOREACH (node, current_buffer->overlays, pos, next, ASCENDING) | 3031 | ITREE_FOREACH (node, current_buffer->overlays, pos, next, ASCENDING) |
| 3032 | { | 3032 | { |
| @@ -3052,7 +3052,7 @@ next_overlay_change (ptrdiff_t pos) | |||
| 3052 | ptrdiff_t | 3052 | ptrdiff_t |
| 3053 | previous_overlay_change (ptrdiff_t pos) | 3053 | previous_overlay_change (ptrdiff_t pos) |
| 3054 | { | 3054 | { |
| 3055 | struct interval_node *node; | 3055 | struct itree_node *node; |
| 3056 | ptrdiff_t prev = BEGV; | 3056 | ptrdiff_t prev = BEGV; |
| 3057 | 3057 | ||
| 3058 | ITREE_FOREACH (node, current_buffer->overlays, prev, pos, DESCENDING) | 3058 | ITREE_FOREACH (node, current_buffer->overlays, prev, pos, DESCENDING) |
| @@ -3135,7 +3135,7 @@ disable_line_numbers_overlay_at_eob (void) | |||
| 3135 | bool | 3135 | bool |
| 3136 | overlay_touches_p (ptrdiff_t pos) | 3136 | overlay_touches_p (ptrdiff_t pos) |
| 3137 | { | 3137 | { |
| 3138 | struct interval_node *node; | 3138 | struct itree_node *node; |
| 3139 | 3139 | ||
| 3140 | /* We need to find overlays ending in pos, as well as empty ones at | 3140 | /* We need to find overlays ending in pos, as well as empty ones at |
| 3141 | pos. */ | 3141 | pos. */ |
| @@ -3347,7 +3347,7 @@ ptrdiff_t | |||
| 3347 | overlay_strings (ptrdiff_t pos, struct window *w, unsigned char **pstr) | 3347 | overlay_strings (ptrdiff_t pos, struct window *w, unsigned char **pstr) |
| 3348 | { | 3348 | { |
| 3349 | bool multibyte = ! NILP (BVAR (current_buffer, enable_multibyte_characters)); | 3349 | bool multibyte = ! NILP (BVAR (current_buffer, enable_multibyte_characters)); |
| 3350 | struct interval_node *node; | 3350 | struct itree_node *node; |
| 3351 | 3351 | ||
| 3352 | overlay_heads.used = overlay_heads.bytes = 0; | 3352 | overlay_heads.used = overlay_heads.bytes = 0; |
| 3353 | overlay_tails.used = overlay_tails.bytes = 0; | 3353 | overlay_tails.used = overlay_tails.bytes = 0; |
| @@ -3848,7 +3848,7 @@ However, the overlays you get are the real objects that the buffer uses. */) | |||
| 3848 | (void) | 3848 | (void) |
| 3849 | { | 3849 | { |
| 3850 | Lisp_Object overlays = Qnil; | 3850 | Lisp_Object overlays = Qnil; |
| 3851 | struct interval_node *node; | 3851 | struct itree_node *node; |
| 3852 | 3852 | ||
| 3853 | ITREE_FOREACH (node, current_buffer->overlays, BEG, Z, DESCENDING) | 3853 | ITREE_FOREACH (node, current_buffer->overlays, BEG, Z, DESCENDING) |
| 3854 | overlays = Fcons (node->data, overlays); | 3854 | overlays = Fcons (node->data, overlays); |
| @@ -3980,7 +3980,7 @@ report_overlay_modification (Lisp_Object start, Lisp_Object end, bool after, | |||
| 3980 | 3980 | ||
| 3981 | if (!after) | 3981 | if (!after) |
| 3982 | { | 3982 | { |
| 3983 | struct interval_node *node; | 3983 | struct itree_node *node; |
| 3984 | EMACS_INT begin_arg = XFIXNUM (start); | 3984 | EMACS_INT begin_arg = XFIXNUM (start); |
| 3985 | EMACS_INT end_arg = XFIXNUM (end); | 3985 | EMACS_INT end_arg = XFIXNUM (end); |
| 3986 | /* We are being called before a change. | 3986 | /* We are being called before a change. |
| @@ -4072,7 +4072,7 @@ void | |||
| 4072 | evaporate_overlays (ptrdiff_t pos) | 4072 | evaporate_overlays (ptrdiff_t pos) |
| 4073 | { | 4073 | { |
| 4074 | Lisp_Object hit_list = Qnil; | 4074 | Lisp_Object hit_list = Qnil; |
| 4075 | struct interval_node *node; | 4075 | struct itree_node *node; |
| 4076 | 4076 | ||
| 4077 | ITREE_FOREACH (node, current_buffer->overlays, pos, pos, ASCENDING) | 4077 | ITREE_FOREACH (node, current_buffer->overlays, pos, pos, ASCENDING) |
| 4078 | { | 4078 | { |
| @@ -4913,7 +4913,7 @@ defvar_per_buffer (struct Lisp_Buffer_Objfwd *bo_fwd, const char *namestring, | |||
| 4913 | 4913 | ||
| 4914 | #ifdef ITREE_DEBUG | 4914 | #ifdef ITREE_DEBUG |
| 4915 | static Lisp_Object | 4915 | static Lisp_Object |
| 4916 | make_lispy_interval_node (const struct interval_node *node) | 4916 | make_lispy_itree_node (const struct itree_node *node) |
| 4917 | { | 4917 | { |
| 4918 | return listn (12, | 4918 | return listn (12, |
| 4919 | intern (":begin"), | 4919 | intern (":begin"), |
| @@ -4931,12 +4931,12 @@ make_lispy_interval_node (const struct interval_node *node) | |||
| 4931 | } | 4931 | } |
| 4932 | 4932 | ||
| 4933 | static Lisp_Object | 4933 | static Lisp_Object |
| 4934 | overlay_tree (const struct interval_tree *tree, | 4934 | overlay_tree (const struct itree_tree *tree, |
| 4935 | const struct interval_node *node) | 4935 | const struct itree_node *node) |
| 4936 | { | 4936 | { |
| 4937 | if (node == ITREE_NULL) | 4937 | if (node == ITREE_NULL) |
| 4938 | return Qnil; | 4938 | return Qnil; |
| 4939 | return list3 (make_lispy_interval_node (node), | 4939 | return list3 (make_lispy_itree_node (node), |
| 4940 | overlay_tree (tree, node->left), | 4940 | overlay_tree (tree, node->left), |
| 4941 | overlay_tree (tree, node->right)); | 4941 | overlay_tree (tree, node->right)); |
| 4942 | } | 4942 | } |