diff options
| author | Eli Zaretskii | 2023-02-02 21:54:15 +0200 |
|---|---|---|
| committer | Eli Zaretskii | 2023-02-02 21:54:15 +0200 |
| commit | 88ccf78b206f7360060c0b1e2c5b9b86b8904134 (patch) | |
| tree | ae5e54e4a7597dd0212fe7c99d8fabc7c87cddd3 /src | |
| parent | 20454128b8be9fb3b525ac43f7e5dfa9cc639db0 (diff) | |
| download | emacs-88ccf78b206f7360060c0b1e2c5b9b86b8904134.tar.gz emacs-88ccf78b206f7360060c0b1e2c5b9b86b8904134.zip | |
; * src/treesit.c (treesit_predicate_match): Simplify last change.
Diffstat (limited to 'src')
| -rw-r--r-- | src/treesit.c | 13 |
1 files changed, 5 insertions, 8 deletions
diff --git a/src/treesit.c b/src/treesit.c index 52953573061..8e772523cc7 100644 --- a/src/treesit.c +++ b/src/treesit.c | |||
| @@ -2483,8 +2483,8 @@ treesit_predicate_match (Lisp_Object args, struct capture_range captures) | |||
| 2483 | uint32_t end_byte_offset = ts_node_end_byte (treesit_node); | 2483 | uint32_t end_byte_offset = ts_node_end_byte (treesit_node); |
| 2484 | ptrdiff_t start_byte = visible_beg + start_byte_offset; | 2484 | ptrdiff_t start_byte = visible_beg + start_byte_offset; |
| 2485 | ptrdiff_t end_byte = visible_beg + end_byte_offset; | 2485 | ptrdiff_t end_byte = visible_beg + end_byte_offset; |
| 2486 | ptrdiff_t start_pos = buf_bytepos_to_charpos (buffer, start_byte); | 2486 | ptrdiff_t start_pos = BYTE_TO_CHAR (start_byte); |
| 2487 | ptrdiff_t end_pos = buf_bytepos_to_charpos (buffer, end_byte); | 2487 | ptrdiff_t end_pos = BYTE_TO_CHAR (end_byte); |
| 2488 | ptrdiff_t old_begv = BEGV; | 2488 | ptrdiff_t old_begv = BEGV; |
| 2489 | ptrdiff_t old_begv_byte = BEGV_BYTE; | 2489 | ptrdiff_t old_begv_byte = BEGV_BYTE; |
| 2490 | ptrdiff_t old_zv = ZV; | 2490 | ptrdiff_t old_zv = ZV; |
| @@ -2495,8 +2495,8 @@ treesit_predicate_match (Lisp_Object args, struct capture_range captures) | |||
| 2495 | ZV = end_pos; | 2495 | ZV = end_pos; |
| 2496 | ZV_BYTE = end_byte; | 2496 | ZV_BYTE = end_byte; |
| 2497 | 2497 | ||
| 2498 | ptrdiff_t val = search_buffer (regexp, start_pos, start_byte, end_pos, end_byte, | 2498 | ptrdiff_t val = search_buffer (regexp, start_pos, start_byte, |
| 2499 | 1, 1, Qnil, Qnil, false); | 2499 | end_pos, end_byte, 1, 1, Qnil, Qnil, false); |
| 2500 | 2500 | ||
| 2501 | BEGV = old_begv; | 2501 | BEGV = old_begv; |
| 2502 | BEGV_BYTE = old_begv_byte; | 2502 | BEGV_BYTE = old_begv_byte; |
| @@ -2505,10 +2505,7 @@ treesit_predicate_match (Lisp_Object args, struct capture_range captures) | |||
| 2505 | 2505 | ||
| 2506 | set_buffer_internal (old_buffer); | 2506 | set_buffer_internal (old_buffer); |
| 2507 | 2507 | ||
| 2508 | if (val > 0) | 2508 | return (val > 0); |
| 2509 | return true; | ||
| 2510 | else | ||
| 2511 | return false; | ||
| 2512 | } | 2509 | } |
| 2513 | 2510 | ||
| 2514 | /* Handles predicate (#pred FN ARG...). Return true if FN returns | 2511 | /* Handles predicate (#pred FN ARG...). Return true if FN returns |