Mercurial > vim
annotate src/quickfix.c @ 29234:96ff6c230a66 v8.2.5136
patch 8.2.5136: debugger test fails when run with valgrind
Commit: https://github.com/vim/vim/commit/e366ed4f2c6fa8cb663f1b9599b39d57ddbd8a2a
Author: Bram Moolenaar <Bram@vim.org>
Date: Sun Jun 19 20:13:56 2022 +0100
patch 8.2.5136: debugger test fails when run with valgrind
Problem: Debugger test fails when run with valgrind.
Solution: Wait longer when using valgrind.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Sun, 19 Jun 2022 21:15:03 +0200 |
parents | b90bca860b5a |
children | 827d9f2b7a71 |
rev | line source |
---|---|
10042
4aead6a9b7a9
commit https://github.com/vim/vim/commit/edf3f97ae2af024708ebb4ac614227327033ca47
Christian Brabandt <cb@256bit.org>
parents:
9982
diff
changeset
|
1 /* vi:set ts=8 sts=4 sw=4 noet: |
7 | 2 * |
3 * VIM - Vi IMproved by Bram Moolenaar | |
4 * | |
5 * Do ":help uganda" in Vim to read copying and usage conditions. | |
6 * Do ":help credits" in Vim to see a list of people who contributed. | |
7 * See README.txt for an overview of the Vim source code. | |
8 */ | |
9 | |
10 /* | |
11 * quickfix.c: functions for quickfix mode, using a file with error messages | |
12 */ | |
13 | |
14 #include "vim.h" | |
15 | |
16 #if defined(FEAT_QUICKFIX) || defined(PROTO) | |
17 | |
18 struct dir_stack_T | |
19 { | |
20 struct dir_stack_T *next; | |
21 char_u *dirname; | |
22 }; | |
23 | |
24 /* | |
230 | 25 * For each error the next struct is allocated and linked in a list. |
7 | 26 */ |
230 | 27 typedef struct qfline_S qfline_T; |
28 struct qfline_S | |
7 | 29 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
30 qfline_T *qf_next; // pointer to next error in the list |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
31 qfline_T *qf_prev; // pointer to previous error in the list |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
32 linenr_T qf_lnum; // line number where the error occurred |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
33 linenr_T qf_end_lnum; // line number when the error has range or zero |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
34 int qf_fnum; // file number for the line |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
35 int qf_col; // column where the error occurred |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
36 int qf_end_col; // column when the error has range or zero |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
37 int qf_nr; // error number |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
38 char_u *qf_module; // module name for this error |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
39 char_u *qf_pattern; // search pattern for the error |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
40 char_u *qf_text; // description of the error |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
41 char_u qf_viscol; // set to TRUE if qf_col and qf_end_col is |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
42 // screen column |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
43 char_u qf_cleared; // set to TRUE if line has been deleted |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
44 char_u qf_type; // type of the error (mostly 'E'); 1 for |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
45 // :helpgrep |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
46 char_u qf_valid; // valid error message detected |
7 | 47 }; |
48 | |
49 /* | |
50 * There is a stack of error lists. | |
51 */ | |
52 #define LISTCOUNT 10 | |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
53 #define INVALID_QFIDX (-1) |
15740
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
54 #define INVALID_QFBUFNR (0) |
7 | 55 |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
56 /* |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
57 * Quickfix list type. |
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
58 */ |
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
59 typedef enum |
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
60 { |
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
61 QFLT_QUICKFIX, // Quickfix list - global list |
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
62 QFLT_LOCATION, // Location list - per window list |
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
63 QFLT_INTERNAL // Internal - Temporary list used by getqflist()/getloclist() |
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
64 } qfltype_T; |
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
65 |
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
66 /* |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
67 * Quickfix/Location list definition |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
68 * Contains a list of entries (qfline_T). qf_start points to the first entry |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
69 * and qf_last points to the last entry. qf_count contains the list size. |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
70 * |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
71 * Usually the list contains one or more entries. But an empty list can be |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
72 * created using setqflist()/setloclist() with a title and/or user context |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
73 * information and entries can be added later using setqflist()/setloclist(). |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
74 */ |
644 | 75 typedef struct qf_list_S |
7 | 76 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
77 int_u qf_id; // Unique identifier for this list |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
78 qfltype_T qfl_type; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
79 qfline_T *qf_start; // pointer to the first error |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
80 qfline_T *qf_last; // pointer to the last error |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
81 qfline_T *qf_ptr; // pointer to the current error |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
82 int qf_count; // number of errors (0 means empty list) |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
83 int qf_index; // current index in the error list |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
84 int qf_nonevalid; // TRUE if not a single valid entry found |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
85 char_u *qf_title; // title derived from the command that created |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
86 // the error list or set by setqflist |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
87 typval_T *qf_ctx; // context set by setqflist/setloclist |
28451
e015d650ea9f
patch 8.2.4750: small pieces of dead code
Bram Moolenaar <Bram@vim.org>
parents:
28315
diff
changeset
|
88 callback_T qf_qftf_cb; // 'quickfixtextfunc' callback function |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
89 |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
90 struct dir_stack_T *qf_dir_stack; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
91 char_u *qf_directory; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
92 struct dir_stack_T *qf_file_stack; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
93 char_u *qf_currfile; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
94 int qf_multiline; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
95 int qf_multiignore; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
96 int qf_multiscan; |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
97 long qf_changedtick; |
644 | 98 } qf_list_T; |
99 | |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
100 /* |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
101 * Quickfix/Location list stack definition |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
102 * Contains a list of quickfix/location lists (qf_list_T) |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
103 */ |
644 | 104 struct qf_info_S |
105 { | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
106 // Count of references to this list. Used only for location lists. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
107 // When a location list window reference this list, qf_refcount |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
108 // will be 2. Otherwise, qf_refcount will be 1. When qf_refcount |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
109 // reaches 0, the list is freed. |
644 | 110 int qf_refcount; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
111 int qf_listcount; // current number of lists |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
112 int qf_curlist; // current error list |
644 | 113 qf_list_T qf_lists[LISTCOUNT]; |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
114 qfltype_T qfl_type; // type of list |
15740
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
115 int qf_bufnr; // quickfix window buffer number |
644 | 116 }; |
117 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
118 static qf_info_T ql_info; // global quickfix list |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
119 static int_u last_qf_id = 0; // Last used quickfix list id |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
120 |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
121 #define FMT_PATTERNS 13 // maximum number of % recognized |
7 | 122 |
123 /* | |
124 * Structure used to hold the info of one part of 'errorformat' | |
125 */ | |
789 | 126 typedef struct efm_S efm_T; |
127 struct efm_S | |
7 | 128 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
129 regprog_T *prog; // pre-formatted part of 'errorformat' |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
130 efm_T *next; // pointer to next (NULL if last) |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
131 char_u addr[FMT_PATTERNS]; // indices of used % patterns |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
132 char_u prefix; // prefix of this format line: |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
133 // 'D' enter directory |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
134 // 'X' leave directory |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
135 // 'A' start of multi-line message |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
136 // 'E' error message |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
137 // 'W' warning message |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
138 // 'I' informational message |
20729
ada6f26e6eb1
patch 8.2.0917: quickfix entries do not suport a "note" type
Bram Moolenaar <Bram@vim.org>
parents:
20631
diff
changeset
|
139 // 'N' note message |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
140 // 'C' continuation line |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
141 // 'Z' end of multi-line message |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
142 // 'G' general, unspecific message |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
143 // 'P' push file (partial) message |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
144 // 'Q' pop/quit file (partial) message |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
145 // 'O' overread (partial) message |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
146 char_u flags; // additional flags given in prefix |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
147 // '-' do not include this line |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
148 // '+' include whole line in message |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
149 int conthere; // %> used |
7 | 150 }; |
151 | |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
152 // List of location lists to be deleted. |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
153 // Used to delay the deletion of locations lists by autocmds. |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
154 typedef struct qf_delq_S |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
155 { |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
156 struct qf_delq_S *next; |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
157 qf_info_T *qi; |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
158 } qf_delq_T; |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
159 static qf_delq_T *qf_delq_head = NULL; |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
160 |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
161 // Counter to prevent autocmds from freeing up location lists when they are |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
162 // still being used. |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
163 static int quickfix_busy = 0; |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
164 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
165 static efm_T *fmt_start = NULL; // cached across qf_parse_line() calls |
10367
4e4e116e3689
commit https://github.com/vim/vim/commit/63bed3d319b5d90765dbdae93a3579b6322d79fb
Christian Brabandt <cb@256bit.org>
parents:
10359
diff
changeset
|
166 |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
167 // callback function for 'quickfixtextfunc' |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
168 static callback_T qftf_cb; |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
169 |
7805
0b6c37dd858d
commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077
Christian Brabandt <cb@256bit.org>
parents:
7710
diff
changeset
|
170 static void qf_new_list(qf_info_T *qi, char_u *qf_title); |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
171 static int qf_add_entry(qf_list_T *qfl, char_u *dir, char_u *fname, char_u *module, int bufnum, char_u *mesg, long lnum, long end_lnum, int col, int end_col, int vis_col, char_u *pattern, int nr, int type, int valid); |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
172 static void qf_free(qf_list_T *qfl); |
7805
0b6c37dd858d
commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077
Christian Brabandt <cb@256bit.org>
parents:
7710
diff
changeset
|
173 static char_u *qf_types(int, int); |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
174 static int qf_get_fnum(qf_list_T *qfl, char_u *, char_u *); |
9397
e08e8b00fe48
commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
175 static char_u *qf_push_dir(char_u *, struct dir_stack_T **, int is_file_stack); |
7805
0b6c37dd858d
commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077
Christian Brabandt <cb@256bit.org>
parents:
7710
diff
changeset
|
176 static char_u *qf_pop_dir(struct dir_stack_T **); |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
177 static char_u *qf_guess_filepath(qf_list_T *qfl, char_u *); |
17789
0f7ae8010787
patch 8.1.1891: functions used in one file are global
Bram Moolenaar <Bram@vim.org>
parents:
17099
diff
changeset
|
178 static void qf_jump_newwin(qf_info_T *qi, int dir, int errornr, int forceit, int newwin); |
7805
0b6c37dd858d
commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077
Christian Brabandt <cb@256bit.org>
parents:
7710
diff
changeset
|
179 static void qf_fmt_text(char_u *text, char_u *buf, int bufsize); |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
180 static void qf_range_text(qfline_T *qfp, char_u *buf, int bufsize); |
7805
0b6c37dd858d
commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077
Christian Brabandt <cb@256bit.org>
parents:
7710
diff
changeset
|
181 static int qf_win_pos_update(qf_info_T *qi, int old_qf_index); |
0b6c37dd858d
commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077
Christian Brabandt <cb@256bit.org>
parents:
7710
diff
changeset
|
182 static win_T *qf_find_win(qf_info_T *qi); |
0b6c37dd858d
commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077
Christian Brabandt <cb@256bit.org>
parents:
7710
diff
changeset
|
183 static buf_T *qf_find_buf(qf_info_T *qi); |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
184 static void qf_update_buffer(qf_info_T *qi, qfline_T *old_last); |
20762
68170c89e355
patch 8.2.0933: 'quickfixtextfunc' does not get window ID of location list
Bram Moolenaar <Bram@vim.org>
parents:
20729
diff
changeset
|
185 static void qf_fill_buffer(qf_list_T *qfl, buf_T *buf, qfline_T *old_last, int qf_winid); |
7805
0b6c37dd858d
commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077
Christian Brabandt <cb@256bit.org>
parents:
7710
diff
changeset
|
186 static buf_T *load_dummy_buffer(char_u *fname, char_u *dirname_start, char_u *resulting_dir); |
0b6c37dd858d
commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077
Christian Brabandt <cb@256bit.org>
parents:
7710
diff
changeset
|
187 static void wipe_dummy_buffer(buf_T *buf, char_u *dirname_start); |
0b6c37dd858d
commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077
Christian Brabandt <cb@256bit.org>
parents:
7710
diff
changeset
|
188 static void unload_dummy_buffer(buf_T *buf, char_u *dirname_start); |
0b6c37dd858d
commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077
Christian Brabandt <cb@256bit.org>
parents:
7710
diff
changeset
|
189 static qf_info_T *ll_get_or_alloc_list(win_T *); |
7 | 190 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
191 // Quickfix window check helper macro |
27752
c1d1639b52dd
patch 8.2.4402: missing parenthesis may cause unexpected problems
Bram Moolenaar <Bram@vim.org>
parents:
27605
diff
changeset
|
192 #define IS_QF_WINDOW(wp) (bt_quickfix((wp)->w_buffer) && (wp)->w_llist_ref == NULL) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
193 // Location list window check helper macro |
27752
c1d1639b52dd
patch 8.2.4402: missing parenthesis may cause unexpected problems
Bram Moolenaar <Bram@vim.org>
parents:
27605
diff
changeset
|
194 #define IS_LL_WINDOW(wp) (bt_quickfix((wp)->w_buffer) && (wp)->w_llist_ref != NULL) |
14560
8413e66d00a1
patch 8.1.0293: checks for type of stack is cryptic
Christian Brabandt <cb@256bit.org>
parents:
14552
diff
changeset
|
195 |
8413e66d00a1
patch 8.1.0293: checks for type of stack is cryptic
Christian Brabandt <cb@256bit.org>
parents:
14552
diff
changeset
|
196 // Quickfix and location list stack check helper macros |
27752
c1d1639b52dd
patch 8.2.4402: missing parenthesis may cause unexpected problems
Bram Moolenaar <Bram@vim.org>
parents:
27605
diff
changeset
|
197 #define IS_QF_STACK(qi) ((qi)->qfl_type == QFLT_QUICKFIX) |
c1d1639b52dd
patch 8.2.4402: missing parenthesis may cause unexpected problems
Bram Moolenaar <Bram@vim.org>
parents:
27605
diff
changeset
|
198 #define IS_LL_STACK(qi) ((qi)->qfl_type == QFLT_LOCATION) |
c1d1639b52dd
patch 8.2.4402: missing parenthesis may cause unexpected problems
Bram Moolenaar <Bram@vim.org>
parents:
27605
diff
changeset
|
199 #define IS_QF_LIST(qfl) ((qfl)->qfl_type == QFLT_QUICKFIX) |
c1d1639b52dd
patch 8.2.4402: missing parenthesis may cause unexpected problems
Bram Moolenaar <Bram@vim.org>
parents:
27605
diff
changeset
|
200 #define IS_LL_LIST(qfl) ((qfl)->qfl_type == QFLT_LOCATION) |
14560
8413e66d00a1
patch 8.1.0293: checks for type of stack is cryptic
Christian Brabandt <cb@256bit.org>
parents:
14552
diff
changeset
|
201 |
644 | 202 /* |
203 * Return location list for window 'wp' | |
204 * For location list window, return the referenced location list | |
205 */ | |
27752
c1d1639b52dd
patch 8.2.4402: missing parenthesis may cause unexpected problems
Bram Moolenaar <Bram@vim.org>
parents:
27605
diff
changeset
|
206 #define GET_LOC_LIST(wp) (IS_LL_WINDOW(wp) ? (wp)->w_llist_ref : (wp)->w_llist) |
644 | 207 |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
208 // Macro to loop through all the items in a quickfix list |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
209 // Quickfix item index starts from 1, so i below starts at 1 |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
210 #define FOR_ALL_QFL_ITEMS(qfl, qfp, i) \ |
27752
c1d1639b52dd
patch 8.2.4402: missing parenthesis may cause unexpected problems
Bram Moolenaar <Bram@vim.org>
parents:
27605
diff
changeset
|
211 for ((i) = 1, (qfp) = (qfl)->qf_start; \ |
c1d1639b52dd
patch 8.2.4402: missing parenthesis may cause unexpected problems
Bram Moolenaar <Bram@vim.org>
parents:
27605
diff
changeset
|
212 !got_int && (i) <= (qfl)->qf_count && (qfp) != NULL; \ |
c1d1639b52dd
patch 8.2.4402: missing parenthesis may cause unexpected problems
Bram Moolenaar <Bram@vim.org>
parents:
27605
diff
changeset
|
213 ++(i), (qfp) = (qfp)->qf_next) |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
214 |
7 | 215 /* |
11443
30b3775addb2
patch 8.0.0605: the quickfix cached buffer may become invalid
Christian Brabandt <cb@256bit.org>
parents:
11426
diff
changeset
|
216 * Looking up a buffer can be slow if there are many. Remember the last one |
30b3775addb2
patch 8.0.0605: the quickfix cached buffer may become invalid
Christian Brabandt <cb@256bit.org>
parents:
11426
diff
changeset
|
217 * to make this a lot faster if there are multiple matches in the same file. |
30b3775addb2
patch 8.0.0605: the quickfix cached buffer may become invalid
Christian Brabandt <cb@256bit.org>
parents:
11426
diff
changeset
|
218 */ |
11447
698ee9d4fe9f
patch 8.0.0607: after :bwipe + :new bufref might still be valid
Christian Brabandt <cb@256bit.org>
parents:
11445
diff
changeset
|
219 static char_u *qf_last_bufname = NULL; |
698ee9d4fe9f
patch 8.0.0607: after :bwipe + :new bufref might still be valid
Christian Brabandt <cb@256bit.org>
parents:
11445
diff
changeset
|
220 static bufref_T qf_last_bufref = {NULL, 0, 0}; |
11443
30b3775addb2
patch 8.0.0605: the quickfix cached buffer may become invalid
Christian Brabandt <cb@256bit.org>
parents:
11426
diff
changeset
|
221 |
30b3775addb2
patch 8.0.0605: the quickfix cached buffer may become invalid
Christian Brabandt <cb@256bit.org>
parents:
11426
diff
changeset
|
222 /* |
9033
0536d1469b67
commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e
Christian Brabandt <cb@256bit.org>
parents:
8932
diff
changeset
|
223 * Maximum number of bytes allowed per line while reading a errorfile. |
0536d1469b67
commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e
Christian Brabandt <cb@256bit.org>
parents:
8932
diff
changeset
|
224 */ |
0536d1469b67
commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e
Christian Brabandt <cb@256bit.org>
parents:
8932
diff
changeset
|
225 #define LINE_MAXLEN 4096 |
0536d1469b67
commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e
Christian Brabandt <cb@256bit.org>
parents:
8932
diff
changeset
|
226 |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
227 /* |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
228 * Patterns used. Keep in sync with qf_parse_fmt[]. |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
229 */ |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
230 static struct fmtpattern |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
231 { |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
232 char_u convchar; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
233 char *pattern; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
234 } fmt_pat[FMT_PATTERNS] = |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
235 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
236 {'f', ".\\+"}, // only used when at end |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
237 {'n', "\\d\\+"}, // 1 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
238 {'l', "\\d\\+"}, // 2 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
239 {'e', "\\d\\+"}, // 3 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
240 {'c', "\\d\\+"}, // 4 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
241 {'k', "\\d\\+"}, // 5 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
242 {'t', "."}, // 6 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
243 #define FMT_PATTERN_M 7 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
244 {'m', ".\\+"}, // 7 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
245 #define FMT_PATTERN_R 8 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
246 {'r', ".*"}, // 8 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
247 {'p', "[- .]*"}, // 9 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
248 {'v', "\\d\\+"}, // 10 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
249 {'s', ".\\+"}, // 11 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
250 {'o', ".\\+"} // 12 |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
251 }; |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
252 |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
253 /* |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
254 * Convert an errorformat pattern to a regular expression pattern. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
255 * See fmt_pat definition above for the list of supported patterns. The |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
256 * pattern specifier is supplied in "efmpat". The converted pattern is stored |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
257 * in "regpat". Returns a pointer to the location after the pattern. |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
258 */ |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
259 static char_u * |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
260 efmpat_to_regpat( |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
261 char_u *efmpat, |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
262 char_u *regpat, |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
263 efm_T *efminfo, |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
264 int idx, |
15470
55ccc2d353bd
patch 8.1.0743: giving error messages is not flexible
Bram Moolenaar <Bram@vim.org>
parents:
15424
diff
changeset
|
265 int round) |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
266 { |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
267 char_u *srcptr; |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
268 |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
269 if (efminfo->addr[idx]) |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
270 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
271 // Each errorformat pattern can occur only once |
26913
d4e61d61afd9
patch 8.2.3985: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26883
diff
changeset
|
272 semsg(_(e_too_many_chr_in_format_string), *efmpat); |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
273 return NULL; |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
274 } |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
275 if ((idx && idx < FMT_PATTERN_R |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
276 && vim_strchr((char_u *)"DXOPQ", efminfo->prefix) != NULL) |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
277 || (idx == FMT_PATTERN_R |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
278 && vim_strchr((char_u *)"OPQ", efminfo->prefix) == NULL)) |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
279 { |
26913
d4e61d61afd9
patch 8.2.3985: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26883
diff
changeset
|
280 semsg(_(e_unexpected_chr_in_format_str), *efmpat); |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
281 return NULL; |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
282 } |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
283 efminfo->addr[idx] = (char_u)++round; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
284 *regpat++ = '\\'; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
285 *regpat++ = '('; |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
286 #ifdef BACKSLASH_IN_FILENAME |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
287 if (*efmpat == 'f') |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
288 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
289 // Also match "c:" in the file name, even when |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
290 // checking for a colon next: "%f:". |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
291 // "\%(\a:\)\=" |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
292 STRCPY(regpat, "\\%(\\a:\\)\\="); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
293 regpat += 10; |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
294 } |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
295 #endif |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
296 if (*efmpat == 'f' && efmpat[1] != NUL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
297 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
298 if (efmpat[1] != '\\' && efmpat[1] != '%') |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
299 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
300 // A file name may contain spaces, but this isn't |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
301 // in "\f". For "%f:%l:%m" there may be a ":" in |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
302 // the file name. Use ".\{-1,}x" instead (x is |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
303 // the next character), the requirement that :999: |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
304 // follows should work. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
305 STRCPY(regpat, ".\\{-1,}"); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
306 regpat += 7; |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
307 } |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
308 else |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
309 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
310 // File name followed by '\\' or '%': include as |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
311 // many file name chars as possible. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
312 STRCPY(regpat, "\\f\\+"); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
313 regpat += 4; |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
314 } |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
315 } |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
316 else |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
317 { |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
318 srcptr = (char_u *)fmt_pat[idx].pattern; |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
319 while ((*regpat = *srcptr++) != NUL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
320 ++regpat; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
321 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
322 *regpat++ = '\\'; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
323 *regpat++ = ')'; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
324 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
325 return regpat; |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
326 } |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
327 |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
328 /* |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
329 * Convert a scanf like format in 'errorformat' to a regular expression. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
330 * Returns a pointer to the location after the pattern. |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
331 */ |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
332 static char_u * |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
333 scanf_fmt_to_regpat( |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
334 char_u **pefmp, |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
335 char_u *efm, |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
336 int len, |
15470
55ccc2d353bd
patch 8.1.0743: giving error messages is not flexible
Bram Moolenaar <Bram@vim.org>
parents:
15424
diff
changeset
|
337 char_u *regpat) |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
338 { |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
339 char_u *efmp = *pefmp; |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
340 |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
341 if (*efmp == '[' || *efmp == '\\') |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
342 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
343 if ((*regpat++ = *efmp) == '[') // %*[^a-z0-9] etc. |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
344 { |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
345 if (efmp[1] == '^') |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
346 *regpat++ = *++efmp; |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
347 if (efmp < efm + len) |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
348 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
349 *regpat++ = *++efmp; // could be ']' |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
350 while (efmp < efm + len |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
351 && (*regpat++ = *++efmp) != ']') |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
352 // skip ; |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
353 if (efmp == efm + len) |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
354 { |
26913
d4e61d61afd9
patch 8.2.3985: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26883
diff
changeset
|
355 emsg(_(e_missing_rsb_in_format_string)); |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
356 return NULL; |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
357 } |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
358 } |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
359 } |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
360 else if (efmp < efm + len) // %*\D, %*\s etc. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
361 *regpat++ = *++efmp; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
362 *regpat++ = '\\'; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
363 *regpat++ = '+'; |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
364 } |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
365 else |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
366 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
367 // TODO: scanf()-like: %*ud, %*3c, %*f, ... ? |
26913
d4e61d61afd9
patch 8.2.3985: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26883
diff
changeset
|
368 semsg(_(e_unsupported_chr_in_format_string), *efmp); |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
369 return NULL; |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
370 } |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
371 |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
372 *pefmp = efmp; |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
373 |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
374 return regpat; |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
375 } |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
376 |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
377 /* |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
378 * Analyze/parse an errorformat prefix. |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
379 */ |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
380 static char_u * |
15470
55ccc2d353bd
patch 8.1.0743: giving error messages is not flexible
Bram Moolenaar <Bram@vim.org>
parents:
15424
diff
changeset
|
381 efm_analyze_prefix(char_u *efmp, efm_T *efminfo) |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
382 { |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
383 if (vim_strchr((char_u *)"+-", *efmp) != NULL) |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
384 efminfo->flags = *efmp++; |
20729
ada6f26e6eb1
patch 8.2.0917: quickfix entries do not suport a "note" type
Bram Moolenaar <Bram@vim.org>
parents:
20631
diff
changeset
|
385 if (vim_strchr((char_u *)"DXAEWINCZGOPQ", *efmp) != NULL) |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
386 efminfo->prefix = *efmp; |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
387 else |
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
388 { |
26913
d4e61d61afd9
patch 8.2.3985: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26883
diff
changeset
|
389 semsg(_(e_invalid_chr_in_format_string_prefix), *efmp); |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
390 return NULL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
391 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
392 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
393 return efmp; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
394 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
395 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
396 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
397 * Converts a 'errorformat' string part in 'efm' to a regular expression |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
398 * pattern. The resulting regex pattern is returned in "regpat". Additional |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
399 * information about the 'erroformat' pattern is returned in "fmt_ptr". |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
400 * Returns OK or FAIL. |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
401 */ |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
402 static int |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
403 efm_to_regpat( |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
404 char_u *efm, |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
405 int len, |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
406 efm_T *fmt_ptr, |
15470
55ccc2d353bd
patch 8.1.0743: giving error messages is not flexible
Bram Moolenaar <Bram@vim.org>
parents:
15424
diff
changeset
|
407 char_u *regpat) |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
408 { |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
409 char_u *ptr; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
410 char_u *efmp; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
411 int round; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
412 int idx = 0; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
413 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
414 // Build a regexp pattern for a 'errorformat' option part |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
415 ptr = regpat; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
416 *ptr++ = '^'; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
417 round = 0; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
418 for (efmp = efm; efmp < efm + len; ++efmp) |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
419 { |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
420 if (*efmp == '%') |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
421 { |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
422 ++efmp; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
423 for (idx = 0; idx < FMT_PATTERNS; ++idx) |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
424 if (fmt_pat[idx].convchar == *efmp) |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
425 break; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
426 if (idx < FMT_PATTERNS) |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
427 { |
15470
55ccc2d353bd
patch 8.1.0743: giving error messages is not flexible
Bram Moolenaar <Bram@vim.org>
parents:
15424
diff
changeset
|
428 ptr = efmpat_to_regpat(efmp, ptr, fmt_ptr, idx, round); |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
429 if (ptr == NULL) |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
430 return FAIL; |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
431 round++; |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
432 } |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
433 else if (*efmp == '*') |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
434 { |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
435 ++efmp; |
15470
55ccc2d353bd
patch 8.1.0743: giving error messages is not flexible
Bram Moolenaar <Bram@vim.org>
parents:
15424
diff
changeset
|
436 ptr = scanf_fmt_to_regpat(&efmp, efm, len, ptr); |
13984
9b1dc5c2f460
patch 8.1.0010: efm_to_regpat() is too long
Christian Brabandt <cb@256bit.org>
parents:
13948
diff
changeset
|
437 if (ptr == NULL) |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
438 return FAIL; |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
439 } |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
440 else if (vim_strchr((char_u *)"%\\.^$~[", *efmp) != NULL) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
441 *ptr++ = *efmp; // regexp magic characters |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
442 else if (*efmp == '#') |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
443 *ptr++ = '*'; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
444 else if (*efmp == '>') |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
445 fmt_ptr->conthere = TRUE; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
446 else if (efmp == efm + 1) // analyse prefix |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
447 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
448 // prefix is allowed only at the beginning of the errorformat |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
449 // option part |
15470
55ccc2d353bd
patch 8.1.0743: giving error messages is not flexible
Bram Moolenaar <Bram@vim.org>
parents:
15424
diff
changeset
|
450 efmp = efm_analyze_prefix(efmp, fmt_ptr); |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
451 if (efmp == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
452 return FAIL; |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
453 } |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
454 else |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
455 { |
26913
d4e61d61afd9
patch 8.2.3985: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26883
diff
changeset
|
456 semsg(_(e_invalid_chr_in_format_string), *efmp); |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
457 return FAIL; |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
458 } |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
459 } |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
460 else // copy normal character |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
461 { |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
462 if (*efmp == '\\' && efmp + 1 < efm + len) |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
463 ++efmp; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
464 else if (vim_strchr((char_u *)".*^$~[", *efmp) != NULL) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
465 *ptr++ = '\\'; // escape regexp atoms |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
466 if (*efmp) |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
467 *ptr++ = *efmp; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
468 } |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
469 } |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
470 *ptr++ = '$'; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
471 *ptr = NUL; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
472 |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
473 return OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
474 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
475 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
476 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
477 * Free the 'errorformat' information list |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
478 */ |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
479 static void |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
480 free_efm_list(efm_T **efm_first) |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
481 { |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
482 efm_T *efm_ptr; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
483 |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
484 for (efm_ptr = *efm_first; efm_ptr != NULL; efm_ptr = *efm_first) |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
485 { |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
486 *efm_first = efm_ptr->next; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
487 vim_regfree(efm_ptr->prog); |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
488 vim_free(efm_ptr); |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
489 } |
10367
4e4e116e3689
commit https://github.com/vim/vim/commit/63bed3d319b5d90765dbdae93a3579b6322d79fb
Christian Brabandt <cb@256bit.org>
parents:
10359
diff
changeset
|
490 fmt_start = NULL; |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
491 } |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
492 |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
493 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
494 * Compute the size of the buffer used to convert a 'errorformat' pattern into |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
495 * a regular expression pattern. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
496 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
497 static int |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
498 efm_regpat_bufsz(char_u *efm) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
499 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
500 int sz; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
501 int i; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
502 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
503 sz = (FMT_PATTERNS * 3) + ((int)STRLEN(efm) << 2); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
504 for (i = FMT_PATTERNS; i > 0; ) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
505 sz += (int)STRLEN(fmt_pat[--i].pattern); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
506 #ifdef BACKSLASH_IN_FILENAME |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
507 sz += 12; // "%f" can become twelve chars longer (see efm_to_regpat) |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
508 #else |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
509 sz += 2; // "%f" can become two chars longer |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
510 #endif |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
511 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
512 return sz; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
513 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
514 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
515 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
516 * Return the length of a 'errorformat' option part (separated by ","). |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
517 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
518 static int |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
519 efm_option_part_len(char_u *efm) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
520 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
521 int len; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
522 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
523 for (len = 0; efm[len] != NUL && efm[len] != ','; ++len) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
524 if (efm[len] == '\\' && efm[len + 1] != NUL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
525 ++len; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
526 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
527 return len; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
528 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
529 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
530 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
531 * Parse the 'errorformat' option. Multiple parts in the 'errorformat' option |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
532 * are parsed and converted to regular expressions. Returns information about |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
533 * the parsed 'errorformat' option. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
534 */ |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
535 static efm_T * |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
536 parse_efm_option(char_u *efm) |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
537 { |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
538 efm_T *fmt_ptr = NULL; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
539 efm_T *fmt_first = NULL; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
540 efm_T *fmt_last = NULL; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
541 char_u *fmtstr = NULL; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
542 int len; |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
543 int sz; |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
544 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
545 // Each part of the format string is copied and modified from errorformat |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
546 // to regex prog. Only a few % characters are allowed. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
547 |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
548 // Get some space to modify the format string into. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
549 sz = efm_regpat_bufsz(efm); |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
550 if ((fmtstr = alloc_id(sz, aid_qf_efm_fmtstr)) == NULL) |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
551 goto parse_efm_error; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
552 |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
553 while (efm[0] != NUL) |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
554 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
555 // Allocate a new eformat structure and put it at the end of the list |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
556 fmt_ptr = ALLOC_CLEAR_ONE_ID(efm_T, aid_qf_efm_fmtpart); |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
557 if (fmt_ptr == NULL) |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
558 goto parse_efm_error; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
559 if (fmt_first == NULL) // first one |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
560 fmt_first = fmt_ptr; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
561 else |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
562 fmt_last->next = fmt_ptr; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
563 fmt_last = fmt_ptr; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
564 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
565 // Isolate one part in the 'errorformat' option |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
566 len = efm_option_part_len(efm); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
567 |
15470
55ccc2d353bd
patch 8.1.0743: giving error messages is not flexible
Bram Moolenaar <Bram@vim.org>
parents:
15424
diff
changeset
|
568 if (efm_to_regpat(efm, len, fmt_ptr, fmtstr) == FAIL) |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
569 goto parse_efm_error; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
570 if ((fmt_ptr->prog = vim_regcomp(fmtstr, RE_MAGIC + RE_STRING)) == NULL) |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
571 goto parse_efm_error; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
572 // Advance to next part |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
573 efm = skip_to_option_part(efm + len); // skip comma and spaces |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
574 } |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
575 |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
576 if (fmt_first == NULL) // nothing found |
26913
d4e61d61afd9
patch 8.2.3985: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26883
diff
changeset
|
577 emsg(_(e_errorformat_contains_no_pattern)); |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
578 |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
579 goto parse_efm_end; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
580 |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
581 parse_efm_error: |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
582 free_efm_list(&fmt_first); |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
583 |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
584 parse_efm_end: |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
585 vim_free(fmtstr); |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
586 |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
587 return fmt_first; |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
588 } |
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
589 |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
590 enum { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
591 QF_FAIL = 0, |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
592 QF_OK = 1, |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
593 QF_END_OF_INPUT = 2, |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
594 QF_NOMEM = 3, |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
595 QF_IGNORE_LINE = 4, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
596 QF_MULTISCAN = 5, |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
597 }; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
598 |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
599 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
600 * State information used to parse lines and add entries to a quickfix/location |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
601 * list. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
602 */ |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
603 typedef struct { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
604 char_u *linebuf; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
605 int linelen; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
606 char_u *growbuf; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
607 int growbufsiz; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
608 FILE *fd; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
609 typval_T *tv; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
610 char_u *p_str; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
611 listitem_T *p_li; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
612 buf_T *buf; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
613 linenr_T buflnum; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
614 linenr_T lnumlast; |
11063
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
615 vimconv_T vc; |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
616 } qfstate_T; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
617 |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
618 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
619 * Allocate more memory for the line buffer used for parsing lines. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
620 */ |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
621 static char_u * |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
622 qf_grow_linebuf(qfstate_T *state, int newsz) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
623 { |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
624 char_u *p; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
625 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
626 // If the line exceeds LINE_MAXLEN exclude the last |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
627 // byte since it's not a NL character. |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
628 state->linelen = newsz > LINE_MAXLEN ? LINE_MAXLEN - 1 : newsz; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
629 if (state->growbuf == NULL) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
630 { |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
631 state->growbuf = alloc_id(state->linelen + 1, aid_qf_linebuf); |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
632 if (state->growbuf == NULL) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
633 return NULL; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
634 state->growbufsiz = state->linelen; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
635 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
636 else if (state->linelen > state->growbufsiz) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
637 { |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
638 if ((p = vim_realloc(state->growbuf, state->linelen + 1)) == NULL) |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
639 return NULL; |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
640 state->growbuf = p; |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
641 state->growbufsiz = state->linelen; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
642 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
643 return state->growbuf; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
644 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
645 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
646 /* |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
647 * Get the next string (separated by newline) from state->p_str. |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
648 */ |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
649 static int |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
650 qf_get_next_str_line(qfstate_T *state) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
651 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
652 // Get the next line from the supplied string |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
653 char_u *p_str = state->p_str; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
654 char_u *p; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
655 int len; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
656 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
657 if (*p_str == NUL) // Reached the end of the string |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
658 return QF_END_OF_INPUT; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
659 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
660 p = vim_strchr(p_str, '\n'); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
661 if (p != NULL) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
662 len = (int)(p - p_str) + 1; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
663 else |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
664 len = (int)STRLEN(p_str); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
665 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
666 if (len > IOSIZE - 2) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
667 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
668 state->linebuf = qf_grow_linebuf(state, len); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
669 if (state->linebuf == NULL) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
670 return QF_NOMEM; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
671 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
672 else |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
673 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
674 state->linebuf = IObuff; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
675 state->linelen = len; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
676 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
677 vim_strncpy(state->linebuf, p_str, state->linelen); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
678 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
679 // Increment using len in order to discard the rest of the |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
680 // line if it exceeds LINE_MAXLEN. |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
681 p_str += len; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
682 state->p_str = p_str; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
683 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
684 return QF_OK; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
685 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
686 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
687 /* |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
688 * Get the next string from the List item state->p_li. |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
689 */ |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
690 static int |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
691 qf_get_next_list_line(qfstate_T *state) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
692 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
693 listitem_T *p_li = state->p_li; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
694 int len; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
695 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
696 while (p_li != NULL |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
697 && (p_li->li_tv.v_type != VAR_STRING |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
698 || p_li->li_tv.vval.v_string == NULL)) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
699 p_li = p_li->li_next; // Skip non-string items |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
700 |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
701 if (p_li == NULL) // End of the list |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
702 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
703 state->p_li = NULL; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
704 return QF_END_OF_INPUT; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
705 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
706 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
707 len = (int)STRLEN(p_li->li_tv.vval.v_string); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
708 if (len > IOSIZE - 2) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
709 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
710 state->linebuf = qf_grow_linebuf(state, len); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
711 if (state->linebuf == NULL) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
712 return QF_NOMEM; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
713 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
714 else |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
715 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
716 state->linebuf = IObuff; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
717 state->linelen = len; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
718 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
719 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
720 vim_strncpy(state->linebuf, p_li->li_tv.vval.v_string, state->linelen); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
721 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
722 state->p_li = p_li->li_next; // next item |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
723 return QF_OK; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
724 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
725 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
726 /* |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
727 * Get the next string from state->buf. |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
728 */ |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
729 static int |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
730 qf_get_next_buf_line(qfstate_T *state) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
731 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
732 char_u *p_buf = NULL; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
733 int len; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
734 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
735 // Get the next line from the supplied buffer |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
736 if (state->buflnum > state->lnumlast) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
737 return QF_END_OF_INPUT; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
738 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
739 p_buf = ml_get_buf(state->buf, state->buflnum, FALSE); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
740 state->buflnum += 1; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
741 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
742 len = (int)STRLEN(p_buf); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
743 if (len > IOSIZE - 2) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
744 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
745 state->linebuf = qf_grow_linebuf(state, len); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
746 if (state->linebuf == NULL) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
747 return QF_NOMEM; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
748 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
749 else |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
750 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
751 state->linebuf = IObuff; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
752 state->linelen = len; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
753 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
754 vim_strncpy(state->linebuf, p_buf, state->linelen); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
755 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
756 return QF_OK; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
757 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
758 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
759 /* |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
760 * Get the next string from file state->fd. |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
761 */ |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
762 static int |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
763 qf_get_next_file_line(qfstate_T *state) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
764 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
765 int discard; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
766 int growbuflen; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
767 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
768 if (fgets((char *)IObuff, IOSIZE, state->fd) == NULL) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
769 return QF_END_OF_INPUT; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
770 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
771 discard = FALSE; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
772 state->linelen = (int)STRLEN(IObuff); |
9738
6818e3c96473
commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2
Christian Brabandt <cb@256bit.org>
parents:
9649
diff
changeset
|
773 if (state->linelen == IOSIZE - 1 && !(IObuff[state->linelen - 1] == '\n')) |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
774 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
775 // The current line exceeds IObuff, continue reading using |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
776 // growbuf until EOL or LINE_MAXLEN bytes is read. |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
777 if (state->growbuf == NULL) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
778 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
779 state->growbufsiz = 2 * (IOSIZE - 1); |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
780 state->growbuf = alloc_id(state->growbufsiz, aid_qf_linebuf); |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
781 if (state->growbuf == NULL) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
782 return QF_NOMEM; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
783 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
784 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
785 // Copy the read part of the line, excluding null-terminator |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
786 memcpy(state->growbuf, IObuff, IOSIZE - 1); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
787 growbuflen = state->linelen; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
788 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
789 for (;;) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
790 { |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
791 char_u *p; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
792 |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
793 if (fgets((char *)state->growbuf + growbuflen, |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
794 state->growbufsiz - growbuflen, state->fd) == NULL) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
795 break; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
796 state->linelen = (int)STRLEN(state->growbuf + growbuflen); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
797 growbuflen += state->linelen; |
9738
6818e3c96473
commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2
Christian Brabandt <cb@256bit.org>
parents:
9649
diff
changeset
|
798 if ((state->growbuf)[growbuflen - 1] == '\n') |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
799 break; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
800 if (state->growbufsiz == LINE_MAXLEN) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
801 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
802 discard = TRUE; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
803 break; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
804 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
805 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
806 state->growbufsiz = 2 * state->growbufsiz < LINE_MAXLEN |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
807 ? 2 * state->growbufsiz : LINE_MAXLEN; |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
808 if ((p = vim_realloc(state->growbuf, state->growbufsiz)) == NULL) |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
809 return QF_NOMEM; |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
810 state->growbuf = p; |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
811 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
812 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
813 while (discard) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
814 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
815 // The current line is longer than LINE_MAXLEN, continue |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
816 // reading but discard everything until EOL or EOF is |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
817 // reached. |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
818 if (fgets((char *)IObuff, IOSIZE, state->fd) == NULL |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
819 || (int)STRLEN(IObuff) < IOSIZE - 1 |
22099
b7cc5d8ea702
patch 8.2.1599: missing line end when skipping a long line with :cgetfile
Bram Moolenaar <Bram@vim.org>
parents:
22015
diff
changeset
|
820 || IObuff[IOSIZE - 2] == '\n') |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
821 break; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
822 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
823 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
824 state->linebuf = state->growbuf; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
825 state->linelen = growbuflen; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
826 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
827 else |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
828 state->linebuf = IObuff; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
829 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
830 // Convert a line if it contains a non-ASCII character. |
11263
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
831 if (state->vc.vc_type != CONV_NONE && has_non_ascii(state->linebuf)) |
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
832 { |
11063
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
833 char_u *line; |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
834 |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
835 line = string_convert(&state->vc, state->linebuf, &state->linelen); |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
836 if (line != NULL) |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
837 { |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
838 if (state->linelen < IOSIZE) |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
839 { |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
840 STRCPY(state->linebuf, line); |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
841 vim_free(line); |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
842 } |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
843 else |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
844 { |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
845 vim_free(state->growbuf); |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
846 state->linebuf = state->growbuf = line; |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
847 state->growbufsiz = state->linelen < LINE_MAXLEN |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
848 ? state->linelen : LINE_MAXLEN; |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
849 } |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
850 } |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
851 } |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
852 |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
853 return QF_OK; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
854 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
855 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
856 /* |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
857 * Get the next string from a file/buffer/list/string. |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
858 */ |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
859 static int |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
860 qf_get_nextline(qfstate_T *state) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
861 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
862 int status = QF_FAIL; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
863 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
864 if (state->fd == NULL) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
865 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
866 if (state->tv != NULL) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
867 { |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
868 if (state->tv->v_type == VAR_STRING) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
869 // Get the next line from the supplied string |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
870 status = qf_get_next_str_line(state); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
871 else if (state->tv->v_type == VAR_LIST) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
872 // Get the next line from the supplied list |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
873 status = qf_get_next_list_line(state); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
874 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
875 else |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
876 // Get the next line from the supplied buffer |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
877 status = qf_get_next_buf_line(state); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
878 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
879 else |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
880 // Get the next line from the supplied file |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
881 status = qf_get_next_file_line(state); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
882 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
883 if (status != QF_OK) |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
884 return status; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
885 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
886 // remove newline/CR from the line |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
887 if (state->linelen > 0 && state->linebuf[state->linelen - 1] == '\n') |
9738
6818e3c96473
commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2
Christian Brabandt <cb@256bit.org>
parents:
9649
diff
changeset
|
888 { |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
889 state->linebuf[state->linelen - 1] = NUL; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
890 #ifdef USE_CRNL |
9738
6818e3c96473
commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2
Christian Brabandt <cb@256bit.org>
parents:
9649
diff
changeset
|
891 if (state->linelen > 1 && state->linebuf[state->linelen - 2] == '\r') |
6818e3c96473
commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2
Christian Brabandt <cb@256bit.org>
parents:
9649
diff
changeset
|
892 state->linebuf[state->linelen - 2] = NUL; |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
893 #endif |
9738
6818e3c96473
commit https://github.com/vim/vim/commit/796aa9c804f09276bd3cc45123f4a191a001dec2
Christian Brabandt <cb@256bit.org>
parents:
9649
diff
changeset
|
894 } |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
895 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
896 remove_bom(state->linebuf); |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
897 |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
898 return QF_OK; |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
899 } |
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
900 |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
901 typedef struct { |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
902 char_u *namebuf; |
13821
98274127d675
patch 8.0.1782: no simple way to label quickfix entries
Christian Brabandt <cb@256bit.org>
parents:
13819
diff
changeset
|
903 char_u *module; |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
904 char_u *errmsg; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
905 int errmsglen; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
906 long lnum; |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
907 long end_lnum; |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
908 int col; |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
909 int end_col; |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
910 char_u use_viscol; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
911 char_u *pattern; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
912 int enr; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
913 int type; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
914 int valid; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
915 } qffields_T; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
916 |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
917 /* |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
918 * Parse the match for filename ('%f') pattern in regmatch. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
919 * Return the matched value in "fields->namebuf". |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
920 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
921 static int |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
922 qf_parse_fmt_f(regmatch_T *rmp, int midx, qffields_T *fields, int prefix) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
923 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
924 int c; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
925 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
926 if (rmp->startp[midx] == NULL || rmp->endp[midx] == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
927 return QF_FAIL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
928 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
929 // Expand ~/file and $HOME/file to full path. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
930 c = *rmp->endp[midx]; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
931 *rmp->endp[midx] = NUL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
932 expand_env(rmp->startp[midx], fields->namebuf, CMDBUFFSIZE); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
933 *rmp->endp[midx] = c; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
934 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
935 // For separate filename patterns (%O, %P and %Q), the specified file |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
936 // should exist. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
937 if (vim_strchr((char_u *)"OPQ", prefix) != NULL |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
938 && mch_getperm(fields->namebuf) == -1) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
939 return QF_FAIL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
940 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
941 return QF_OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
942 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
943 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
944 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
945 * Parse the match for error number ('%n') pattern in regmatch. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
946 * Return the matched value in "fields->enr". |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
947 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
948 static int |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
949 qf_parse_fmt_n(regmatch_T *rmp, int midx, qffields_T *fields) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
950 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
951 if (rmp->startp[midx] == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
952 return QF_FAIL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
953 fields->enr = (int)atol((char *)rmp->startp[midx]); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
954 return QF_OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
955 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
956 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
957 /* |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
958 * Parse the match for line number ('%l') pattern in regmatch. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
959 * Return the matched value in "fields->lnum". |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
960 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
961 static int |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
962 qf_parse_fmt_l(regmatch_T *rmp, int midx, qffields_T *fields) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
963 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
964 if (rmp->startp[midx] == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
965 return QF_FAIL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
966 fields->lnum = atol((char *)rmp->startp[midx]); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
967 return QF_OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
968 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
969 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
970 /* |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
971 * Parse the match for end line number ('%e') pattern in regmatch. |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
972 * Return the matched value in "fields->end_lnum". |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
973 */ |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
974 static int |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
975 qf_parse_fmt_e(regmatch_T *rmp, int midx, qffields_T *fields) |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
976 { |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
977 if (rmp->startp[midx] == NULL) |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
978 return QF_FAIL; |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
979 fields->end_lnum = atol((char *)rmp->startp[midx]); |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
980 return QF_OK; |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
981 } |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
982 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
983 /* |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
984 * Parse the match for column number ('%c') pattern in regmatch. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
985 * Return the matched value in "fields->col". |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
986 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
987 static int |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
988 qf_parse_fmt_c(regmatch_T *rmp, int midx, qffields_T *fields) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
989 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
990 if (rmp->startp[midx] == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
991 return QF_FAIL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
992 fields->col = (int)atol((char *)rmp->startp[midx]); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
993 return QF_OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
994 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
995 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
996 /* |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
997 * Parse the match for end column number ('%k') pattern in regmatch. |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
998 * Return the matched value in "fields->end_col". |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
999 */ |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1000 static int |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1001 qf_parse_fmt_k(regmatch_T *rmp, int midx, qffields_T *fields) |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1002 { |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1003 if (rmp->startp[midx] == NULL) |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1004 return QF_FAIL; |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1005 fields->end_col = (int)atol((char *)rmp->startp[midx]); |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1006 return QF_OK; |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1007 } |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1008 |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1009 /* |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1010 * Parse the match for error type ('%t') pattern in regmatch. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1011 * Return the matched value in "fields->type". |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1012 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1013 static int |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1014 qf_parse_fmt_t(regmatch_T *rmp, int midx, qffields_T *fields) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1015 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1016 if (rmp->startp[midx] == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1017 return QF_FAIL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1018 fields->type = *rmp->startp[midx]; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1019 return QF_OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1020 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1021 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1022 /* |
19405
08f4dc2ba716
patch 8.2.0260: several lines of code are duplicated
Bram Moolenaar <Bram@vim.org>
parents:
19366
diff
changeset
|
1023 * Copy a non-error line into the error string. Return the matched line in |
08f4dc2ba716
patch 8.2.0260: several lines of code are duplicated
Bram Moolenaar <Bram@vim.org>
parents:
19366
diff
changeset
|
1024 * "fields->errmsg". |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1025 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1026 static int |
19405
08f4dc2ba716
patch 8.2.0260: several lines of code are duplicated
Bram Moolenaar <Bram@vim.org>
parents:
19366
diff
changeset
|
1027 copy_nonerror_line(char_u *linebuf, int linelen, qffields_T *fields) |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1028 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1029 char_u *p; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1030 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1031 if (linelen >= fields->errmsglen) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1032 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1033 // linelen + null terminator |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1034 if ((p = vim_realloc(fields->errmsg, linelen + 1)) == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1035 return QF_NOMEM; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1036 fields->errmsg = p; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1037 fields->errmsglen = linelen + 1; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1038 } |
19405
08f4dc2ba716
patch 8.2.0260: several lines of code are duplicated
Bram Moolenaar <Bram@vim.org>
parents:
19366
diff
changeset
|
1039 // copy whole line to error message |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1040 vim_strncpy(fields->errmsg, linebuf, linelen); |
19405
08f4dc2ba716
patch 8.2.0260: several lines of code are duplicated
Bram Moolenaar <Bram@vim.org>
parents:
19366
diff
changeset
|
1041 |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1042 return QF_OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1043 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1044 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1045 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1046 * Parse the match for error message ('%m') pattern in regmatch. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1047 * Return the matched value in "fields->errmsg". |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1048 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1049 static int |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1050 qf_parse_fmt_m(regmatch_T *rmp, int midx, qffields_T *fields) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1051 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1052 char_u *p; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1053 int len; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1054 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1055 if (rmp->startp[midx] == NULL || rmp->endp[midx] == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1056 return QF_FAIL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1057 len = (int)(rmp->endp[midx] - rmp->startp[midx]); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1058 if (len >= fields->errmsglen) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1059 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1060 // len + null terminator |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1061 if ((p = vim_realloc(fields->errmsg, len + 1)) == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1062 return QF_NOMEM; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1063 fields->errmsg = p; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1064 fields->errmsglen = len + 1; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1065 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1066 vim_strncpy(fields->errmsg, rmp->startp[midx], len); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1067 return QF_OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1068 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1069 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1070 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1071 * Parse the match for rest of a single-line file message ('%r') pattern. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1072 * Return the matched value in "tail". |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1073 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1074 static int |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1075 qf_parse_fmt_r(regmatch_T *rmp, int midx, char_u **tail) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1076 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1077 if (rmp->startp[midx] == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1078 return QF_FAIL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1079 *tail = rmp->startp[midx]; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1080 return QF_OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1081 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1082 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1083 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1084 * Parse the match for the pointer line ('%p') pattern in regmatch. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1085 * Return the matched value in "fields->col". |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1086 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1087 static int |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1088 qf_parse_fmt_p(regmatch_T *rmp, int midx, qffields_T *fields) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1089 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1090 char_u *match_ptr; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1091 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1092 if (rmp->startp[midx] == NULL || rmp->endp[midx] == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1093 return QF_FAIL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1094 fields->col = 0; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1095 for (match_ptr = rmp->startp[midx]; match_ptr != rmp->endp[midx]; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1096 ++match_ptr) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1097 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1098 ++fields->col; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1099 if (*match_ptr == TAB) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1100 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1101 fields->col += 7; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1102 fields->col -= fields->col % 8; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1103 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1104 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1105 ++fields->col; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1106 fields->use_viscol = TRUE; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1107 return QF_OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1108 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1109 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1110 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1111 * Parse the match for the virtual column number ('%v') pattern in regmatch. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1112 * Return the matched value in "fields->col". |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1113 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1114 static int |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1115 qf_parse_fmt_v(regmatch_T *rmp, int midx, qffields_T *fields) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1116 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1117 if (rmp->startp[midx] == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1118 return QF_FAIL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1119 fields->col = (int)atol((char *)rmp->startp[midx]); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1120 fields->use_viscol = TRUE; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1121 return QF_OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1122 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1123 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1124 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1125 * Parse the match for the search text ('%s') pattern in regmatch. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1126 * Return the matched value in "fields->pattern". |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1127 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1128 static int |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1129 qf_parse_fmt_s(regmatch_T *rmp, int midx, qffields_T *fields) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1130 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1131 int len; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1132 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1133 if (rmp->startp[midx] == NULL || rmp->endp[midx] == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1134 return QF_FAIL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1135 len = (int)(rmp->endp[midx] - rmp->startp[midx]); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1136 if (len > CMDBUFFSIZE - 5) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1137 len = CMDBUFFSIZE - 5; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1138 STRCPY(fields->pattern, "^\\V"); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1139 STRNCAT(fields->pattern, rmp->startp[midx], len); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1140 fields->pattern[len + 3] = '\\'; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1141 fields->pattern[len + 4] = '$'; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1142 fields->pattern[len + 5] = NUL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1143 return QF_OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1144 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1145 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1146 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1147 * Parse the match for the module ('%o') pattern in regmatch. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1148 * Return the matched value in "fields->module". |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1149 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1150 static int |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1151 qf_parse_fmt_o(regmatch_T *rmp, int midx, qffields_T *fields) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1152 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1153 int len; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1154 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1155 if (rmp->startp[midx] == NULL || rmp->endp[midx] == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1156 return QF_FAIL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1157 len = (int)(rmp->endp[midx] - rmp->startp[midx]); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1158 if (len > CMDBUFFSIZE) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1159 len = CMDBUFFSIZE; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1160 STRNCAT(fields->module, rmp->startp[midx], len); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1161 return QF_OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1162 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1163 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1164 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1165 * 'errorformat' format pattern parser functions. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1166 * The '%f' and '%r' formats are parsed differently from other formats. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1167 * See qf_parse_match() for details. |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1168 * Keep in sync with fmt_pat[]. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1169 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1170 static int (*qf_parse_fmt[FMT_PATTERNS])(regmatch_T *, int, qffields_T *) = |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1171 { |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1172 NULL, // %f |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1173 qf_parse_fmt_n, |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1174 qf_parse_fmt_l, |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1175 qf_parse_fmt_e, |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1176 qf_parse_fmt_c, |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1177 qf_parse_fmt_k, |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1178 qf_parse_fmt_t, |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1179 qf_parse_fmt_m, |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1180 NULL, // %r |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1181 qf_parse_fmt_p, |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1182 qf_parse_fmt_v, |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1183 qf_parse_fmt_s, |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1184 qf_parse_fmt_o |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1185 }; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1186 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1187 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1188 * Parse the error format pattern matches in "regmatch" and set the values in |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1189 * "fields". fmt_ptr contains the 'efm' format specifiers/prefixes that have a |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1190 * match. Returns QF_OK if all the matches are successfully parsed. On |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1191 * failure, returns QF_FAIL or QF_NOMEM. |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1192 */ |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1193 static int |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1194 qf_parse_match( |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1195 char_u *linebuf, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1196 int linelen, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1197 efm_T *fmt_ptr, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1198 regmatch_T *regmatch, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1199 qffields_T *fields, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1200 int qf_multiline, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1201 int qf_multiscan, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1202 char_u **tail) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1203 { |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1204 int idx = fmt_ptr->prefix; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1205 int i; |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1206 int midx; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1207 int status; |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1208 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1209 if ((idx == 'C' || idx == 'Z') && !qf_multiline) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1210 return QF_FAIL; |
20729
ada6f26e6eb1
patch 8.2.0917: quickfix entries do not suport a "note" type
Bram Moolenaar <Bram@vim.org>
parents:
20631
diff
changeset
|
1211 if (vim_strchr((char_u *)"EWIN", idx) != NULL) |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1212 fields->type = idx; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1213 else |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1214 fields->type = 0; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1215 |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1216 // Extract error message data from matched line. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1217 // We check for an actual submatch, because "\[" and "\]" in |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1218 // the 'errorformat' may cause the wrong submatch to be used. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1219 for (i = 0; i < FMT_PATTERNS; i++) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1220 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1221 status = QF_OK; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1222 midx = (int)fmt_ptr->addr[i]; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1223 if (i == 0 && midx > 0) // %f |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1224 status = qf_parse_fmt_f(regmatch, midx, fields, idx); |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1225 else if (i == FMT_PATTERN_M) |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1226 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1227 if (fmt_ptr->flags == '+' && !qf_multiscan) // %+ |
19405
08f4dc2ba716
patch 8.2.0260: several lines of code are duplicated
Bram Moolenaar <Bram@vim.org>
parents:
19366
diff
changeset
|
1228 status = copy_nonerror_line(linebuf, linelen, fields); |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1229 else if (midx > 0) // %m |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1230 status = qf_parse_fmt_m(regmatch, midx, fields); |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1231 } |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1232 else if (i == FMT_PATTERN_R && midx > 0) // %r |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1233 status = qf_parse_fmt_r(regmatch, midx, tail); |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1234 else if (midx > 0) // others |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1235 status = (qf_parse_fmt[i])(regmatch, midx, fields); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1236 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1237 if (status != QF_OK) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1238 return status; |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1239 } |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1240 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1241 return QF_OK; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1242 } |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1243 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1244 /* |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1245 * Parse an error line in 'linebuf' using a single error format string in |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1246 * 'fmt_ptr->prog' and return the matching values in 'fields'. |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1247 * Returns QF_OK if the efm format matches completely and the fields are |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1248 * successfully copied. Otherwise returns QF_FAIL or QF_NOMEM. |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1249 */ |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1250 static int |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1251 qf_parse_get_fields( |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1252 char_u *linebuf, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1253 int linelen, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1254 efm_T *fmt_ptr, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1255 qffields_T *fields, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1256 int qf_multiline, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1257 int qf_multiscan, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1258 char_u **tail) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1259 { |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1260 regmatch_T regmatch; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1261 int status = QF_FAIL; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1262 int r; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1263 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1264 if (qf_multiscan && |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1265 vim_strchr((char_u *)"OPQ", fmt_ptr->prefix) == NULL) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1266 return QF_FAIL; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1267 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1268 fields->namebuf[0] = NUL; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1269 fields->module[0] = NUL; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1270 fields->pattern[0] = NUL; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1271 if (!qf_multiscan) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1272 fields->errmsg[0] = NUL; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1273 fields->lnum = 0; |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
1274 fields->end_lnum = 0; |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1275 fields->col = 0; |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
1276 fields->end_col = 0; |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1277 fields->use_viscol = FALSE; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1278 fields->enr = -1; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1279 fields->type = 0; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1280 *tail = NULL; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1281 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1282 // Always ignore case when looking for a matching error. |
13921
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1283 regmatch.rm_ic = TRUE; |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1284 regmatch.regprog = fmt_ptr->prog; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1285 r = vim_regexec(®match, linebuf, (colnr_T)0); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1286 fmt_ptr->prog = regmatch.regprog; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1287 if (r) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1288 status = qf_parse_match(linebuf, linelen, fmt_ptr, ®match, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1289 fields, qf_multiline, qf_multiscan, tail); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1290 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1291 return status; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1292 } |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1293 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1294 /* |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1295 * Parse directory error format prefixes (%D and %X). |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1296 * Push and pop directories from the directory stack when scanning directory |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1297 * names. |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1298 */ |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1299 static int |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1300 qf_parse_dir_pfx(int idx, qffields_T *fields, qf_list_T *qfl) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1301 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1302 if (idx == 'D') // enter directory |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1303 { |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1304 if (*fields->namebuf == NUL) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1305 { |
26913
d4e61d61afd9
patch 8.2.3985: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26883
diff
changeset
|
1306 emsg(_(e_missing_or_empty_directory_name)); |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1307 return QF_FAIL; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1308 } |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1309 qfl->qf_directory = |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1310 qf_push_dir(fields->namebuf, &qfl->qf_dir_stack, FALSE); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1311 if (qfl->qf_directory == NULL) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1312 return QF_FAIL; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1313 } |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1314 else if (idx == 'X') // leave directory |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1315 qfl->qf_directory = qf_pop_dir(&qfl->qf_dir_stack); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1316 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1317 return QF_OK; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1318 } |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1319 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1320 /* |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1321 * Parse global file name error format prefixes (%O, %P and %Q). |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1322 */ |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1323 static int |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1324 qf_parse_file_pfx( |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1325 int idx, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1326 qffields_T *fields, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1327 qf_list_T *qfl, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1328 char_u *tail) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1329 { |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1330 fields->valid = FALSE; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1331 if (*fields->namebuf == NUL || mch_getperm(fields->namebuf) >= 0) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1332 { |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1333 if (*fields->namebuf && idx == 'P') |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1334 qfl->qf_currfile = |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1335 qf_push_dir(fields->namebuf, &qfl->qf_file_stack, TRUE); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1336 else if (idx == 'Q') |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1337 qfl->qf_currfile = qf_pop_dir(&qfl->qf_file_stack); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1338 *fields->namebuf = NUL; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1339 if (tail && *tail) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1340 { |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1341 STRMOVE(IObuff, skipwhite(tail)); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1342 qfl->qf_multiscan = TRUE; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1343 return QF_MULTISCAN; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1344 } |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1345 } |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1346 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1347 return QF_OK; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1348 } |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1349 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1350 /* |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1351 * Parse a non-error line (a line which doesn't match any of the error |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1352 * format in 'efm'). |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1353 */ |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1354 static int |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1355 qf_parse_line_nomatch(char_u *linebuf, int linelen, qffields_T *fields) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1356 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1357 fields->namebuf[0] = NUL; // no match found, remove file name |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1358 fields->lnum = 0; // don't jump to this line |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1359 fields->valid = FALSE; |
19405
08f4dc2ba716
patch 8.2.0260: several lines of code are duplicated
Bram Moolenaar <Bram@vim.org>
parents:
19366
diff
changeset
|
1360 |
08f4dc2ba716
patch 8.2.0260: several lines of code are duplicated
Bram Moolenaar <Bram@vim.org>
parents:
19366
diff
changeset
|
1361 return copy_nonerror_line(linebuf, linelen, fields); |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1362 } |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1363 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1364 /* |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1365 * Parse multi-line error format prefixes (%C and %Z) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1366 */ |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1367 static int |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1368 qf_parse_multiline_pfx( |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1369 int idx, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1370 qf_list_T *qfl, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1371 qffields_T *fields) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1372 { |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1373 char_u *ptr; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1374 int len; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1375 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1376 if (!qfl->qf_multiignore) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1377 { |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1378 qfline_T *qfprev = qfl->qf_last; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1379 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1380 if (qfprev == NULL) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1381 return QF_FAIL; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1382 if (*fields->errmsg && !qfl->qf_multiignore) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1383 { |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1384 len = (int)STRLEN(qfprev->qf_text); |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
1385 ptr = alloc_id(len + STRLEN(fields->errmsg) + 2, |
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
1386 aid_qf_multiline_pfx); |
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
1387 if (ptr == NULL) |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1388 return QF_FAIL; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1389 STRCPY(ptr, qfprev->qf_text); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1390 vim_free(qfprev->qf_text); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1391 qfprev->qf_text = ptr; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1392 *(ptr += len) = '\n'; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1393 STRCPY(++ptr, fields->errmsg); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1394 } |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1395 if (qfprev->qf_nr == -1) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1396 qfprev->qf_nr = fields->enr; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1397 if (vim_isprintc(fields->type) && !qfprev->qf_type) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1398 // only printable chars allowed |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1399 qfprev->qf_type = fields->type; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1400 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1401 if (!qfprev->qf_lnum) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1402 qfprev->qf_lnum = fields->lnum; |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1403 if (!qfprev->qf_end_lnum) |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1404 qfprev->qf_end_lnum = fields->end_lnum; |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1405 if (!qfprev->qf_col) |
22645
13904ca59f96
patch 8.2.1871: using %v in 'errorformat' may fail before %Z
Bram Moolenaar <Bram@vim.org>
parents:
22454
diff
changeset
|
1406 { |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1407 qfprev->qf_col = fields->col; |
22645
13904ca59f96
patch 8.2.1871: using %v in 'errorformat' may fail before %Z
Bram Moolenaar <Bram@vim.org>
parents:
22454
diff
changeset
|
1408 qfprev->qf_viscol = fields->use_viscol; |
13904ca59f96
patch 8.2.1871: using %v in 'errorformat' may fail before %Z
Bram Moolenaar <Bram@vim.org>
parents:
22454
diff
changeset
|
1409 } |
27605
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1410 if (!qfprev->qf_end_col) |
bf540a32439a
patch 8.2.4329: no support for end line number and column in 'errorformat'
Bram Moolenaar <Bram@vim.org>
parents:
26966
diff
changeset
|
1411 qfprev->qf_end_col = fields->end_col; |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1412 if (!qfprev->qf_fnum) |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1413 qfprev->qf_fnum = qf_get_fnum(qfl, |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1414 qfl->qf_directory, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1415 *fields->namebuf || qfl->qf_directory != NULL |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1416 ? fields->namebuf |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1417 : qfl->qf_currfile != NULL && fields->valid |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1418 ? qfl->qf_currfile : 0); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1419 } |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1420 if (idx == 'Z') |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1421 qfl->qf_multiline = qfl->qf_multiignore = FALSE; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1422 line_breakcheck(); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1423 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1424 return QF_IGNORE_LINE; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1425 } |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1426 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1427 /* |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1428 * Parse a line and get the quickfix fields. |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1429 * Return the QF_ status. |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1430 */ |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1431 static int |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1432 qf_parse_line( |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1433 qf_list_T *qfl, |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1434 char_u *linebuf, |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1435 int linelen, |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1436 efm_T *fmt_first, |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1437 qffields_T *fields) |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1438 { |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1439 efm_T *fmt_ptr; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1440 int idx = 0; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1441 char_u *tail = NULL; |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1442 int status; |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1443 |
13612
89223f5d5d12
patch 8.0.1678: errorformat "%r" implies "%>"
Christian Brabandt <cb@256bit.org>
parents:
13594
diff
changeset
|
1444 restofline: |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1445 // If there was no %> item start at the first pattern |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1446 if (fmt_start == NULL) |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1447 fmt_ptr = fmt_first; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1448 else |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1449 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1450 // Otherwise start from the last used pattern |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1451 fmt_ptr = fmt_start; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1452 fmt_start = NULL; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1453 } |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1454 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1455 // Try to match each part of 'errorformat' until we find a complete |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1456 // match or no match. |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1457 fields->valid = TRUE; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1458 for ( ; fmt_ptr != NULL; fmt_ptr = fmt_ptr->next) |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1459 { |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1460 idx = fmt_ptr->prefix; |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1461 status = qf_parse_get_fields(linebuf, linelen, fmt_ptr, fields, |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1462 qfl->qf_multiline, qfl->qf_multiscan, &tail); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1463 if (status == QF_NOMEM) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1464 return status; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1465 if (status == QF_OK) |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1466 break; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1467 } |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1468 qfl->qf_multiscan = FALSE; |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1469 |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1470 if (fmt_ptr == NULL || idx == 'D' || idx == 'X') |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1471 { |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1472 if (fmt_ptr != NULL) |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1473 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1474 // 'D' and 'X' directory specifiers |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1475 status = qf_parse_dir_pfx(idx, fields, qfl); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1476 if (status != QF_OK) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1477 return status; |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1478 } |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1479 |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1480 status = qf_parse_line_nomatch(linebuf, linelen, fields); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1481 if (status != QF_OK) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1482 return status; |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1483 |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1484 if (fmt_ptr == NULL) |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1485 qfl->qf_multiline = qfl->qf_multiignore = FALSE; |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1486 } |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1487 else if (fmt_ptr != NULL) |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1488 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1489 // honor %> item |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1490 if (fmt_ptr->conthere) |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1491 fmt_start = fmt_ptr; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1492 |
20729
ada6f26e6eb1
patch 8.2.0917: quickfix entries do not suport a "note" type
Bram Moolenaar <Bram@vim.org>
parents:
20631
diff
changeset
|
1493 if (vim_strchr((char_u *)"AEWIN", idx) != NULL) |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1494 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1495 qfl->qf_multiline = TRUE; // start of a multi-line message |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1496 qfl->qf_multiignore = FALSE;// reset continuation |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1497 } |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1498 else if (vim_strchr((char_u *)"CZ", idx) != NULL) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1499 { // continuation of multi-line msg |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1500 status = qf_parse_multiline_pfx(idx, qfl, fields); |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1501 if (status != QF_OK) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1502 return status; |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1503 } |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1504 else if (vim_strchr((char_u *)"OPQ", idx) != NULL) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1505 { // global file names |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1506 status = qf_parse_file_pfx(idx, fields, qfl, tail); |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1507 if (status == QF_MULTISCAN) |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1508 goto restofline; |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1509 } |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1510 if (fmt_ptr->flags == '-') // generally exclude this line |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1511 { |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1512 if (qfl->qf_multiline) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1513 // also exclude continuation lines |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1514 qfl->qf_multiignore = TRUE; |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1515 return QF_IGNORE_LINE; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1516 } |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1517 } |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1518 |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1519 return QF_OK; |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1520 } |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1521 |
9033
0536d1469b67
commit https://github.com/vim/vim/commit/6be8c8e165204b8aa4eeb8a52be87a58d8b41b9e
Christian Brabandt <cb@256bit.org>
parents:
8932
diff
changeset
|
1522 /* |
14887
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
1523 * Returns TRUE if the specified quickfix/location stack is empty |
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
1524 */ |
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
1525 static int |
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
1526 qf_stack_empty(qf_info_T *qi) |
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
1527 { |
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
1528 return qi == NULL || qi->qf_listcount <= 0; |
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
1529 } |
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
1530 |
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
1531 /* |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1532 * Returns TRUE if the specified quickfix/location list is empty. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1533 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1534 static int |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1535 qf_list_empty(qf_list_T *qfl) |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1536 { |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1537 return qfl == NULL || qfl->qf_count <= 0; |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1538 } |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1539 |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1540 /* |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
1541 * Returns TRUE if the specified quickfix/location list is not empty and |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
1542 * has valid entries. |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
1543 */ |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
1544 static int |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
1545 qf_list_has_valid_entries(qf_list_T *qfl) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
1546 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
1547 return !qf_list_empty(qfl) && !qfl->qf_nonevalid; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
1548 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
1549 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
1550 /* |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1551 * Return a pointer to a list in the specified quickfix stack |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1552 */ |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1553 static qf_list_T * |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1554 qf_get_list(qf_info_T *qi, int idx) |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1555 { |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1556 return &qi->qf_lists[idx]; |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1557 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1558 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
1559 /* |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1560 * Allocate the fields used for parsing lines and populating a quickfix list. |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1561 */ |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1562 static int |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1563 qf_alloc_fields(qffields_T *pfields) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1564 { |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1565 pfields->namebuf = alloc_id(CMDBUFFSIZE + 1, aid_qf_namebuf); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1566 pfields->module = alloc_id(CMDBUFFSIZE + 1, aid_qf_module); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1567 pfields->errmsglen = CMDBUFFSIZE + 1; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1568 pfields->errmsg = alloc_id(pfields->errmsglen, aid_qf_errmsg); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1569 pfields->pattern = alloc_id(CMDBUFFSIZE + 1, aid_qf_pattern); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1570 if (pfields->namebuf == NULL || pfields->errmsg == NULL |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1571 || pfields->pattern == NULL || pfields->module == NULL) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1572 return FAIL; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1573 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1574 return OK; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1575 } |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1576 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1577 /* |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1578 * Free the fields used for parsing lines and populating a quickfix list. |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1579 */ |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1580 static void |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1581 qf_free_fields(qffields_T *pfields) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1582 { |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1583 vim_free(pfields->namebuf); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1584 vim_free(pfields->module); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1585 vim_free(pfields->errmsg); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1586 vim_free(pfields->pattern); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1587 } |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1588 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1589 /* |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1590 * Setup the state information used for parsing lines and populating a |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1591 * quickfix list. |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1592 */ |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1593 static int |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1594 qf_setup_state( |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1595 qfstate_T *pstate, |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1596 char_u *enc, |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1597 char_u *efile, |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1598 typval_T *tv, |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1599 buf_T *buf, |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1600 linenr_T lnumfirst, |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1601 linenr_T lnumlast) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1602 { |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1603 pstate->vc.vc_type = CONV_NONE; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1604 if (enc != NULL && *enc != NUL) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1605 convert_setup(&pstate->vc, enc, p_enc); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1606 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1607 if (efile != NULL && (pstate->fd = mch_fopen((char *)efile, "r")) == NULL) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1608 { |
25306
078edc1821bf
patch 8.2.3190: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
25302
diff
changeset
|
1609 semsg(_(e_cant_open_errorfile_str), efile); |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1610 return FAIL; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1611 } |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1612 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1613 if (tv != NULL) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1614 { |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1615 if (tv->v_type == VAR_STRING) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1616 pstate->p_str = tv->vval.v_string; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1617 else if (tv->v_type == VAR_LIST) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1618 pstate->p_li = tv->vval.v_list->lv_first; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1619 pstate->tv = tv; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1620 } |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1621 pstate->buf = buf; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1622 pstate->buflnum = lnumfirst; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1623 pstate->lnumlast = lnumlast; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1624 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1625 return OK; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1626 } |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1627 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1628 /* |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1629 * Cleanup the state information used for parsing lines and populating a |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1630 * quickfix list. |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1631 */ |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1632 static void |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1633 qf_cleanup_state(qfstate_T *pstate) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1634 { |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1635 if (pstate->fd != NULL) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1636 fclose(pstate->fd); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1637 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1638 vim_free(pstate->growbuf); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1639 if (pstate->vc.vc_type != CONV_NONE) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1640 convert_setup(&pstate->vc, NULL, NULL); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1641 } |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1642 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1643 /* |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1644 * Process the next line from a file/buffer/list/string and add it |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1645 * to the quickfix list 'qfl'. |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1646 */ |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1647 static int |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1648 qf_init_process_nextline( |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1649 qf_list_T *qfl, |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1650 efm_T *fmt_first, |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1651 qfstate_T *state, |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1652 qffields_T *fields) |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1653 { |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1654 int status; |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1655 |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1656 // Get the next line from a file/buffer/list/string |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1657 status = qf_get_nextline(state); |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1658 if (status != QF_OK) |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1659 return status; |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1660 |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1661 status = qf_parse_line(qfl, state->linebuf, state->linelen, |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1662 fmt_first, fields); |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1663 if (status != QF_OK) |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1664 return status; |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1665 |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1666 return qf_add_entry(qfl, |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1667 qfl->qf_directory, |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1668 (*fields->namebuf || qfl->qf_directory != NULL) |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1669 ? fields->namebuf |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1670 : ((qfl->qf_currfile != NULL && fields->valid) |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1671 ? qfl->qf_currfile : (char_u *)NULL), |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1672 fields->module, |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1673 0, |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1674 fields->errmsg, |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1675 fields->lnum, |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
1676 fields->end_lnum, |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1677 fields->col, |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
1678 fields->end_col, |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1679 fields->use_viscol, |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1680 fields->pattern, |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1681 fields->enr, |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1682 fields->type, |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1683 fields->valid); |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1684 } |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1685 |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1686 /* |
41 | 1687 * Read the errorfile "efile" into memory, line by line, building the error |
1688 * list. | |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
1689 * Alternative: when "efile" is NULL read errors from buffer "buf". |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
1690 * Alternative: when "tv" is not NULL get errors from the string or list. |
41 | 1691 * Always use 'errorformat' from "buf" if there is a local value. |
2411
68e394361ca3
Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens)
Bram Moolenaar <bram@vim.org>
parents:
2296
diff
changeset
|
1692 * Then "lnumfirst" and "lnumlast" specify the range of lines to use. |
68e394361ca3
Add "q" item for 'statusline'. Add w:quickfix_title. (Lech Lorens)
Bram Moolenaar <bram@vim.org>
parents:
2296
diff
changeset
|
1693 * Set the title of the list to "qf_title". |
41 | 1694 * Return -1 for error, number of errors for success. |
1695 */ | |
1696 static int | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
1697 qf_init_ext( |
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
1698 qf_info_T *qi, |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1699 int qf_idx, |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
1700 char_u *efile, |
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
1701 buf_T *buf, |
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
1702 typval_T *tv, |
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
1703 char_u *errorformat, |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1704 int newlist, // TRUE: start a new error list |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1705 linenr_T lnumfirst, // first line number to use |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1706 linenr_T lnumlast, // last line number to use |
11063
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
1707 char_u *qf_title, |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
1708 char_u *enc) |
41 | 1709 { |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1710 qf_list_T *qfl; |
11063
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
1711 qfstate_T state; |
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
1712 qffields_T fields; |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
1713 qfline_T *old_last = NULL; |
10369
4e5b307638cb
commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129
Christian Brabandt <cb@256bit.org>
parents:
10367
diff
changeset
|
1714 int adding = FALSE; |
9397
e08e8b00fe48
commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
1715 static efm_T *fmt_first = NULL; |
7 | 1716 char_u *efm; |
9397
e08e8b00fe48
commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
1717 static char_u *last_efm = NULL; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1718 int retval = -1; // default: return error flag |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
1719 int status; |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1720 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1721 // Do not used the cached buffer, it may have been wiped out. |
13244
ac42c4b11dbc
patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents:
13115
diff
changeset
|
1722 VIM_CLEAR(qf_last_bufname); |
11443
30b3775addb2
patch 8.0.0605: the quickfix cached buffer may become invalid
Christian Brabandt <cb@256bit.org>
parents:
11426
diff
changeset
|
1723 |
20007
aadd1cae2ff5
patch 8.2.0559: clearing a struct is verbose
Bram Moolenaar <Bram@vim.org>
parents:
19934
diff
changeset
|
1724 CLEAR_FIELD(state); |
aadd1cae2ff5
patch 8.2.0559: clearing a struct is verbose
Bram Moolenaar <Bram@vim.org>
parents:
19934
diff
changeset
|
1725 CLEAR_FIELD(fields); |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1726 if ((qf_alloc_fields(&fields) == FAIL) || |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1727 (qf_setup_state(&state, enc, efile, tv, buf, |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1728 lnumfirst, lnumlast) == FAIL)) |
7 | 1729 goto qf_init_end; |
1730 | |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1731 if (newlist || qf_idx == qi->qf_listcount) |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1732 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1733 // make place for a new list |
3965 | 1734 qf_new_list(qi, qf_title); |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1735 qf_idx = qi->qf_curlist; |
16062
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
1736 qfl = qf_get_list(qi, qf_idx); |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1737 } |
11609
6f11697fb92c
patch 8.0.0687: minor issues related to quickfix
Christian Brabandt <cb@256bit.org>
parents:
11589
diff
changeset
|
1738 else |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
1739 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1740 // Adding to existing list, use last entry. |
10369
4e5b307638cb
commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129
Christian Brabandt <cb@256bit.org>
parents:
10367
diff
changeset
|
1741 adding = TRUE; |
16062
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
1742 qfl = qf_get_list(qi, qf_idx); |
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
1743 if (!qf_list_empty(qfl)) |
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
1744 old_last = qfl->qf_last; |
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
1745 } |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1746 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1747 // Use the local value of 'errorformat' if it's set. |
446 | 1748 if (errorformat == p_efm && tv == NULL && *buf->b_p_efm != NUL) |
41 | 1749 efm = buf->b_p_efm; |
7 | 1750 else |
1751 efm = errorformat; | |
9365
3830a92c12bf
commit https://github.com/vim/vim/commit/688e3d1fd9b9129a5ba0e0d599ccfe6f4443daf3
Christian Brabandt <cb@256bit.org>
parents:
9334
diff
changeset
|
1752 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1753 // If the errorformat didn't change between calls, then reuse the |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1754 // previously parsed values. |
9397
e08e8b00fe48
commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
1755 if (last_efm == NULL || (STRCMP(last_efm, efm) != 0)) |
e08e8b00fe48
commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
1756 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1757 // free the previously parsed data |
13244
ac42c4b11dbc
patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents:
13115
diff
changeset
|
1758 VIM_CLEAR(last_efm); |
9397
e08e8b00fe48
commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
1759 free_efm_list(&fmt_first); |
e08e8b00fe48
commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
1760 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1761 // parse the current 'efm' |
9397
e08e8b00fe48
commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
1762 fmt_first = parse_efm_option(efm); |
e08e8b00fe48
commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
1763 if (fmt_first != NULL) |
e08e8b00fe48
commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
1764 last_efm = vim_strsave(efm); |
e08e8b00fe48
commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
1765 } |
e08e8b00fe48
commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
1766 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1767 if (fmt_first == NULL) // nothing found |
7 | 1768 goto error2; |
1769 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1770 // got_int is reset here, because it was probably set when killing the |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1771 // ":make" command, but we still want to read the errorfile then. |
7 | 1772 got_int = FALSE; |
1773 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1774 // Read the lines in the error file one by one. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1775 // Try to recognize one of the error formats in each line. |
41 | 1776 while (!got_int) |
7 | 1777 { |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1778 status = qf_init_process_nextline(qfl, fmt_first, &state, &fields); |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1779 if (status == QF_NOMEM) // memory alloc failure |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
1780 goto qf_init_end; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1781 if (status == QF_END_OF_INPUT) // end of input |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
1782 break; |
9568
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1783 if (status == QF_FAIL) |
ccbd2e604e59
commit https://github.com/vim/vim/commit/e87e6dddc2b2a99572ec0db0833c052214c4fbd3
Christian Brabandt <cb@256bit.org>
parents:
9540
diff
changeset
|
1784 goto error2; |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
1785 |
7 | 1786 line_breakcheck(); |
1787 } | |
9531
50697f3b49d6
commit https://github.com/vim/vim/commit/e0d3797664c59afc9705808f86a7cf00fd6d874d
Christian Brabandt <cb@256bit.org>
parents:
9487
diff
changeset
|
1788 if (state.fd == NULL || !ferror(state.fd)) |
7 | 1789 { |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1790 if (qfl->qf_index == 0) |
7 | 1791 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1792 // no valid entry found |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1793 qfl->qf_ptr = qfl->qf_start; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1794 qfl->qf_index = 1; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1795 qfl->qf_nonevalid = TRUE; |
7 | 1796 } |
1797 else | |
1798 { | |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1799 qfl->qf_nonevalid = FALSE; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1800 if (qfl->qf_ptr == NULL) |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1801 qfl->qf_ptr = qfl->qf_start; |
7 | 1802 } |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1803 // return number of matches |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1804 retval = qfl->qf_count; |
9369
ce5b79b005ec
commit https://github.com/vim/vim/commit/bcf7772a23624edc0942120e564f6b4ac95604ad
Christian Brabandt <cb@256bit.org>
parents:
9365
diff
changeset
|
1805 goto qf_init_end; |
7 | 1806 } |
25320
1e6da8364a02
patch 8.2.3197: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
25306
diff
changeset
|
1807 emsg(_(e_error_while_reading_errorfile)); |
7 | 1808 error2: |
10369
4e5b307638cb
commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129
Christian Brabandt <cb@256bit.org>
parents:
10367
diff
changeset
|
1809 if (!adding) |
4e5b307638cb
commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129
Christian Brabandt <cb@256bit.org>
parents:
10367
diff
changeset
|
1810 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1811 // Error when creating a new list. Free the new list |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
1812 qf_free(qfl); |
10369
4e5b307638cb
commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129
Christian Brabandt <cb@256bit.org>
parents:
10367
diff
changeset
|
1813 qi->qf_listcount--; |
4e5b307638cb
commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129
Christian Brabandt <cb@256bit.org>
parents:
10367
diff
changeset
|
1814 if (qi->qf_curlist > 0) |
4e5b307638cb
commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129
Christian Brabandt <cb@256bit.org>
parents:
10367
diff
changeset
|
1815 --qi->qf_curlist; |
4e5b307638cb
commit https://github.com/vim/vim/commit/2b946c9f9b0e0fd805fb8f3e4c16e0a68ae13129
Christian Brabandt <cb@256bit.org>
parents:
10367
diff
changeset
|
1816 } |
9369
ce5b79b005ec
commit https://github.com/vim/vim/commit/bcf7772a23624edc0942120e564f6b4ac95604ad
Christian Brabandt <cb@256bit.org>
parents:
9365
diff
changeset
|
1817 qf_init_end: |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1818 if (qf_idx == qi->qf_curlist) |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
1819 qf_update_buffer(qi, old_last); |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1820 qf_cleanup_state(&state); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1821 qf_free_fields(&fields); |
7 | 1822 |
1823 return retval; | |
1824 } | |
1825 | |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1826 /* |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1827 * Read the errorfile "efile" into memory, line by line, building the error |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1828 * list. Set the error list's title to qf_title. |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1829 * Return -1 for error, number of errors for success. |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1830 */ |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1831 int |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1832 qf_init(win_T *wp, |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1833 char_u *efile, |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1834 char_u *errorformat, |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1835 int newlist, // TRUE: start a new error list |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1836 char_u *qf_title, |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1837 char_u *enc) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1838 { |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1839 qf_info_T *qi = &ql_info; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1840 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1841 if (wp != NULL) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1842 { |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1843 qi = ll_get_or_alloc_list(wp); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1844 if (qi == NULL) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1845 return FAIL; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1846 } |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1847 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1848 return qf_init_ext(qi, qi->qf_curlist, efile, curbuf, NULL, errorformat, |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1849 newlist, (linenr_T)0, (linenr_T)0, qf_title, enc); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1850 } |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1851 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
1852 /* |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1853 * Set the title of the specified quickfix list. Frees the previous title. |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1854 * Prepends ':' to the title. |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
1855 */ |
6079 | 1856 static void |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
1857 qf_store_title(qf_list_T *qfl, char_u *title) |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
1858 { |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
1859 VIM_CLEAR(qfl->qf_title); |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
1860 |
6079 | 1861 if (title != NULL) |
1862 { | |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
1863 char_u *p = alloc_id(STRLEN(title) + 2, aid_qf_title); |
6079 | 1864 |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
1865 qfl->qf_title = p; |
6079 | 1866 if (p != NULL) |
13921
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1867 STRCPY(p, title); |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1868 } |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1869 } |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1870 |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1871 /* |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1872 * The title of a quickfix/location list is set, by default, to the command |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1873 * that created the quickfix list with the ":" prefix. |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1874 * Create a quickfix list title string by prepending ":" to a user command. |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1875 * Returns a pointer to a static buffer with the title. |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1876 */ |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1877 static char_u * |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1878 qf_cmdtitle(char_u *cmd) |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1879 { |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1880 static char_u qftitle_str[IOSIZE]; |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1881 |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1882 vim_snprintf((char *)qftitle_str, IOSIZE, ":%s", (char *)cmd); |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
1883 return qftitle_str; |
6079 | 1884 } |
1885 | |
7 | 1886 /* |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
1887 * Return a pointer to the current list in the specified quickfix stack |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
1888 */ |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
1889 static qf_list_T * |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
1890 qf_get_curlist(qf_info_T *qi) |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
1891 { |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
1892 return qf_get_list(qi, qi->qf_curlist); |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
1893 } |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
1894 |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
1895 /* |
12084
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
1896 * Prepare for adding a new quickfix list. If the current list is in the |
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
1897 * middle of the stack, then all the following lists are freed and then |
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
1898 * the new list is added. |
7 | 1899 */ |
1900 static void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
1901 qf_new_list(qf_info_T *qi, char_u *qf_title) |
7 | 1902 { |
1903 int i; | |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
1904 qf_list_T *qfl; |
7 | 1905 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1906 // If the current entry is not the last entry, delete entries beyond |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1907 // the current entry. This makes it possible to browse in a tree-like |
18498
9e6d5a4abb1c
patch 8.1.2243: typos in comments
Bram Moolenaar <Bram@vim.org>
parents:
18452
diff
changeset
|
1908 // way with ":grep". |
644 | 1909 while (qi->qf_listcount > qi->qf_curlist + 1) |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
1910 qf_free(&qi->qf_lists[--qi->qf_listcount]); |
7 | 1911 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1912 // When the stack is full, remove to oldest entry |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1913 // Otherwise, add a new entry. |
644 | 1914 if (qi->qf_listcount == LISTCOUNT) |
7 | 1915 { |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
1916 qf_free(&qi->qf_lists[0]); |
7 | 1917 for (i = 1; i < LISTCOUNT; ++i) |
644 | 1918 qi->qf_lists[i - 1] = qi->qf_lists[i]; |
1919 qi->qf_curlist = LISTCOUNT - 1; | |
7 | 1920 } |
1921 else | |
644 | 1922 qi->qf_curlist = qi->qf_listcount++; |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
1923 qfl = qf_get_curlist(qi); |
20007
aadd1cae2ff5
patch 8.2.0559: clearing a struct is verbose
Bram Moolenaar <Bram@vim.org>
parents:
19934
diff
changeset
|
1924 CLEAR_POINTER(qfl); |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
1925 qf_store_title(qfl, qf_title); |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
1926 qfl->qfl_type = qi->qfl_type; |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
1927 qfl->qf_id = ++last_qf_id; |
7 | 1928 } |
1929 | |
644 | 1930 /* |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1931 * Queue location list stack delete request. |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1932 */ |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1933 static void |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1934 locstack_queue_delreq(qf_info_T *qi) |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1935 { |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1936 qf_delq_T *q; |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1937 |
16825
ce04ebdf26b8
patch 8.1.1414: alloc() returning "char_u *" causes a lot of type casts
Bram Moolenaar <Bram@vim.org>
parents:
16782
diff
changeset
|
1938 q = ALLOC_ONE(qf_delq_T); |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1939 if (q != NULL) |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1940 { |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1941 q->qi = qi; |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1942 q->next = qf_delq_head; |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1943 qf_delq_head = q; |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1944 } |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1945 } |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1946 |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
1947 /* |
15740
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1948 * Return the global quickfix stack window buffer number. |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1949 */ |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1950 int |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1951 qf_stack_get_bufnr(void) |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1952 { |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1953 return ql_info.qf_bufnr; |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1954 } |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1955 |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1956 /* |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1957 * Wipe the quickfix window buffer (if present) for the specified |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1958 * quickfix/location list. |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1959 */ |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1960 static void |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1961 wipe_qf_buffer(qf_info_T *qi) |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1962 { |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1963 buf_T *qfbuf; |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1964 |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1965 if (qi->qf_bufnr != INVALID_QFBUFNR) |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1966 { |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1967 qfbuf = buflist_findnr(qi->qf_bufnr); |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1968 if (qfbuf != NULL && qfbuf->b_nwindows == 0) |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1969 { |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1970 // If the quickfix buffer is not loaded in any window, then |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1971 // wipe the buffer. |
18886
050f5eaa9e50
patch 8.2.0004: get E685 and E931 if buffer reload is interrupted
Bram Moolenaar <Bram@vim.org>
parents:
18827
diff
changeset
|
1972 close_buffer(NULL, qfbuf, DOBUF_WIPE, FALSE, FALSE); |
15740
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1973 qi->qf_bufnr = INVALID_QFBUFNR; |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1974 } |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1975 } |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1976 } |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1977 |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
1978 /* |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
1979 * Free a location list stack |
644 | 1980 */ |
1981 static void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
1982 ll_free_all(qf_info_T **pqi) |
359 | 1983 { |
1984 int i; | |
644 | 1985 qf_info_T *qi; |
1986 | |
1987 qi = *pqi; | |
1988 if (qi == NULL) | |
1989 return; | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
1990 *pqi = NULL; // Remove reference to this list |
644 | 1991 |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
1992 // If the location list is still in use, then queue the delete request |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
1993 // to be processed later. |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
1994 if (quickfix_busy > 0) |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
1995 { |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
1996 locstack_queue_delreq(qi); |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
1997 return; |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
1998 } |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
1999 |
644 | 2000 qi->qf_refcount--; |
2001 if (qi->qf_refcount < 1) | |
2002 { | |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2003 // No references to this location list. |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
2004 // If the quickfix window buffer is loaded, then wipe it |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
2005 wipe_qf_buffer(qi); |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
2006 |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
2007 for (i = 0; i < qi->qf_listcount; ++i) |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
2008 qf_free(qf_get_list(qi, i)); |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
2009 vim_free(qi); |
644 | 2010 } |
359 | 2011 } |
644 | 2012 |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
2013 /* |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
2014 * Free all the quickfix/location lists in the stack. |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
2015 */ |
644 | 2016 void |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
2017 qf_free_all(win_T *wp) |
644 | 2018 { |
2019 int i; | |
2020 qf_info_T *qi = &ql_info; | |
2021 | |
2022 if (wp != NULL) | |
2023 { | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2024 // location list |
644 | 2025 ll_free_all(&wp->w_llist); |
2026 ll_free_all(&wp->w_llist_ref); | |
2027 } | |
2028 else | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2029 // quickfix list |
644 | 2030 for (i = 0; i < qi->qf_listcount; ++i) |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
2031 qf_free(qf_get_list(qi, i)); |
644 | 2032 } |
359 | 2033 |
7 | 2034 /* |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2035 * Delay freeing of location list stacks when the quickfix code is running. |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2036 * Used to avoid problems with autocmds freeing location list stacks when the |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2037 * quickfix code is still referencing the stack. |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2038 * Must always call decr_quickfix_busy() exactly once after this. |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2039 */ |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2040 static void |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2041 incr_quickfix_busy(void) |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2042 { |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2043 quickfix_busy++; |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2044 } |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2045 |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2046 /* |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2047 * Safe to free location list stacks. Process any delayed delete requests. |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2048 */ |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2049 static void |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2050 decr_quickfix_busy(void) |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2051 { |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2052 if (--quickfix_busy == 0) |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2053 { |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2054 // No longer referencing the location lists. Process all the pending |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2055 // delete requests. |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2056 while (qf_delq_head != NULL) |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2057 { |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2058 qf_delq_T *q = qf_delq_head; |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2059 |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2060 qf_delq_head = q->next; |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2061 ll_free_all(&q->qi); |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2062 vim_free(q); |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2063 } |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2064 } |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2065 #ifdef ABORT_ON_INTERNAL_ERROR |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2066 if (quickfix_busy < 0) |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2067 { |
15470
55ccc2d353bd
patch 8.1.0743: giving error messages is not flexible
Bram Moolenaar <Bram@vim.org>
parents:
15424
diff
changeset
|
2068 emsg("quickfix_busy has become negative"); |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2069 abort(); |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2070 } |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2071 #endif |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2072 } |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2073 |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2074 #if defined(EXITFREE) || defined(PROTO) |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2075 void |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2076 check_quickfix_busy(void) |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2077 { |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2078 if (quickfix_busy != 0) |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2079 { |
15470
55ccc2d353bd
patch 8.1.0743: giving error messages is not flexible
Bram Moolenaar <Bram@vim.org>
parents:
15424
diff
changeset
|
2080 semsg("quickfix_busy not zero on exit: %ld", (long)quickfix_busy); |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2081 # ifdef ABORT_ON_INTERNAL_ERROR |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2082 abort(); |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2083 # endif |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2084 } |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2085 } |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2086 #endif |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2087 |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2088 /* |
7 | 2089 * Add an entry to the end of the list of errors. |
27873
d1af65b322d0
patch 8.2.4462: not enough testing for quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27855
diff
changeset
|
2090 * Returns QF_OK on success or QF_FAIL on a memory allocation failure. |
7 | 2091 */ |
2092 static int | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
2093 qf_add_entry( |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
2094 qf_list_T *qfl, // quickfix list entry |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2095 char_u *dir, // optional directory name |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2096 char_u *fname, // file name or NULL |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2097 char_u *module, // module name or NULL |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2098 int bufnum, // buffer number or zero |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2099 char_u *mesg, // message |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2100 long lnum, // line number |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
2101 long end_lnum, // line number for end |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2102 int col, // column |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
2103 int end_col, // column for end |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2104 int vis_col, // using visual column |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2105 char_u *pattern, // search pattern |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2106 int nr, // error number |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2107 int type, // type character |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2108 int valid) // valid entry |
7 | 2109 { |
230 | 2110 qfline_T *qfp; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2111 qfline_T **lastp; // pointer to qf_last or NULL |
7 | 2112 |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
2113 if ((qfp = ALLOC_ONE_ID(qfline_T, aid_qf_qfline)) == NULL) |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
2114 return QF_FAIL; |
1065 | 2115 if (bufnum != 0) |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2116 { |
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2117 buf_T *buf = buflist_findnr(bufnum); |
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2118 |
1065 | 2119 qfp->qf_fnum = bufnum; |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2120 if (buf != NULL) |
9608
fa64afb99dda
commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504
Christian Brabandt <cb@256bit.org>
parents:
9579
diff
changeset
|
2121 buf->b_has_qf_entry |= |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
2122 IS_QF_LIST(qfl) ? BUF_HAS_QF_ENTRY : BUF_HAS_LL_ENTRY; |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2123 } |
1065 | 2124 else |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
2125 qfp->qf_fnum = qf_get_fnum(qfl, dir, fname); |
7 | 2126 if ((qfp->qf_text = vim_strsave(mesg)) == NULL) |
2127 { | |
2128 vim_free(qfp); | |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
2129 return QF_FAIL; |
7 | 2130 } |
2131 qfp->qf_lnum = lnum; | |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
2132 qfp->qf_end_lnum = end_lnum; |
7 | 2133 qfp->qf_col = col; |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
2134 qfp->qf_end_col = end_col; |
170 | 2135 qfp->qf_viscol = vis_col; |
230 | 2136 if (pattern == NULL || *pattern == NUL) |
2137 qfp->qf_pattern = NULL; | |
2138 else if ((qfp->qf_pattern = vim_strsave(pattern)) == NULL) | |
2139 { | |
2140 vim_free(qfp->qf_text); | |
2141 vim_free(qfp); | |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
2142 return QF_FAIL; |
230 | 2143 } |
13821
98274127d675
patch 8.0.1782: no simple way to label quickfix entries
Christian Brabandt <cb@256bit.org>
parents:
13819
diff
changeset
|
2144 if (module == NULL || *module == NUL) |
98274127d675
patch 8.0.1782: no simple way to label quickfix entries
Christian Brabandt <cb@256bit.org>
parents:
13819
diff
changeset
|
2145 qfp->qf_module = NULL; |
98274127d675
patch 8.0.1782: no simple way to label quickfix entries
Christian Brabandt <cb@256bit.org>
parents:
13819
diff
changeset
|
2146 else if ((qfp->qf_module = vim_strsave(module)) == NULL) |
98274127d675
patch 8.0.1782: no simple way to label quickfix entries
Christian Brabandt <cb@256bit.org>
parents:
13819
diff
changeset
|
2147 { |
98274127d675
patch 8.0.1782: no simple way to label quickfix entries
Christian Brabandt <cb@256bit.org>
parents:
13819
diff
changeset
|
2148 vim_free(qfp->qf_text); |
98274127d675
patch 8.0.1782: no simple way to label quickfix entries
Christian Brabandt <cb@256bit.org>
parents:
13819
diff
changeset
|
2149 vim_free(qfp->qf_pattern); |
98274127d675
patch 8.0.1782: no simple way to label quickfix entries
Christian Brabandt <cb@256bit.org>
parents:
13819
diff
changeset
|
2150 vim_free(qfp); |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
2151 return QF_FAIL; |
13821
98274127d675
patch 8.0.1782: no simple way to label quickfix entries
Christian Brabandt <cb@256bit.org>
parents:
13819
diff
changeset
|
2152 } |
7 | 2153 qfp->qf_nr = nr; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2154 if (type != 1 && !vim_isprintc(type)) // only printable chars allowed |
7 | 2155 type = 0; |
2156 qfp->qf_type = type; | |
2157 qfp->qf_valid = valid; | |
2158 | |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2159 lastp = &qfl->qf_last; |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
2160 if (qf_list_empty(qfl)) // first element in the list |
7 | 2161 { |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2162 qfl->qf_start = qfp; |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2163 qfl->qf_ptr = qfp; |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2164 qfl->qf_index = 0; |
9195
543f068f3706
commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa
Christian Brabandt <cb@256bit.org>
parents:
9175
diff
changeset
|
2165 qfp->qf_prev = NULL; |
7 | 2166 } |
2167 else | |
2168 { | |
9195
543f068f3706
commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa
Christian Brabandt <cb@256bit.org>
parents:
9175
diff
changeset
|
2169 qfp->qf_prev = *lastp; |
543f068f3706
commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa
Christian Brabandt <cb@256bit.org>
parents:
9175
diff
changeset
|
2170 (*lastp)->qf_next = qfp; |
7 | 2171 } |
9195
543f068f3706
commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa
Christian Brabandt <cb@256bit.org>
parents:
9175
diff
changeset
|
2172 qfp->qf_next = NULL; |
7 | 2173 qfp->qf_cleared = FALSE; |
9195
543f068f3706
commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa
Christian Brabandt <cb@256bit.org>
parents:
9175
diff
changeset
|
2174 *lastp = qfp; |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2175 ++qfl->qf_count; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2176 if (qfl->qf_index == 0 && qfp->qf_valid) // first valid entry |
7 | 2177 { |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2178 qfl->qf_index = qfl->qf_count; |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2179 qfl->qf_ptr = qfp; |
7 | 2180 } |
2181 | |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
2182 return QF_OK; |
7 | 2183 } |
2184 | |
2185 /* | |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
2186 * Allocate a new quickfix/location list stack |
644 | 2187 */ |
659 | 2188 static qf_info_T * |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
2189 qf_alloc_stack(qfltype_T qfltype) |
644 | 2190 { |
659 | 2191 qf_info_T *qi; |
2192 | |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
2193 qi = ALLOC_CLEAR_ONE_ID(qf_info_T, aid_qf_qfinfo); |
659 | 2194 if (qi != NULL) |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
2195 { |
659 | 2196 qi->qf_refcount++; |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
2197 qi->qfl_type = qfltype; |
15740
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
2198 qi->qf_bufnr = INVALID_QFBUFNR; |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
2199 } |
659 | 2200 return qi; |
644 | 2201 } |
2202 | |
2203 /* | |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2204 * Return the location list stack for window 'wp'. |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2205 * If not present, allocate a location list stack |
644 | 2206 */ |
2207 static qf_info_T * | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
2208 ll_get_or_alloc_list(win_T *wp) |
644 | 2209 { |
2210 if (IS_LL_WINDOW(wp)) | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2211 // For a location list window, use the referenced location list |
644 | 2212 return wp->w_llist_ref; |
2213 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2214 // For a non-location list window, w_llist_ref should not point to a |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2215 // location list. |
644 | 2216 ll_free_all(&wp->w_llist_ref); |
2217 | |
2218 if (wp->w_llist == NULL) | |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
2219 wp->w_llist = qf_alloc_stack(QFLT_LOCATION); // new location list |
644 | 2220 return wp->w_llist; |
2221 } | |
2222 | |
2223 /* | |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2224 * Get the quickfix/location list stack to use for the specified Ex command. |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2225 * For a location list command, returns the stack for the current window. If |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2226 * the location list is not found, then returns NULL and prints an error |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2227 * message if 'print_emsg' is TRUE. |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2228 */ |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2229 static qf_info_T * |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2230 qf_cmd_get_stack(exarg_T *eap, int print_emsg) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2231 { |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2232 qf_info_T *qi = &ql_info; |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2233 |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2234 if (is_loclist_cmd(eap->cmdidx)) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2235 { |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2236 qi = GET_LOC_LIST(curwin); |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2237 if (qi == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2238 { |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2239 if (print_emsg) |
26877
06a137af96f8
patch 8.2.3967: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26865
diff
changeset
|
2240 emsg(_(e_no_location_list)); |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2241 return NULL; |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2242 } |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2243 } |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2244 |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2245 return qi; |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2246 } |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2247 |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2248 /* |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2249 * Get the quickfix/location list stack to use for the specified Ex command. |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2250 * For a location list command, returns the stack for the current window. |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2251 * If the location list is not present, then allocates a new one. |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2252 * Returns NULL if the allocation fails. For a location list command, sets |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2253 * 'pwinp' to curwin. |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2254 */ |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2255 static qf_info_T * |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2256 qf_cmd_get_or_alloc_stack(exarg_T *eap, win_T **pwinp) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2257 { |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2258 qf_info_T *qi = &ql_info; |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2259 |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2260 if (is_loclist_cmd(eap->cmdidx)) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2261 { |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2262 qi = ll_get_or_alloc_list(curwin); |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2263 if (qi == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2264 return NULL; |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2265 *pwinp = curwin; |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2266 } |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2267 |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2268 return qi; |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2269 } |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2270 |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
2271 /* |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2272 * Copy location list entries from 'from_qfl' to 'to_qfl'. |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2273 */ |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2274 static int |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
2275 copy_loclist_entries(qf_list_T *from_qfl, qf_list_T *to_qfl) |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2276 { |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2277 int i; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2278 qfline_T *from_qfp; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2279 qfline_T *prevp; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2280 |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2281 // copy all the location entries in this list |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
2282 FOR_ALL_QFL_ITEMS(from_qfl, from_qfp, i) |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2283 { |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
2284 if (qf_add_entry(to_qfl, |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2285 NULL, |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2286 NULL, |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2287 from_qfp->qf_module, |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2288 0, |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2289 from_qfp->qf_text, |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2290 from_qfp->qf_lnum, |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
2291 from_qfp->qf_end_lnum, |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2292 from_qfp->qf_col, |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
2293 from_qfp->qf_end_col, |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2294 from_qfp->qf_viscol, |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2295 from_qfp->qf_pattern, |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2296 from_qfp->qf_nr, |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2297 0, |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
2298 from_qfp->qf_valid) == QF_FAIL) |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2299 return FAIL; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2300 |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2301 // qf_add_entry() will not set the qf_num field, as the |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2302 // directory and file names are not supplied. So the qf_fnum |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2303 // field is copied here. |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2304 prevp = to_qfl->qf_last; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2305 prevp->qf_fnum = from_qfp->qf_fnum; // file number |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2306 prevp->qf_type = from_qfp->qf_type; // error type |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2307 if (from_qfl->qf_ptr == from_qfp) |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2308 to_qfl->qf_ptr = prevp; // current location |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2309 } |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2310 |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2311 return OK; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2312 } |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2313 |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2314 /* |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2315 * Copy the specified location list 'from_qfl' to 'to_qfl'. |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2316 */ |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2317 static int |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
2318 copy_loclist(qf_list_T *from_qfl, qf_list_T *to_qfl) |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2319 { |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2320 // Some of the fields are populated by qf_add_entry() |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
2321 to_qfl->qfl_type = from_qfl->qfl_type; |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2322 to_qfl->qf_nonevalid = from_qfl->qf_nonevalid; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2323 to_qfl->qf_count = 0; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2324 to_qfl->qf_index = 0; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2325 to_qfl->qf_start = NULL; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2326 to_qfl->qf_last = NULL; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2327 to_qfl->qf_ptr = NULL; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2328 if (from_qfl->qf_title != NULL) |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2329 to_qfl->qf_title = vim_strsave(from_qfl->qf_title); |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2330 else |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2331 to_qfl->qf_title = NULL; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2332 if (from_qfl->qf_ctx != NULL) |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2333 { |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2334 to_qfl->qf_ctx = alloc_tv(); |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2335 if (to_qfl->qf_ctx != NULL) |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2336 copy_tv(from_qfl->qf_ctx, to_qfl->qf_ctx); |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2337 } |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2338 else |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2339 to_qfl->qf_ctx = NULL; |
28451
e015d650ea9f
patch 8.2.4750: small pieces of dead code
Bram Moolenaar <Bram@vim.org>
parents:
28315
diff
changeset
|
2340 if (from_qfl->qf_qftf_cb.cb_name != NULL) |
e015d650ea9f
patch 8.2.4750: small pieces of dead code
Bram Moolenaar <Bram@vim.org>
parents:
28315
diff
changeset
|
2341 copy_callback(&to_qfl->qf_qftf_cb, &from_qfl->qf_qftf_cb); |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
2342 else |
28451
e015d650ea9f
patch 8.2.4750: small pieces of dead code
Bram Moolenaar <Bram@vim.org>
parents:
28315
diff
changeset
|
2343 to_qfl->qf_qftf_cb.cb_name = NULL; |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2344 |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2345 if (from_qfl->qf_count) |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
2346 if (copy_loclist_entries(from_qfl, to_qfl) == FAIL) |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2347 return FAIL; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2348 |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2349 to_qfl->qf_index = from_qfl->qf_index; // current index in the list |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2350 |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2351 // Assign a new ID for the location list |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2352 to_qfl->qf_id = ++last_qf_id; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2353 to_qfl->qf_changedtick = 0L; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2354 |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2355 // When no valid entries are present in the list, qf_ptr points to |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2356 // the first item in the list |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2357 if (to_qfl->qf_nonevalid) |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2358 { |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2359 to_qfl->qf_ptr = to_qfl->qf_start; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2360 to_qfl->qf_index = 1; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2361 } |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2362 |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2363 return OK; |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2364 } |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2365 |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2366 /* |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2367 * Copy the location list stack 'from' window to 'to' window. |
644 | 2368 */ |
2369 void | |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2370 copy_loclist_stack(win_T *from, win_T *to) |
644 | 2371 { |
2372 qf_info_T *qi; | |
2373 int idx; | |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2374 |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2375 // When copying from a location list window, copy the referenced |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2376 // location list. For other windows, copy the location list for |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2377 // that window. |
644 | 2378 if (IS_LL_WINDOW(from)) |
2379 qi = from->w_llist_ref; | |
2380 else | |
2381 qi = from->w_llist; | |
2382 | |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2383 if (qi == NULL) // no location list to copy |
644 | 2384 return; |
2385 | |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2386 // allocate a new location list |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
2387 if ((to->w_llist = qf_alloc_stack(QFLT_LOCATION)) == NULL) |
644 | 2388 return; |
2389 | |
2390 to->w_llist->qf_listcount = qi->qf_listcount; | |
2391 | |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2392 // Copy the location lists one at a time |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
2393 for (idx = 0; idx < qi->qf_listcount; ++idx) |
644 | 2394 { |
2395 to->w_llist->qf_curlist = idx; | |
2396 | |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
2397 if (copy_loclist(qf_get_list(qi, idx), |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
2398 qf_get_list(to->w_llist, idx)) == FAIL) |
644 | 2399 { |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2400 qf_free_all(to); |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2401 return; |
644 | 2402 } |
14844
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2403 } |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2404 |
a74786d0370c
patch 8.1.0434: copy_loclist() is too long
Christian Brabandt <cb@256bit.org>
parents:
14838
diff
changeset
|
2405 to->w_llist->qf_curlist = qi->qf_curlist; // current list |
644 | 2406 } |
2407 | |
2408 /* | |
10379
73e2a7abe2a3
commit https://github.com/vim/vim/commit/7618e00d3b8bfe064cfc524640d754607361f9df
Christian Brabandt <cb@256bit.org>
parents:
10369
diff
changeset
|
2409 * Get buffer number for file "directory/fname". |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2410 * Also sets the b_has_qf_entry flag. |
7 | 2411 */ |
2412 static int | |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
2413 qf_get_fnum(qf_list_T *qfl, char_u *directory, char_u *fname) |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
2414 { |
9473
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2415 char_u *ptr = NULL; |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2416 buf_T *buf; |
9473
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2417 char_u *bufname; |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2418 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2419 if (fname == NULL || *fname == NUL) // no file name |
7 | 2420 return 0; |
2421 | |
2823 | 2422 #ifdef VMS |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2423 vms_remove_version(fname); |
2823 | 2424 #endif |
2425 #ifdef BACKSLASH_IN_FILENAME | |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2426 if (directory != NULL) |
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2427 slash_adjust(directory); |
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2428 slash_adjust(fname); |
2823 | 2429 #endif |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2430 if (directory != NULL && !vim_isAbsName(fname) |
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2431 && (ptr = concat_fnames(directory, fname, TRUE)) != NULL) |
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2432 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2433 // Here we check if the file really exists. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2434 // This should normally be true, but if make works without |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2435 // "leaving directory"-messages we might have missed a |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2436 // directory change. |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2437 if (mch_getperm(ptr) < 0) |
7 | 2438 { |
2439 vim_free(ptr); | |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
2440 directory = qf_guess_filepath(qfl, fname); |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2441 if (directory) |
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2442 ptr = concat_fnames(directory, fname, TRUE); |
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2443 else |
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2444 ptr = vim_strsave(fname); |
7 | 2445 } |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2446 // Use concatenated directory name and file name |
9473
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2447 bufname = ptr; |
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2448 } |
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2449 else |
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2450 bufname = fname; |
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2451 |
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2452 if (qf_last_bufname != NULL && STRCMP(bufname, qf_last_bufname) == 0 |
9475
4d8f7f8da90c
commit https://github.com/vim/vim/commit/b25f9a97e9aad3cbb4bc3fe87cdbd5700f8aa0c6
Christian Brabandt <cb@256bit.org>
parents:
9473
diff
changeset
|
2453 && bufref_valid(&qf_last_bufref)) |
9473
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2454 { |
9475
4d8f7f8da90c
commit https://github.com/vim/vim/commit/b25f9a97e9aad3cbb4bc3fe87cdbd5700f8aa0c6
Christian Brabandt <cb@256bit.org>
parents:
9473
diff
changeset
|
2455 buf = qf_last_bufref.br_buf; |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2456 vim_free(ptr); |
7 | 2457 } |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2458 else |
9473
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2459 { |
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2460 vim_free(qf_last_bufname); |
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2461 buf = buflist_new(bufname, NULL, (linenr_T)0, BLN_NOOPT); |
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2462 if (bufname == ptr) |
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2463 qf_last_bufname = bufname; |
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2464 else |
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2465 qf_last_bufname = vim_strsave(bufname); |
9475
4d8f7f8da90c
commit https://github.com/vim/vim/commit/b25f9a97e9aad3cbb4bc3fe87cdbd5700f8aa0c6
Christian Brabandt <cb@256bit.org>
parents:
9473
diff
changeset
|
2466 set_bufref(&qf_last_bufref, buf); |
9473
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2467 } |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2468 if (buf == NULL) |
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2469 return 0; |
9473
bdac1019552f
commit https://github.com/vim/vim/commit/8240433f48f7383c281ba2453cc55f10b8ec47d9
Christian Brabandt <cb@256bit.org>
parents:
9458
diff
changeset
|
2470 |
9608
fa64afb99dda
commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504
Christian Brabandt <cb@256bit.org>
parents:
9579
diff
changeset
|
2471 buf->b_has_qf_entry = |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
2472 IS_QF_LIST(qfl) ? BUF_HAS_QF_ENTRY : BUF_HAS_LL_ENTRY; |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
2473 return buf->b_fnum; |
7 | 2474 } |
2475 | |
2476 /* | |
9334
674f9e3ccd1a
commit https://github.com/vim/vim/commit/38df43bd13a2498cc96b3ddd9a20dd75126bd171
Christian Brabandt <cb@256bit.org>
parents:
9201
diff
changeset
|
2477 * Push dirbuf onto the directory stack and return pointer to actual dir or |
674f9e3ccd1a
commit https://github.com/vim/vim/commit/38df43bd13a2498cc96b3ddd9a20dd75126bd171
Christian Brabandt <cb@256bit.org>
parents:
9201
diff
changeset
|
2478 * NULL on error. |
7 | 2479 */ |
2480 static char_u * | |
9397
e08e8b00fe48
commit https://github.com/vim/vim/commit/361c8f0e517e41f1f1d34dae328044406fde80ac
Christian Brabandt <cb@256bit.org>
parents:
9389
diff
changeset
|
2481 qf_push_dir(char_u *dirbuf, struct dir_stack_T **stackptr, int is_file_stack) |
7 | 2482 { |
2483 struct dir_stack_T *ds_new; | |
2484 struct dir_stack_T *ds_ptr; | |
2485 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2486 // allocate new stack element and hook it in |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
2487 ds_new = ALLOC_ONE_ID(struct dir_stack_T, aid_qf_dirstack); |
7 | 2488 if (ds_new == NULL) |
2489 return NULL; | |
2490 | |
2491 ds_new->next = *stackptr; | |
2492 *stackptr = ds_new; | |
2493 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2494 // store directory on the stack |
7 | 2495 if (vim_isAbsName(dirbuf) |
2496 || (*stackptr)->next == NULL | |
28871
18604231a1d1
patch 8.2.4958: a couple conditions are always true
Bram Moolenaar <Bram@vim.org>
parents:
28457
diff
changeset
|
2497 || is_file_stack) |
7 | 2498 (*stackptr)->dirname = vim_strsave(dirbuf); |
2499 else | |
2500 { | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2501 // Okay we don't have an absolute path. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2502 // dirbuf must be a subdir of one of the directories on the stack. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2503 // Let's search... |
7 | 2504 ds_new = (*stackptr)->next; |
2505 (*stackptr)->dirname = NULL; | |
2506 while (ds_new) | |
2507 { | |
2508 vim_free((*stackptr)->dirname); | |
2509 (*stackptr)->dirname = concat_fnames(ds_new->dirname, dirbuf, | |
2510 TRUE); | |
2511 if (mch_isdir((*stackptr)->dirname) == TRUE) | |
2512 break; | |
2513 | |
2514 ds_new = ds_new->next; | |
2515 } | |
2516 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2517 // clean up all dirs we already left |
7 | 2518 while ((*stackptr)->next != ds_new) |
2519 { | |
2520 ds_ptr = (*stackptr)->next; | |
2521 (*stackptr)->next = (*stackptr)->next->next; | |
2522 vim_free(ds_ptr->dirname); | |
2523 vim_free(ds_ptr); | |
2524 } | |
2525 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2526 // Nothing found -> it must be on top level |
7 | 2527 if (ds_new == NULL) |
2528 { | |
2529 vim_free((*stackptr)->dirname); | |
2530 (*stackptr)->dirname = vim_strsave(dirbuf); | |
2531 } | |
2532 } | |
2533 | |
2534 if ((*stackptr)->dirname != NULL) | |
2535 return (*stackptr)->dirname; | |
2536 else | |
2537 { | |
2538 ds_ptr = *stackptr; | |
2539 *stackptr = (*stackptr)->next; | |
2540 vim_free(ds_ptr); | |
2541 return NULL; | |
2542 } | |
2543 } | |
2544 | |
2545 /* | |
2546 * pop dirbuf from the directory stack and return previous directory or NULL if | |
2547 * stack is empty | |
2548 */ | |
2549 static char_u * | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
2550 qf_pop_dir(struct dir_stack_T **stackptr) |
7 | 2551 { |
2552 struct dir_stack_T *ds_ptr; | |
2553 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2554 // TODO: Should we check if dirbuf is the directory on top of the stack? |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2555 // What to do if it isn't? |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2556 |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2557 // pop top element and free it |
7 | 2558 if (*stackptr != NULL) |
2559 { | |
2560 ds_ptr = *stackptr; | |
2561 *stackptr = (*stackptr)->next; | |
2562 vim_free(ds_ptr->dirname); | |
2563 vim_free(ds_ptr); | |
2564 } | |
2565 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2566 // return NEW top element as current dir or NULL if stack is empty |
7 | 2567 return *stackptr ? (*stackptr)->dirname : NULL; |
2568 } | |
2569 | |
2570 /* | |
2571 * clean up directory stack | |
2572 */ | |
2573 static void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
2574 qf_clean_dir_stack(struct dir_stack_T **stackptr) |
7 | 2575 { |
2576 struct dir_stack_T *ds_ptr; | |
2577 | |
2578 while ((ds_ptr = *stackptr) != NULL) | |
2579 { | |
2580 *stackptr = (*stackptr)->next; | |
2581 vim_free(ds_ptr->dirname); | |
2582 vim_free(ds_ptr); | |
2583 } | |
2584 } | |
2585 | |
2586 /* | |
2587 * Check in which directory of the directory stack the given file can be | |
2588 * found. | |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
2589 * Returns a pointer to the directory name or NULL if not found. |
7 | 2590 * Cleans up intermediate directory entries. |
2591 * | |
2592 * TODO: How to solve the following problem? | |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2593 * If we have this directory tree: |
7 | 2594 * ./ |
2595 * ./aa | |
2596 * ./aa/bb | |
2597 * ./bb | |
2598 * ./bb/x.c | |
2599 * and make says: | |
2600 * making all in aa | |
2601 * making all in bb | |
2602 * x.c:9: Error | |
2603 * Then qf_push_dir thinks we are in ./aa/bb, but we are in ./bb. | |
2604 * qf_guess_filepath will return NULL. | |
2605 */ | |
2606 static char_u * | |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2607 qf_guess_filepath(qf_list_T *qfl, char_u *filename) |
7 | 2608 { |
2609 struct dir_stack_T *ds_ptr; | |
2610 struct dir_stack_T *ds_tmp; | |
2611 char_u *fullname; | |
2612 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2613 // no dirs on the stack - there's nothing we can do |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
2614 if (qfl->qf_dir_stack == NULL) |
7 | 2615 return NULL; |
2616 | |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
2617 ds_ptr = qfl->qf_dir_stack->next; |
7 | 2618 fullname = NULL; |
2619 while (ds_ptr) | |
2620 { | |
2621 vim_free(fullname); | |
2622 fullname = concat_fnames(ds_ptr->dirname, filename, TRUE); | |
2623 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2624 // If concat_fnames failed, just go on. The worst thing that can happen |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2625 // is that we delete the entire stack. |
7 | 2626 if ((fullname != NULL) && (mch_getperm(fullname) >= 0)) |
2627 break; | |
2628 | |
2629 ds_ptr = ds_ptr->next; | |
2630 } | |
2631 | |
2632 vim_free(fullname); | |
2633 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2634 // clean up all dirs we already left |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
2635 while (qfl->qf_dir_stack->next != ds_ptr) |
7 | 2636 { |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
2637 ds_tmp = qfl->qf_dir_stack->next; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
2638 qfl->qf_dir_stack->next = qfl->qf_dir_stack->next->next; |
7 | 2639 vim_free(ds_tmp->dirname); |
2640 vim_free(ds_tmp); | |
2641 } | |
2642 | |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2643 return ds_ptr == NULL ? NULL : ds_ptr->dirname; |
7 | 2644 } |
2645 | |
2646 /* | |
13090
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2647 * Returns TRUE if a quickfix/location list with the given identifier exists. |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2648 */ |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2649 static int |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
2650 qflist_valid(win_T *wp, int_u qf_id) |
13090
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2651 { |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2652 qf_info_T *qi = &ql_info; |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2653 int i; |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2654 |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2655 if (wp != NULL) |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2656 { |
23865
e1643a1aa1a0
patch 8.2.2474: using freed memory when window is closed by autocommand
Bram Moolenaar <Bram@vim.org>
parents:
23778
diff
changeset
|
2657 if (!win_valid(wp)) |
e1643a1aa1a0
patch 8.2.2474: using freed memory when window is closed by autocommand
Bram Moolenaar <Bram@vim.org>
parents:
23778
diff
changeset
|
2658 return FALSE; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2659 qi = GET_LOC_LIST(wp); // Location list |
13090
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2660 if (qi == NULL) |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2661 return FALSE; |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2662 } |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2663 |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2664 for (i = 0; i < qi->qf_listcount; ++i) |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2665 if (qi->qf_lists[i].qf_id == qf_id) |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2666 return TRUE; |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2667 |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2668 return FALSE; |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2669 } |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2670 |
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
2671 /* |
14250
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
2672 * When loading a file from the quickfix, the autocommands may modify it. |
8702
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2673 * This may invalidate the current quickfix entry. This function checks |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2674 * whether an entry is still present in the quickfix list. |
8702
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2675 * Similar to location list. |
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2676 */ |
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2677 static int |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2678 is_qf_entry_present(qf_list_T *qfl, qfline_T *qf_ptr) |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2679 { |
8702
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2680 qfline_T *qfp; |
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2681 int i; |
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2682 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2683 // Search for the entry in the current list |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
2684 FOR_ALL_QFL_ITEMS(qfl, qfp, i) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
2685 if (qfp == qf_ptr) |
8702
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2686 break; |
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2687 |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
2688 if (i > qfl->qf_count) // Entry is not found |
8702
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2689 return FALSE; |
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2690 |
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2691 return TRUE; |
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2692 } |
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2693 |
39d6e4f2f748
commit https://github.com/vim/vim/commit/ffec3c53496d49668669deabc0724ec78e2274fd
Christian Brabandt <cb@256bit.org>
parents:
8643
diff
changeset
|
2694 /* |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2695 * Get the next valid entry in the current quickfix/location list. The search |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
2696 * starts from the current entry. Returns NULL on failure. |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2697 */ |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2698 static qfline_T * |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2699 get_next_valid_entry( |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2700 qf_list_T *qfl, |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2701 qfline_T *qf_ptr, |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2702 int *qf_index, |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2703 int dir) |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2704 { |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2705 int idx; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2706 int old_qf_fnum; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2707 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2708 idx = *qf_index; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2709 old_qf_fnum = qf_ptr->qf_fnum; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2710 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2711 do |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2712 { |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2713 if (idx == qfl->qf_count || qf_ptr->qf_next == NULL) |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2714 return NULL; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2715 ++idx; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2716 qf_ptr = qf_ptr->qf_next; |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2717 } while ((!qfl->qf_nonevalid && !qf_ptr->qf_valid) |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2718 || (dir == FORWARD_FILE && qf_ptr->qf_fnum == old_qf_fnum)); |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2719 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2720 *qf_index = idx; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2721 return qf_ptr; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2722 } |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2723 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2724 /* |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2725 * Get the previous valid entry in the current quickfix/location list. The |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
2726 * search starts from the current entry. Returns NULL on failure. |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2727 */ |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2728 static qfline_T * |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2729 get_prev_valid_entry( |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2730 qf_list_T *qfl, |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2731 qfline_T *qf_ptr, |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2732 int *qf_index, |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2733 int dir) |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2734 { |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2735 int idx; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2736 int old_qf_fnum; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2737 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2738 idx = *qf_index; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2739 old_qf_fnum = qf_ptr->qf_fnum; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2740 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2741 do |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2742 { |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2743 if (idx == 1 || qf_ptr->qf_prev == NULL) |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2744 return NULL; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2745 --idx; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2746 qf_ptr = qf_ptr->qf_prev; |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2747 } while ((!qfl->qf_nonevalid && !qf_ptr->qf_valid) |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2748 || (dir == BACKWARD_FILE && qf_ptr->qf_fnum == old_qf_fnum)); |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2749 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2750 *qf_index = idx; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2751 return qf_ptr; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2752 } |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2753 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2754 /* |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2755 * Get the n'th (errornr) previous/next valid entry from the current entry in |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2756 * the quickfix list. |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2757 * dir == FORWARD or FORWARD_FILE: next valid entry |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2758 * dir == BACKWARD or BACKWARD_FILE: previous valid entry |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2759 */ |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2760 static qfline_T * |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2761 get_nth_valid_entry( |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2762 qf_list_T *qfl, |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2763 int errornr, |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2764 int dir, |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2765 int *new_qfidx) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2766 { |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2767 qfline_T *qf_ptr = qfl->qf_ptr; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2768 int qf_idx = qfl->qf_index; |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2769 qfline_T *prev_qf_ptr; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2770 int prev_index; |
26917
d91aea2a612c
patch 8.2.3987: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26913
diff
changeset
|
2771 char *err = e_no_more_items; |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2772 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2773 while (errornr--) |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2774 { |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2775 prev_qf_ptr = qf_ptr; |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2776 prev_index = qf_idx; |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2777 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2778 if (dir == FORWARD || dir == FORWARD_FILE) |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2779 qf_ptr = get_next_valid_entry(qfl, qf_ptr, &qf_idx, dir); |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2780 else |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2781 qf_ptr = get_prev_valid_entry(qfl, qf_ptr, &qf_idx, dir); |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2782 if (qf_ptr == NULL) |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2783 { |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2784 qf_ptr = prev_qf_ptr; |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2785 qf_idx = prev_index; |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2786 if (err != NULL) |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2787 { |
15470
55ccc2d353bd
patch 8.1.0743: giving error messages is not flexible
Bram Moolenaar <Bram@vim.org>
parents:
15424
diff
changeset
|
2788 emsg(_(err)); |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2789 return NULL; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2790 } |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2791 break; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2792 } |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2793 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2794 err = NULL; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2795 } |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2796 |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2797 *new_qfidx = qf_idx; |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2798 return qf_ptr; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2799 } |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2800 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2801 /* |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2802 * Get n'th (errornr) quickfix entry from the current entry in the quickfix |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2803 * list 'qfl'. Returns a pointer to the new entry and the index in 'new_qfidx' |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2804 */ |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2805 static qfline_T * |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2806 get_nth_entry(qf_list_T *qfl, int errornr, int *new_qfidx) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2807 { |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2808 qfline_T *qf_ptr = qfl->qf_ptr; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2809 int qf_idx = qfl->qf_index; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2810 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2811 // New error number is less than the current error number |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2812 while (errornr < qf_idx && qf_idx > 1 && qf_ptr->qf_prev != NULL) |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2813 { |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2814 --qf_idx; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2815 qf_ptr = qf_ptr->qf_prev; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2816 } |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2817 // New error number is greater than the current error number |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2818 while (errornr > qf_idx && qf_idx < qfl->qf_count && |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
2819 qf_ptr->qf_next != NULL) |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2820 { |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2821 ++qf_idx; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2822 qf_ptr = qf_ptr->qf_next; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2823 } |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2824 |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2825 *new_qfidx = qf_idx; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2826 return qf_ptr; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2827 } |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2828 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2829 /* |
19195
2ef19eed524a
patch 8.2.0156: various typos in source files and tests
Bram Moolenaar <Bram@vim.org>
parents:
18886
diff
changeset
|
2830 * Get a entry specified by 'errornr' and 'dir' from the current |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2831 * quickfix/location list. 'errornr' specifies the index of the entry and 'dir' |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2832 * specifies the direction (FORWARD/BACKWARD/FORWARD_FILE/BACKWARD_FILE). |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2833 * Returns a pointer to the entry and the index of the new entry is stored in |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2834 * 'new_qfidx'. |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2835 */ |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2836 static qfline_T * |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2837 qf_get_entry( |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2838 qf_list_T *qfl, |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2839 int errornr, |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2840 int dir, |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2841 int *new_qfidx) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2842 { |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2843 qfline_T *qf_ptr = qfl->qf_ptr; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2844 int qfidx = qfl->qf_index; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2845 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2846 if (dir != 0) // next/prev valid entry |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2847 qf_ptr = get_nth_valid_entry(qfl, errornr, dir, &qfidx); |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2848 else if (errornr != 0) // go to specified number |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2849 qf_ptr = get_nth_entry(qfl, errornr, &qfidx); |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2850 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
2851 *new_qfidx = qfidx; |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2852 return qf_ptr; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2853 } |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2854 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2855 /* |
26458
824fe105f5b9
patch 8.2.3759: quickfix buffer becomes hidden while still in a window
Bram Moolenaar <Bram@vim.org>
parents:
26364
diff
changeset
|
2856 * Find a window displaying a Vim help file in the current tab page. |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2857 */ |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2858 static win_T * |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2859 qf_find_help_win(void) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2860 { |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2861 win_T *wp; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2862 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2863 FOR_ALL_WINDOWS(wp) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2864 if (bt_help(wp->w_buffer)) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2865 return wp; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2866 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2867 return NULL; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2868 } |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2869 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2870 /* |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
2871 * Set the location list for the specified window to 'qi'. |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
2872 */ |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
2873 static void |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
2874 win_set_loclist(win_T *wp, qf_info_T *qi) |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
2875 { |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
2876 wp->w_llist = qi; |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
2877 qi->qf_refcount++; |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
2878 } |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
2879 |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
2880 /* |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
2881 * Find a help window or open one. If 'newwin' is TRUE, then open a new help |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
2882 * window. |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2883 */ |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2884 static int |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
2885 jump_to_help_window(qf_info_T *qi, int newwin, int *opened_window) |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2886 { |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2887 win_T *wp; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2888 int flags; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2889 |
22699
e82579016863
patch 8.2.1898: command modifier parsing always uses global cmdmod
Bram Moolenaar <Bram@vim.org>
parents:
22645
diff
changeset
|
2890 if (cmdmod.cmod_tab != 0 || newwin) |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2891 wp = NULL; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2892 else |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2893 wp = qf_find_help_win(); |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2894 if (wp != NULL && wp->w_buffer->b_nwindows > 0) |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2895 win_enter(wp, TRUE); |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2896 else |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2897 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2898 // Split off help window; put it at far top if no position |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2899 // specified, the current window is vertically split and narrow. |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2900 flags = WSP_HELP; |
22699
e82579016863
patch 8.2.1898: command modifier parsing always uses global cmdmod
Bram Moolenaar <Bram@vim.org>
parents:
22645
diff
changeset
|
2901 if (cmdmod.cmod_split == 0 && curwin->w_width != Columns |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2902 && curwin->w_width < 80) |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2903 flags |= WSP_TOP; |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
2904 // If the user asks to open a new window, then copy the location list. |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
2905 // Otherwise, don't copy the location list. |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
2906 if (IS_LL_STACK(qi) && !newwin) |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
2907 flags |= WSP_NEWLOC; |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2908 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2909 if (win_split(0, flags) == FAIL) |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2910 return FAIL; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2911 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2912 *opened_window = TRUE; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2913 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2914 if (curwin->w_height < p_hh) |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2915 win_setheight((int)p_hh); |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2916 |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
2917 // When using location list, the new window should use the supplied |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
2918 // location list. If the user asks to open a new window, then the new |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
2919 // window will get a copy of the location list. |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
2920 if (IS_LL_STACK(qi) && !newwin) |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
2921 win_set_loclist(curwin, qi); |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2922 } |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2923 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2924 if (!p_im) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2925 restart_edit = 0; // don't want insert mode in help file |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2926 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2927 return OK; |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2928 } |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2929 |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
2930 /* |
26458
824fe105f5b9
patch 8.2.3759: quickfix buffer becomes hidden while still in a window
Bram Moolenaar <Bram@vim.org>
parents:
26364
diff
changeset
|
2931 * Find a non-quickfix window using the given location list stack in the |
824fe105f5b9
patch 8.2.3759: quickfix buffer becomes hidden while still in a window
Bram Moolenaar <Bram@vim.org>
parents:
26364
diff
changeset
|
2932 * current tabpage. |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2933 * Returns NULL if a matching window is not found. |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2934 */ |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2935 static win_T * |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2936 qf_find_win_with_loclist(qf_info_T *ll) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2937 { |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2938 win_T *wp; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2939 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2940 FOR_ALL_WINDOWS(wp) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2941 if (wp->w_llist == ll && !bt_quickfix(wp->w_buffer)) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2942 return wp; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2943 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2944 return NULL; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2945 } |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2946 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2947 /* |
26458
824fe105f5b9
patch 8.2.3759: quickfix buffer becomes hidden while still in a window
Bram Moolenaar <Bram@vim.org>
parents:
26364
diff
changeset
|
2948 * Find a window containing a normal buffer in the current tab page. |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2949 */ |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2950 static win_T * |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2951 qf_find_win_with_normal_buf(void) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2952 { |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2953 win_T *wp; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2954 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2955 FOR_ALL_WINDOWS(wp) |
14433
4a94173743d9
patch 8.1.0230: directly checking 'buftype' value
Christian Brabandt <cb@256bit.org>
parents:
14397
diff
changeset
|
2956 if (bt_normal(wp->w_buffer)) |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2957 return wp; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2958 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2959 return NULL; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2960 } |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2961 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2962 /* |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2963 * Go to a window in any tabpage containing the specified file. Returns TRUE |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2964 * if successfully jumped to the window. Otherwise returns FALSE. |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2965 */ |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2966 static int |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2967 qf_goto_tabwin_with_file(int fnum) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2968 { |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2969 tabpage_T *tp; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2970 win_T *wp; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2971 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2972 FOR_ALL_TAB_WINDOWS(tp, wp) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2973 if (wp->w_buffer->b_fnum == fnum) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2974 { |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2975 goto_tabpage_win(tp, wp); |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2976 return TRUE; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2977 } |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2978 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2979 return FALSE; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2980 } |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2981 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2982 /* |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2983 * Create a new window to show a file above the quickfix window. Called when |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2984 * only the quickfix window is present. |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2985 */ |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2986 static int |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2987 qf_open_new_file_win(qf_info_T *ll_ref) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2988 { |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2989 int flags; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2990 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2991 flags = WSP_ABOVE; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2992 if (ll_ref != NULL) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2993 flags |= WSP_NEWLOC; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2994 if (win_split(0, flags) == FAIL) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2995 return FAIL; // not enough room for window |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
2996 p_swb = empty_option; // don't split again |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2997 swb_flags = 0; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2998 RESET_BINDING(curwin); |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
2999 if (ll_ref != NULL) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3000 // The new window should use the location list from the |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3001 // location list window |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
3002 win_set_loclist(curwin, ll_ref); |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3003 return OK; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3004 } |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3005 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3006 /* |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3007 * Go to a window that shows the right buffer. If the window is not found, go |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3008 * to the window just above the location list window. This is used for opening |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3009 * a file from a location window and not from a quickfix window. If some usable |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3010 * window is previously found, then it is supplied in 'use_win'. |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3011 */ |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3012 static void |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3013 qf_goto_win_with_ll_file(win_T *use_win, int qf_fnum, qf_info_T *ll_ref) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3014 { |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3015 win_T *win = use_win; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3016 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3017 if (win == NULL) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3018 { |
26458
824fe105f5b9
patch 8.2.3759: quickfix buffer becomes hidden while still in a window
Bram Moolenaar <Bram@vim.org>
parents:
26364
diff
changeset
|
3019 // Find the window showing the selected file in the current tab page. |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3020 FOR_ALL_WINDOWS(win) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3021 if (win->w_buffer->b_fnum == qf_fnum) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3022 break; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3023 if (win == NULL) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3024 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3025 // Find a previous usable window |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3026 win = curwin; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3027 do |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3028 { |
14433
4a94173743d9
patch 8.1.0230: directly checking 'buftype' value
Christian Brabandt <cb@256bit.org>
parents:
14397
diff
changeset
|
3029 if (bt_normal(win->w_buffer)) |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3030 break; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3031 if (win->w_prev == NULL) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3032 win = lastwin; // wrap around the top |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3033 else |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3034 win = win->w_prev; // go to previous window |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3035 } while (win != curwin); |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3036 } |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3037 } |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3038 win_goto(win); |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3039 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3040 // If the location list for the window is not set, then set it |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3041 // to the location list from the location window |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
3042 if (win->w_llist == NULL && ll_ref != NULL) |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
3043 win_set_loclist(win, ll_ref); |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3044 } |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3045 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3046 /* |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3047 * Go to a window that contains the specified buffer 'qf_fnum'. If a window is |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3048 * not found, then go to the window just above the quickfix window. This is |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3049 * used for opening a file from a quickfix window and not from a location |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3050 * window. |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3051 */ |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3052 static void |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3053 qf_goto_win_with_qfl_file(int qf_fnum) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3054 { |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3055 win_T *win; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3056 win_T *altwin; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3057 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3058 win = curwin; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3059 altwin = NULL; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3060 for (;;) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3061 { |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3062 if (win->w_buffer->b_fnum == qf_fnum) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3063 break; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3064 if (win->w_prev == NULL) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3065 win = lastwin; // wrap around the top |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3066 else |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3067 win = win->w_prev; // go to previous window |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3068 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3069 if (IS_QF_WINDOW(win)) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3070 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3071 // Didn't find it, go to the window before the quickfix |
18646
394abd397e15
patch 8.1.2315: not always using the right window when jumping to an error
Bram Moolenaar <Bram@vim.org>
parents:
18607
diff
changeset
|
3072 // window, unless 'switchbuf' contains 'uselast': in this case we |
394abd397e15
patch 8.1.2315: not always using the right window when jumping to an error
Bram Moolenaar <Bram@vim.org>
parents:
18607
diff
changeset
|
3073 // try to jump to the previously used window first. |
394abd397e15
patch 8.1.2315: not always using the right window when jumping to an error
Bram Moolenaar <Bram@vim.org>
parents:
18607
diff
changeset
|
3074 if ((swb_flags & SWB_USELAST) && win_valid(prevwin)) |
394abd397e15
patch 8.1.2315: not always using the right window when jumping to an error
Bram Moolenaar <Bram@vim.org>
parents:
18607
diff
changeset
|
3075 win = prevwin; |
394abd397e15
patch 8.1.2315: not always using the right window when jumping to an error
Bram Moolenaar <Bram@vim.org>
parents:
18607
diff
changeset
|
3076 else if (altwin != NULL) |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3077 win = altwin; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3078 else if (curwin->w_prev != NULL) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3079 win = curwin->w_prev; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3080 else |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3081 win = curwin->w_next; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3082 break; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3083 } |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3084 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3085 // Remember a usable window. |
14433
4a94173743d9
patch 8.1.0230: directly checking 'buftype' value
Christian Brabandt <cb@256bit.org>
parents:
14397
diff
changeset
|
3086 if (altwin == NULL && !win->w_p_pvw && bt_normal(win->w_buffer)) |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3087 altwin = win; |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3088 } |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3089 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3090 win_goto(win); |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3091 } |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3092 |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3093 /* |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3094 * Find a suitable window for opening a file (qf_fnum) from the |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3095 * quickfix/location list and jump to it. If the file is already opened in a |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3096 * window, jump to it. Otherwise open a new window to display the file. If |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3097 * 'newwin' is TRUE, then always open a new window. This is called from either |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3098 * a quickfix or a location list window. |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3099 */ |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3100 static int |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3101 qf_jump_to_usable_window(int qf_fnum, int newwin, int *opened_window) |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3102 { |
18656
022deb0adec9
patch 8.1.2320: insufficient test coverage for quickfix
Bram Moolenaar <Bram@vim.org>
parents:
18646
diff
changeset
|
3103 win_T *usable_wp = NULL; |
022deb0adec9
patch 8.1.2320: insufficient test coverage for quickfix
Bram Moolenaar <Bram@vim.org>
parents:
18646
diff
changeset
|
3104 int usable_win = FALSE; |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3105 qf_info_T *ll_ref = NULL; |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3106 |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3107 // If opening a new window, then don't use the location list referred by |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3108 // the current window. Otherwise two windows will refer to the same |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3109 // location list. |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3110 if (!newwin) |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3111 ll_ref = curwin->w_llist_ref; |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3112 |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3113 if (ll_ref != NULL) |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3114 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3115 // Find a non-quickfix window with this location list |
18656
022deb0adec9
patch 8.1.2320: insufficient test coverage for quickfix
Bram Moolenaar <Bram@vim.org>
parents:
18646
diff
changeset
|
3116 usable_wp = qf_find_win_with_loclist(ll_ref); |
022deb0adec9
patch 8.1.2320: insufficient test coverage for quickfix
Bram Moolenaar <Bram@vim.org>
parents:
18646
diff
changeset
|
3117 if (usable_wp != NULL) |
022deb0adec9
patch 8.1.2320: insufficient test coverage for quickfix
Bram Moolenaar <Bram@vim.org>
parents:
18646
diff
changeset
|
3118 usable_win = TRUE; |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3119 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3120 |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3121 if (!usable_win) |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3122 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3123 // Locate a window showing a normal buffer |
18656
022deb0adec9
patch 8.1.2320: insufficient test coverage for quickfix
Bram Moolenaar <Bram@vim.org>
parents:
18646
diff
changeset
|
3124 win_T *win = qf_find_win_with_normal_buf(); |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3125 if (win != NULL) |
18656
022deb0adec9
patch 8.1.2320: insufficient test coverage for quickfix
Bram Moolenaar <Bram@vim.org>
parents:
18646
diff
changeset
|
3126 usable_win = TRUE; |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3127 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3128 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3129 // If no usable window is found and 'switchbuf' contains "usetab" |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3130 // then search in other tabs. |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3131 if (!usable_win && (swb_flags & SWB_USETAB)) |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3132 usable_win = qf_goto_tabwin_with_file(qf_fnum); |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3133 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3134 // If there is only one window and it is the quickfix window, create a |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3135 // new one above the quickfix window. |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3136 if ((ONE_WINDOW && bt_quickfix(curbuf)) || !usable_win || newwin) |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3137 { |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3138 if (qf_open_new_file_win(ll_ref) != OK) |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3139 return FAIL; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3140 *opened_window = TRUE; // close it when fail |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3141 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3142 else |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3143 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3144 if (curwin->w_llist_ref != NULL) // In a location window |
18656
022deb0adec9
patch 8.1.2320: insufficient test coverage for quickfix
Bram Moolenaar <Bram@vim.org>
parents:
18646
diff
changeset
|
3145 qf_goto_win_with_ll_file(usable_wp, qf_fnum, ll_ref); |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3146 else // In a quickfix window |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3147 qf_goto_win_with_qfl_file(qf_fnum); |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3148 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3149 |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3150 return OK; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3151 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3152 |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3153 /* |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3154 * Edit the selected file or help file. |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3155 * Returns OK if successfully edited the file, FAIL on failing to open the |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3156 * buffer and NOTDONE if the quickfix/location list was freed by an autocmd |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3157 * when opening the buffer. |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3158 */ |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3159 static int |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3160 qf_jump_edit_buffer( |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3161 qf_info_T *qi, |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3162 qfline_T *qf_ptr, |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3163 int forceit, |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3164 int prev_winid, |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3165 int *opened_window) |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3166 { |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
3167 qf_list_T *qfl = qf_get_curlist(qi); |
22256
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3168 int old_changedtick = qfl->qf_changedtick; |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
3169 qfltype_T qfl_type = qfl->qfl_type; |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3170 int retval = OK; |
14956
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3171 int old_qf_curlist = qi->qf_curlist; |
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3172 int save_qfid = qfl->qf_id; |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3173 |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3174 if (qf_ptr->qf_type == 1) |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3175 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3176 // Open help file (do_ecmd() will set b_help flag, readfile() will |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3177 // set b_p_ro flag). |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3178 if (!can_abandon(curbuf, forceit)) |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3179 { |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3180 no_write_message(); |
14956
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3181 return FAIL; |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3182 } |
14956
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3183 |
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3184 retval = do_ecmd(qf_ptr->qf_fnum, NULL, NULL, NULL, (linenr_T)1, |
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3185 ECMD_HIDE + ECMD_SET_HELP, |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3186 prev_winid == curwin->w_id ? curwin : NULL); |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3187 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3188 else |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3189 retval = buflist_getfile(qf_ptr->qf_fnum, |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3190 (linenr_T)1, GETF_SETMARK | GETF_SWITCH, forceit); |
13090
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
3191 |
14956
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3192 // If a location list, check whether the associated window is still |
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3193 // present. |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3194 if (qfl_type == QFLT_LOCATION) |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3195 { |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3196 win_T *wp = win_id2wp(prev_winid); |
28247
f70015784777
patch 8.2.4649: various formatting problems
Bram Moolenaar <Bram@vim.org>
parents:
27974
diff
changeset
|
3197 |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3198 if (wp == NULL && curwin->w_llist != qi) |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3199 { |
26966
ac75c145f0a9
patch 8.2.4012: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26958
diff
changeset
|
3200 emsg(_(e_current_window_was_closed)); |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3201 *opened_window = FALSE; |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3202 return NOTDONE; |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3203 } |
14956
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3204 } |
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3205 |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
3206 if (qfl_type == QFLT_QUICKFIX && !qflist_valid(NULL, save_qfid)) |
14956
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3207 { |
22256
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3208 emsg(_(e_current_quickfix_list_was_changed)); |
14956
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3209 return NOTDONE; |
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3210 } |
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3211 |
22256
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3212 // Check if the list was changed. The pointers may happen to be identical, |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3213 // thus also check qf_changedtick. |
14956
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3214 if (old_qf_curlist != qi->qf_curlist |
22256
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3215 || old_changedtick != qfl->qf_changedtick |
14956
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3216 || !is_qf_entry_present(qfl, qf_ptr)) |
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3217 { |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
3218 if (qfl_type == QFLT_QUICKFIX) |
22256
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3219 emsg(_(e_current_quickfix_list_was_changed)); |
14956
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3220 else |
22256
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3221 emsg(_(e_current_location_list_was_changed)); |
14956
940def6df43f
patch 8.1.0489: crash when autocmd clears vimpgrep location list
Bram Moolenaar <Bram@vim.org>
parents:
14954
diff
changeset
|
3222 return NOTDONE; |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3223 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3224 |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3225 return retval; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3226 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3227 |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3228 /* |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3229 * Go to the error line in the current file using either line/column number or |
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
3230 * a search pattern. |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3231 */ |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3232 static void |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3233 qf_jump_goto_line( |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3234 linenr_T qf_lnum, |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3235 int qf_col, |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3236 char_u qf_viscol, |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3237 char_u *qf_pattern) |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3238 { |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3239 linenr_T i; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3240 |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3241 if (qf_pattern == NULL) |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3242 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3243 // Go to line with error, unless qf_lnum is 0. |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3244 i = qf_lnum; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3245 if (i > 0) |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3246 { |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3247 if (i > curbuf->b_ml.ml_line_count) |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3248 i = curbuf->b_ml.ml_line_count; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3249 curwin->w_cursor.lnum = i; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3250 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3251 if (qf_col > 0) |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3252 { |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3253 curwin->w_cursor.coladd = 0; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3254 if (qf_viscol == TRUE) |
15703
b8a2362073bb
patch 8.1.0859: "%v" in 'errorformat' does handle multi-byte characters
Bram Moolenaar <Bram@vim.org>
parents:
15641
diff
changeset
|
3255 coladvance(qf_col - 1); |
b8a2362073bb
patch 8.1.0859: "%v" in 'errorformat' does handle multi-byte characters
Bram Moolenaar <Bram@vim.org>
parents:
15641
diff
changeset
|
3256 else |
b8a2362073bb
patch 8.1.0859: "%v" in 'errorformat' does handle multi-byte characters
Bram Moolenaar <Bram@vim.org>
parents:
15641
diff
changeset
|
3257 curwin->w_cursor.col = qf_col - 1; |
14552
b298737a7188
patch 8.1.0289: cursor moves to wrong column after quickfix jump
Christian Brabandt <cb@256bit.org>
parents:
14550
diff
changeset
|
3258 curwin->w_set_curswant = TRUE; |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3259 check_cursor(); |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3260 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3261 else |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3262 beginline(BL_WHITE | BL_FIX); |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3263 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3264 else |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3265 { |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3266 pos_T save_cursor; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3267 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3268 // Move the cursor to the first line in the buffer |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3269 save_cursor = curwin->w_cursor; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3270 curwin->w_cursor.lnum = 0; |
19475
5512aa74cb62
patch 8.2.0295: highlighting for :s wrong when using different separator
Bram Moolenaar <Bram@vim.org>
parents:
19405
diff
changeset
|
3271 if (!do_search(NULL, '/', '/', qf_pattern, (long)1, SEARCH_KEEP, NULL)) |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3272 curwin->w_cursor = save_cursor; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3273 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3274 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3275 |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3276 /* |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3277 * Display quickfix list index and size message |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3278 */ |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3279 static void |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3280 qf_jump_print_msg( |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3281 qf_info_T *qi, |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3282 int qf_index, |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3283 qfline_T *qf_ptr, |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3284 buf_T *old_curbuf, |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3285 linenr_T old_lnum) |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3286 { |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3287 linenr_T i; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3288 int len; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3289 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3290 // Update the screen before showing the message, unless the screen |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3291 // scrolled up. |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3292 if (!msg_scrolled) |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3293 update_topline_redraw(); |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3294 sprintf((char *)IObuff, _("(%d of %d)%s%s: "), qf_index, |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
3295 qf_get_curlist(qi)->qf_count, |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3296 qf_ptr->qf_cleared ? _(" (line deleted)") : "", |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3297 (char *)qf_types(qf_ptr->qf_type, qf_ptr->qf_nr)); |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3298 // Add the message, skipping leading whitespace and newlines. |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3299 len = (int)STRLEN(IObuff); |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3300 qf_fmt_text(skipwhite(qf_ptr->qf_text), IObuff + len, IOSIZE - len); |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3301 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3302 // Output the message. Overwrite to avoid scrolling when the 'O' |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3303 // flag is present in 'shortmess'; But when not jumping, print the |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3304 // whole message. |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3305 i = msg_scroll; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3306 if (curbuf == old_curbuf && curwin->w_cursor.lnum == old_lnum) |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3307 msg_scroll = TRUE; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3308 else if (!msg_scrolled && shortmess(SHM_OVERALL)) |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3309 msg_scroll = FALSE; |
15543
dd725a8ab112
patch 8.1.0779: argument for message functions is inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
15490
diff
changeset
|
3310 msg_attr_keep((char *)IObuff, 0, TRUE); |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3311 msg_scroll = i; |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3312 } |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3313 |
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3314 /* |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3315 * Find a usable window for opening a file from the quickfix/location list. If |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3316 * a window is not found then open a new window. If 'newwin' is TRUE, then open |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3317 * a new window. |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3318 * Returns OK if successfully jumped or opened a window. Returns FAIL if not |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3319 * able to jump/open a window. Returns NOTDONE if a file is not associated |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3320 * with the entry. |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3321 */ |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3322 static int |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3323 qf_jump_open_window( |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3324 qf_info_T *qi, |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3325 qfline_T *qf_ptr, |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3326 int newwin, |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3327 int *opened_window) |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3328 { |
22256
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3329 qf_list_T *qfl = qf_get_curlist(qi); |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3330 int old_changedtick = qfl->qf_changedtick; |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3331 int old_qf_curlist = qi->qf_curlist; |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3332 qfltype_T qfl_type = qfl->qfl_type; |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3333 |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3334 // For ":helpgrep" find a help window or open one. |
22699
e82579016863
patch 8.2.1898: command modifier parsing always uses global cmdmod
Bram Moolenaar <Bram@vim.org>
parents:
22645
diff
changeset
|
3335 if (qf_ptr->qf_type == 1 && (!bt_help(curwin->w_buffer) |
e82579016863
patch 8.2.1898: command modifier parsing always uses global cmdmod
Bram Moolenaar <Bram@vim.org>
parents:
22645
diff
changeset
|
3336 || cmdmod.cmod_tab != 0)) |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3337 if (jump_to_help_window(qi, newwin, opened_window) == FAIL) |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3338 return FAIL; |
22256
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3339 if (old_qf_curlist != qi->qf_curlist |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3340 || old_changedtick != qfl->qf_changedtick |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3341 || !is_qf_entry_present(qfl, qf_ptr)) |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3342 { |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3343 if (qfl_type == QFLT_QUICKFIX) |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3344 emsg(_(e_current_quickfix_list_was_changed)); |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3345 else |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3346 emsg(_(e_current_location_list_was_changed)); |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3347 return FAIL; |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3348 } |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3349 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3350 // If currently in the quickfix window, find another window to show the |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3351 // file in. |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3352 if (bt_quickfix(curbuf) && !*opened_window) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3353 { |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3354 // If there is no file specified, we don't know where to go. |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3355 // But do advance, otherwise ":cn" gets stuck. |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3356 if (qf_ptr->qf_fnum == 0) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3357 return NOTDONE; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3358 |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3359 if (qf_jump_to_usable_window(qf_ptr->qf_fnum, newwin, |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3360 opened_window) == FAIL) |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3361 return FAIL; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3362 } |
22256
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3363 if (old_qf_curlist != qi->qf_curlist |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3364 || old_changedtick != qfl->qf_changedtick |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3365 || !is_qf_entry_present(qfl, qf_ptr)) |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3366 { |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3367 if (qfl_type == QFLT_QUICKFIX) |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3368 emsg(_(e_current_quickfix_list_was_changed)); |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3369 else |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3370 emsg(_(e_current_location_list_was_changed)); |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3371 return FAIL; |
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
3372 } |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3373 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3374 return OK; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3375 } |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3376 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3377 /* |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3378 * Edit a selected file from the quickfix/location list and jump to a |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3379 * particular line/column, adjust the folds and display a message about the |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3380 * jump. |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3381 * Returns OK on success and FAIL on failing to open the file/buffer. Returns |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3382 * NOTDONE if the quickfix/location list is freed by an autocmd when opening |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3383 * the file. |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3384 */ |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3385 static int |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3386 qf_jump_to_buffer( |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3387 qf_info_T *qi, |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3388 int qf_index, |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3389 qfline_T *qf_ptr, |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3390 int forceit, |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3391 int prev_winid, |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3392 int *opened_window, |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3393 int openfold, |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3394 int print_message) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3395 { |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3396 buf_T *old_curbuf; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3397 linenr_T old_lnum; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3398 int retval = OK; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3399 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3400 // If there is a file name, read the wanted file if needed, and check |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3401 // autowrite etc. |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3402 old_curbuf = curbuf; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3403 old_lnum = curwin->w_cursor.lnum; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3404 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3405 if (qf_ptr->qf_fnum != 0) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3406 { |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3407 retval = qf_jump_edit_buffer(qi, qf_ptr, forceit, prev_winid, |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3408 opened_window); |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3409 if (retval != OK) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3410 return retval; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3411 } |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3412 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3413 // When not switched to another buffer, still need to set pc mark |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3414 if (curbuf == old_curbuf) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3415 setpcmark(); |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3416 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3417 qf_jump_goto_line(qf_ptr->qf_lnum, qf_ptr->qf_col, qf_ptr->qf_viscol, |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3418 qf_ptr->qf_pattern); |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3419 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3420 #ifdef FEAT_FOLDING |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3421 if ((fdo_flags & FDO_QUICKFIX) && openfold) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3422 foldOpenCursor(); |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3423 #endif |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3424 if (print_message) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3425 qf_jump_print_msg(qi, qf_index, qf_ptr, old_curbuf, old_lnum); |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3426 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3427 return retval; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3428 } |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3429 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3430 /* |
15424
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
3431 * Jump to a quickfix line and try to use an existing window. |
7 | 3432 */ |
3433 void | |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
3434 qf_jump(qf_info_T *qi, |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
3435 int dir, |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
3436 int errornr, |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
3437 int forceit) |
7 | 3438 { |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3439 qf_jump_newwin(qi, dir, errornr, forceit, FALSE); |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3440 } |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3441 |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3442 /* |
15424
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
3443 * Jump to a quickfix line. |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
3444 * If dir == 0 go to entry "errornr". |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
3445 * If dir == FORWARD go "errornr" valid entries forward. |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
3446 * If dir == BACKWARD go "errornr" valid entries backward. |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
3447 * If dir == FORWARD_FILE go "errornr" valid entries files backward. |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
3448 * If dir == BACKWARD_FILE go "errornr" valid entries files backward |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
3449 * else if "errornr" is zero, redisplay the same line |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
3450 * If 'forceit' is TRUE, then can discard changes to the current buffer. |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3451 * If 'newwin' is TRUE, then open the file in a new window. |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3452 */ |
17789
0f7ae8010787
patch 8.1.1891: functions used in one file are global
Bram Moolenaar <Bram@vim.org>
parents:
17099
diff
changeset
|
3453 static void |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3454 qf_jump_newwin(qf_info_T *qi, |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3455 int dir, |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3456 int errornr, |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3457 int forceit, |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3458 int newwin) |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3459 { |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3460 qf_list_T *qfl; |
230 | 3461 qfline_T *qf_ptr; |
3462 qfline_T *old_qf_ptr; | |
7 | 3463 int qf_index; |
3464 int old_qf_index; | |
639 | 3465 char_u *old_swb = p_swb; |
1621 | 3466 unsigned old_swb_flags = swb_flags; |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3467 int prev_winid; |
7 | 3468 int opened_window = FALSE; |
3469 int print_message = TRUE; | |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3470 int old_KeyTyped = KeyTyped; // getting file may reset it |
12503
4d40b2644e92
patch 8.0.1130: the qf_jump() function is still too long
Christian Brabandt <cb@256bit.org>
parents:
12477
diff
changeset
|
3471 int retval = OK; |
644 | 3472 |
659 | 3473 if (qi == NULL) |
3474 qi = &ql_info; | |
644 | 3475 |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
3476 if (qf_stack_empty(qi) || qf_list_empty(qf_get_curlist(qi))) |
7 | 3477 { |
25306
078edc1821bf
patch 8.2.3190: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
25302
diff
changeset
|
3478 emsg(_(e_no_errors)); |
7 | 3479 return; |
3480 } | |
3481 | |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3482 incr_quickfix_busy(); |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3483 |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
3484 qfl = qf_get_curlist(qi); |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3485 |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3486 qf_ptr = qfl->qf_ptr; |
7 | 3487 old_qf_ptr = qf_ptr; |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3488 qf_index = qfl->qf_index; |
7 | 3489 old_qf_index = qf_index; |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3490 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3491 qf_ptr = qf_get_entry(qfl, errornr, dir, &qf_index); |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3492 if (qf_ptr == NULL) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3493 { |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3494 qf_ptr = old_qf_ptr; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3495 qf_index = old_qf_index; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3496 goto theend; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3497 } |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3498 |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3499 qfl->qf_index = qf_index; |
25254
5127844b909b
patch 8.2.3163: location list window may open a wrong file
Bram Moolenaar <Bram@vim.org>
parents:
25064
diff
changeset
|
3500 qfl->qf_ptr = qf_ptr; |
644 | 3501 if (qf_win_pos_update(qi, old_qf_index)) |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3502 // No need to print the error message if it's visible in the error |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3503 // window |
7 | 3504 print_message = FALSE; |
3505 | |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3506 prev_winid = curwin->w_id; |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3507 |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
3508 retval = qf_jump_open_window(qi, qf_ptr, newwin, &opened_window); |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3509 if (retval == FAIL) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3510 goto failed; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3511 if (retval == NOTDONE) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3512 goto theend; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3513 |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3514 retval = qf_jump_to_buffer(qi, qf_index, qf_ptr, forceit, prev_winid, |
17950
bb0e25a8b5d7
patch 8.1.1971: manually enabling features causes build errors
Bram Moolenaar <Bram@vim.org>
parents:
17940
diff
changeset
|
3515 &opened_window, old_KeyTyped, print_message); |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3516 if (retval == NOTDONE) |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3517 { |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3518 // Quickfix/location list is freed by an autocmd |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3519 qi = NULL; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3520 qf_ptr = NULL; |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3521 } |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3522 |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3523 if (retval != OK) |
7 | 3524 { |
3525 if (opened_window) | |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3526 win_close(curwin, TRUE); // Close opened window |
8605
536b9b88d1ca
commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9
Christian Brabandt <cb@256bit.org>
parents:
8603
diff
changeset
|
3527 if (qf_ptr != NULL && qf_ptr->qf_fnum != 0) |
7 | 3528 { |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3529 // Couldn't open file, so put index back where it was. This could |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3530 // happen if the file was readonly and we changed something. |
7 | 3531 failed: |
3532 qf_ptr = old_qf_ptr; | |
3533 qf_index = old_qf_index; | |
3534 } | |
3535 } | |
3536 theend: | |
8605
536b9b88d1ca
commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9
Christian Brabandt <cb@256bit.org>
parents:
8603
diff
changeset
|
3537 if (qi != NULL) |
536b9b88d1ca
commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9
Christian Brabandt <cb@256bit.org>
parents:
8603
diff
changeset
|
3538 { |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3539 qfl->qf_ptr = qf_ptr; |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3540 qfl->qf_index = qf_index; |
8605
536b9b88d1ca
commit https://github.com/vim/vim/commit/0899d698030ec076eb26352cda1ea334ab0819d9
Christian Brabandt <cb@256bit.org>
parents:
8603
diff
changeset
|
3541 } |
18656
022deb0adec9
patch 8.1.2320: insufficient test coverage for quickfix
Bram Moolenaar <Bram@vim.org>
parents:
18646
diff
changeset
|
3542 if (p_swb != old_swb && p_swb == empty_option) |
7 | 3543 { |
14838
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3544 // Restore old 'switchbuf' value, but not when an autocommand or |
6040d93396de
patch 8.1.0431: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14796
diff
changeset
|
3545 // modeline has changed the value. |
18656
022deb0adec9
patch 8.1.2320: insufficient test coverage for quickfix
Bram Moolenaar <Bram@vim.org>
parents:
18646
diff
changeset
|
3546 p_swb = old_swb; |
022deb0adec9
patch 8.1.2320: insufficient test coverage for quickfix
Bram Moolenaar <Bram@vim.org>
parents:
18646
diff
changeset
|
3547 swb_flags = old_swb_flags; |
7 | 3548 } |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
3549 decr_quickfix_busy(); |
7 | 3550 } |
3551 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3552 // Highlight attributes used for displaying entries from the quickfix list. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3553 static int qfFileAttr; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3554 static int qfSepAttr; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3555 static int qfLineAttr; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3556 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3557 /* |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3558 * Display information about a single entry from the quickfix/location list. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3559 * Used by ":clist/:llist" commands. |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3560 * 'cursel' will be set to TRUE for the currently selected entry in the |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3561 * quickfix list. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3562 */ |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3563 static void |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3564 qf_list_entry(qfline_T *qfp, int qf_idx, int cursel) |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3565 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3566 char_u *fname; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3567 buf_T *buf; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3568 int filter_entry; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3569 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3570 fname = NULL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3571 if (qfp->qf_module != NULL && *qfp->qf_module != NUL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3572 vim_snprintf((char *)IObuff, IOSIZE, "%2d %s", qf_idx, |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3573 (char *)qfp->qf_module); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3574 else { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3575 if (qfp->qf_fnum != 0 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3576 && (buf = buflist_findnr(qfp->qf_fnum)) != NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3577 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3578 fname = buf->b_fname; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3579 if (qfp->qf_type == 1) // :helpgrep |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3580 fname = gettail(fname); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3581 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3582 if (fname == NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3583 sprintf((char *)IObuff, "%2d", qf_idx); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3584 else |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3585 vim_snprintf((char *)IObuff, IOSIZE, "%2d %s", |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3586 qf_idx, (char *)fname); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3587 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3588 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3589 // Support for filtering entries using :filter /pat/ clist |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3590 // Match against the module name, file name, search pattern and |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3591 // text of the entry. |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3592 filter_entry = TRUE; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3593 if (qfp->qf_module != NULL && *qfp->qf_module != NUL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3594 filter_entry &= message_filtered(qfp->qf_module); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3595 if (filter_entry && fname != NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3596 filter_entry &= message_filtered(fname); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3597 if (filter_entry && qfp->qf_pattern != NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3598 filter_entry &= message_filtered(qfp->qf_pattern); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3599 if (filter_entry) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3600 filter_entry &= message_filtered(qfp->qf_text); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3601 if (filter_entry) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3602 return; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3603 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3604 msg_putchar('\n'); |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3605 msg_outtrans_attr(IObuff, cursel ? HL_ATTR(HLF_QFL) : qfFileAttr); |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3606 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3607 if (qfp->qf_lnum != 0) |
15543
dd725a8ab112
patch 8.1.0779: argument for message functions is inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
15490
diff
changeset
|
3608 msg_puts_attr(":", qfSepAttr); |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3609 if (qfp->qf_lnum == 0) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3610 IObuff[0] = NUL; |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3611 else |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3612 qf_range_text(qfp, IObuff, IOSIZE); |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3613 sprintf((char *)IObuff + STRLEN(IObuff), "%s", |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3614 (char *)qf_types(qfp->qf_type, qfp->qf_nr)); |
15543
dd725a8ab112
patch 8.1.0779: argument for message functions is inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
15490
diff
changeset
|
3615 msg_puts_attr((char *)IObuff, qfLineAttr); |
dd725a8ab112
patch 8.1.0779: argument for message functions is inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
15490
diff
changeset
|
3616 msg_puts_attr(":", qfSepAttr); |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3617 if (qfp->qf_pattern != NULL) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3618 { |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3619 qf_fmt_text(qfp->qf_pattern, IObuff, IOSIZE); |
15543
dd725a8ab112
patch 8.1.0779: argument for message functions is inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
15490
diff
changeset
|
3620 msg_puts((char *)IObuff); |
dd725a8ab112
patch 8.1.0779: argument for message functions is inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
15490
diff
changeset
|
3621 msg_puts_attr(":", qfSepAttr); |
dd725a8ab112
patch 8.1.0779: argument for message functions is inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
15490
diff
changeset
|
3622 } |
dd725a8ab112
patch 8.1.0779: argument for message functions is inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
15490
diff
changeset
|
3623 msg_puts(" "); |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3624 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3625 // Remove newlines and leading whitespace from the text. For an |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3626 // unrecognized line keep the indent, the compiler may mark a word |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3627 // with ^^^^. |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3628 qf_fmt_text((fname != NULL || qfp->qf_lnum != 0) |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3629 ? skipwhite(qfp->qf_text) : qfp->qf_text, |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3630 IObuff, IOSIZE); |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3631 msg_prt_line(IObuff, FALSE); |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3632 out_flush(); // show one line at a time |
14477
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3633 } |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3634 |
1ccf5dcd88ca
patch 8.1.0252: quickfix functions are too long
Christian Brabandt <cb@256bit.org>
parents:
14469
diff
changeset
|
3635 /* |
7 | 3636 * ":clist": list all errors |
644 | 3637 * ":llist": list all locations |
7 | 3638 */ |
3639 void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
3640 qf_list(exarg_T *eap) |
7 | 3641 { |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3642 qf_list_T *qfl; |
230 | 3643 qfline_T *qfp; |
3644 int i; | |
3645 int idx1 = 1; | |
3646 int idx2 = -1; | |
3647 char_u *arg = eap->arg; | |
9379
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3648 int plus = FALSE; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3649 int all = eap->forceit; // if not :cl!, only show |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3650 // recognised errors |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
3651 qf_info_T *qi; |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
3652 |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
3653 if ((qi = qf_cmd_get_stack(eap, TRUE)) == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
3654 return; |
644 | 3655 |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
3656 if (qf_stack_empty(qi) || qf_list_empty(qf_get_curlist(qi))) |
7 | 3657 { |
25306
078edc1821bf
patch 8.2.3190: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
25302
diff
changeset
|
3658 emsg(_(e_no_errors)); |
7 | 3659 return; |
3660 } | |
9379
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3661 if (*arg == '+') |
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3662 { |
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3663 ++arg; |
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3664 plus = TRUE; |
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3665 } |
7 | 3666 if (!get_list_range(&arg, &idx1, &idx2) || *arg != NUL) |
3667 { | |
26883
7f150a4936f2
patch 8.2.3970: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26877
diff
changeset
|
3668 semsg(_(e_trailing_characters_str), arg); |
7 | 3669 return; |
3670 } | |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
3671 qfl = qf_get_curlist(qi); |
9379
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3672 if (plus) |
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3673 { |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3674 i = qfl->qf_index; |
9379
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3675 idx2 = i + idx1; |
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3676 idx1 = i; |
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3677 } |
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3678 else |
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3679 { |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3680 i = qfl->qf_count; |
9379
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3681 if (idx1 < 0) |
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3682 idx1 = (-idx1 > i) ? 0 : idx1 + i + 1; |
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3683 if (idx2 < 0) |
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3684 idx2 = (-idx2 > i) ? 0 : idx2 + i + 1; |
b398e4e12751
commit https://github.com/vim/vim/commit/e8fea0728a2fa1fe78ef0ac90dee1a84bd7ef9fb
Christian Brabandt <cb@256bit.org>
parents:
9369
diff
changeset
|
3685 } |
7 | 3686 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3687 // Shorten all the file names, so that it is easy to read |
13819
31bb8e1f7625
patch 8.0.1781: file names in quickfix window are not shortened
Christian Brabandt <cb@256bit.org>
parents:
13802
diff
changeset
|
3688 shorten_fnames(FALSE); |
31bb8e1f7625
patch 8.0.1781: file names in quickfix window are not shortened
Christian Brabandt <cb@256bit.org>
parents:
13802
diff
changeset
|
3689 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3690 // Get the attributes for the different quickfix highlight items. Note |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3691 // that this depends on syntax items defined in the qf.vim syntax file |
12912
888441e8fbb0
patch 8.0.1332: highlighting in quickfix window could be better
Christian Brabandt <cb@256bit.org>
parents:
12531
diff
changeset
|
3692 qfFileAttr = syn_name2attr((char_u *)"qfFileName"); |
888441e8fbb0
patch 8.0.1332: highlighting in quickfix window could be better
Christian Brabandt <cb@256bit.org>
parents:
12531
diff
changeset
|
3693 if (qfFileAttr == 0) |
888441e8fbb0
patch 8.0.1332: highlighting in quickfix window could be better
Christian Brabandt <cb@256bit.org>
parents:
12531
diff
changeset
|
3694 qfFileAttr = HL_ATTR(HLF_D); |
888441e8fbb0
patch 8.0.1332: highlighting in quickfix window could be better
Christian Brabandt <cb@256bit.org>
parents:
12531
diff
changeset
|
3695 qfSepAttr = syn_name2attr((char_u *)"qfSeparator"); |
888441e8fbb0
patch 8.0.1332: highlighting in quickfix window could be better
Christian Brabandt <cb@256bit.org>
parents:
12531
diff
changeset
|
3696 if (qfSepAttr == 0) |
888441e8fbb0
patch 8.0.1332: highlighting in quickfix window could be better
Christian Brabandt <cb@256bit.org>
parents:
12531
diff
changeset
|
3697 qfSepAttr = HL_ATTR(HLF_D); |
888441e8fbb0
patch 8.0.1332: highlighting in quickfix window could be better
Christian Brabandt <cb@256bit.org>
parents:
12531
diff
changeset
|
3698 qfLineAttr = syn_name2attr((char_u *)"qfLineNr"); |
888441e8fbb0
patch 8.0.1332: highlighting in quickfix window could be better
Christian Brabandt <cb@256bit.org>
parents:
12531
diff
changeset
|
3699 if (qfLineAttr == 0) |
888441e8fbb0
patch 8.0.1332: highlighting in quickfix window could be better
Christian Brabandt <cb@256bit.org>
parents:
12531
diff
changeset
|
3700 qfLineAttr = HL_ATTR(HLF_N); |
888441e8fbb0
patch 8.0.1332: highlighting in quickfix window could be better
Christian Brabandt <cb@256bit.org>
parents:
12531
diff
changeset
|
3701 |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3702 if (qfl->qf_nonevalid) |
7 | 3703 all = TRUE; |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
3704 FOR_ALL_QFL_ITEMS(qfl, qfp, i) |
7 | 3705 { |
3706 if ((qfp->qf_valid || all) && idx1 <= i && i <= idx2) | |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3707 qf_list_entry(qfp, i, i == qfl->qf_index); |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
3708 |
7 | 3709 ui_breakcheck(); |
3710 } | |
3711 } | |
3712 | |
3713 /* | |
3714 * Remove newlines and leading whitespace from an error message. | |
3715 * Put the result in "buf[bufsize]". | |
3716 */ | |
3717 static void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
3718 qf_fmt_text(char_u *text, char_u *buf, int bufsize) |
7 | 3719 { |
3720 int i; | |
3721 char_u *p = text; | |
3722 | |
3723 for (i = 0; *p != NUL && i < bufsize - 1; ++i) | |
3724 { | |
3725 if (*p == '\n') | |
3726 { | |
3727 buf[i] = ' '; | |
3728 while (*++p != NUL) | |
11129
f4ea50924c6d
patch 8.0.0452: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents:
11063
diff
changeset
|
3729 if (!VIM_ISWHITE(*p) && *p != '\n') |
7 | 3730 break; |
3731 } | |
3732 else | |
3733 buf[i] = *p++; | |
3734 } | |
3735 buf[i] = NUL; | |
3736 } | |
3737 | |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
3738 /* |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3739 * Range information from lnum, col, end_lnum, and end_col. |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3740 * Put the result in "buf[bufsize]". |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3741 */ |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3742 static void |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3743 qf_range_text(qfline_T *qfp, char_u *buf, int bufsize) |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3744 { |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3745 int len; |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3746 vim_snprintf((char *)buf, bufsize, "%ld", qfp->qf_lnum); |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3747 len = (int)STRLEN(buf); |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3748 |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3749 if (qfp->qf_end_lnum > 0 && qfp->qf_lnum != qfp->qf_end_lnum) |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3750 { |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3751 vim_snprintf((char *)buf + len, bufsize - len, |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3752 "-%ld", qfp->qf_end_lnum); |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3753 len += (int)STRLEN(buf + len); |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3754 } |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3755 if (qfp->qf_col > 0) |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3756 { |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3757 vim_snprintf((char *)buf + len, bufsize - len, " col %d", qfp->qf_col); |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3758 len += (int)STRLEN(buf + len); |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3759 if (qfp->qf_end_col > 0 && qfp->qf_col != qfp->qf_end_col) |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3760 { |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3761 vim_snprintf((char *)buf + len, bufsize - len, |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3762 "-%d", qfp->qf_end_col); |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3763 len += (int)STRLEN(buf + len); |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3764 } |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3765 } |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3766 buf[len] = NUL; |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3767 } |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3768 |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
3769 /* |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
3770 * Display information (list number, list size and the title) about a |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
3771 * quickfix/location list. |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
3772 */ |
9538
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3773 static void |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3774 qf_msg(qf_info_T *qi, int which, char *lead) |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3775 { |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3776 char *title = (char *)qi->qf_lists[which].qf_title; |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3777 int count = qi->qf_lists[which].qf_count; |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3778 char_u buf[IOSIZE]; |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3779 |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3780 vim_snprintf((char *)buf, IOSIZE, _("%serror list %d of %d; %d errors "), |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3781 lead, |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3782 which + 1, |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3783 qi->qf_listcount, |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3784 count); |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3785 |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3786 if (title != NULL) |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3787 { |
9579
2fb7e008ac9b
commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6
Christian Brabandt <cb@256bit.org>
parents:
9573
diff
changeset
|
3788 size_t len = STRLEN(buf); |
2fb7e008ac9b
commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6
Christian Brabandt <cb@256bit.org>
parents:
9573
diff
changeset
|
3789 |
2fb7e008ac9b
commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6
Christian Brabandt <cb@256bit.org>
parents:
9573
diff
changeset
|
3790 if (len < 34) |
2fb7e008ac9b
commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6
Christian Brabandt <cb@256bit.org>
parents:
9573
diff
changeset
|
3791 { |
2fb7e008ac9b
commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6
Christian Brabandt <cb@256bit.org>
parents:
9573
diff
changeset
|
3792 vim_memset(buf + len, ' ', 34 - len); |
2fb7e008ac9b
commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6
Christian Brabandt <cb@256bit.org>
parents:
9573
diff
changeset
|
3793 buf[34] = NUL; |
2fb7e008ac9b
commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6
Christian Brabandt <cb@256bit.org>
parents:
9573
diff
changeset
|
3794 } |
2fb7e008ac9b
commit https://github.com/vim/vim/commit/16ec3c9be3fcdc38530bddb12978bc5a7b98c0f6
Christian Brabandt <cb@256bit.org>
parents:
9573
diff
changeset
|
3795 vim_strcat(buf, (char_u *)title, IOSIZE); |
9538
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3796 } |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3797 trunc_string(buf, buf, Columns - 1, IOSIZE); |
15543
dd725a8ab112
patch 8.1.0779: argument for message functions is inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
15490
diff
changeset
|
3798 msg((char *)buf); |
9538
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3799 } |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3800 |
7 | 3801 /* |
3802 * ":colder [count]": Up in the quickfix stack. | |
3803 * ":cnewer [count]": Down in the quickfix stack. | |
644 | 3804 * ":lolder [count]": Up in the location list stack. |
3805 * ":lnewer [count]": Down in the location list stack. | |
7 | 3806 */ |
3807 void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
3808 qf_age(exarg_T *eap) |
7 | 3809 { |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
3810 qf_info_T *qi; |
7 | 3811 int count; |
3812 | |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
3813 if ((qi = qf_cmd_get_stack(eap, TRUE)) == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
3814 return; |
644 | 3815 |
7 | 3816 if (eap->addr_count != 0) |
3817 count = eap->line2; | |
3818 else | |
3819 count = 1; | |
3820 while (count--) | |
3821 { | |
644 | 3822 if (eap->cmdidx == CMD_colder || eap->cmdidx == CMD_lolder) |
7 | 3823 { |
644 | 3824 if (qi->qf_curlist == 0) |
7 | 3825 { |
26913
d4e61d61afd9
patch 8.2.3985: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26883
diff
changeset
|
3826 emsg(_(e_at_bottom_of_quickfix_stack)); |
4371 | 3827 break; |
7 | 3828 } |
644 | 3829 --qi->qf_curlist; |
7 | 3830 } |
3831 else | |
3832 { | |
644 | 3833 if (qi->qf_curlist >= qi->qf_listcount - 1) |
7 | 3834 { |
26913
d4e61d61afd9
patch 8.2.3985: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26883
diff
changeset
|
3835 emsg(_(e_at_top_of_quickfix_stack)); |
4371 | 3836 break; |
7 | 3837 } |
644 | 3838 ++qi->qf_curlist; |
7 | 3839 } |
3840 } | |
9538
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3841 qf_msg(qi, qi->qf_curlist, ""); |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
3842 qf_update_buffer(qi, NULL); |
7 | 3843 } |
3844 | |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
3845 /* |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
3846 * Display the information about all the quickfix/location lists in the stack |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
3847 */ |
9538
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3848 void |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3849 qf_history(exarg_T *eap) |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3850 { |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
3851 qf_info_T *qi = qf_cmd_get_stack(eap, FALSE); |
9538
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3852 int i; |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3853 |
16555
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3854 if (eap->addr_count > 0) |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3855 { |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3856 if (qi == NULL) |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3857 { |
26877
06a137af96f8
patch 8.2.3967: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26865
diff
changeset
|
3858 emsg(_(e_no_location_list)); |
16555
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3859 return; |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3860 } |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3861 |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3862 // Jump to the specified quickfix list |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3863 if (eap->line2 > 0 && eap->line2 <= qi->qf_listcount) |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3864 { |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3865 qi->qf_curlist = eap->line2 - 1; |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3866 qf_msg(qi, qi->qf_curlist, ""); |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3867 qf_update_buffer(qi, NULL); |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3868 } |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3869 else |
25064
8f2262c72178
patch 8.2.3069: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
24964
diff
changeset
|
3870 emsg(_(e_invalid_range)); |
16555
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3871 |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3872 return; |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3873 } |
1302bc0b80db
patch 8.1.1281: cannot specify a count with :chistory
Bram Moolenaar <Bram@vim.org>
parents:
16543
diff
changeset
|
3874 |
15424
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
3875 if (qf_stack_empty(qi)) |
15543
dd725a8ab112
patch 8.1.0779: argument for message functions is inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
15490
diff
changeset
|
3876 msg(_("No entries")); |
9538
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3877 else |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3878 for (i = 0; i < qi->qf_listcount; ++i) |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3879 qf_msg(qi, i, i == qi->qf_curlist ? "> " : " "); |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3880 } |
26da1efa9e46
commit https://github.com/vim/vim/commit/f6acffbe83e622542d9fdf3066f51933e46e4954
Christian Brabandt <cb@256bit.org>
parents:
9534
diff
changeset
|
3881 |
7 | 3882 /* |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
3883 * Free all the entries in the error list "idx". Note that other information |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
3884 * associated with the list like context and title are not freed. |
7 | 3885 */ |
3886 static void | |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3887 qf_free_items(qf_list_T *qfl) |
7 | 3888 { |
230 | 3889 qfline_T *qfp; |
9195
543f068f3706
commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa
Christian Brabandt <cb@256bit.org>
parents:
9175
diff
changeset
|
3890 qfline_T *qfpnext; |
3982 | 3891 int stop = FALSE; |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3892 |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3893 while (qfl->qf_count && qfl->qf_start != NULL) |
7 | 3894 { |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3895 qfp = qfl->qf_start; |
9195
543f068f3706
commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa
Christian Brabandt <cb@256bit.org>
parents:
9175
diff
changeset
|
3896 qfpnext = qfp->qf_next; |
12252
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
3897 if (!stop) |
3949 | 3898 { |
13821
98274127d675
patch 8.0.1782: no simple way to label quickfix entries
Christian Brabandt <cb@256bit.org>
parents:
13819
diff
changeset
|
3899 vim_free(qfp->qf_module); |
9195
543f068f3706
commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa
Christian Brabandt <cb@256bit.org>
parents:
9175
diff
changeset
|
3900 vim_free(qfp->qf_text); |
13821
98274127d675
patch 8.0.1782: no simple way to label quickfix entries
Christian Brabandt <cb@256bit.org>
parents:
13819
diff
changeset
|
3901 vim_free(qfp->qf_pattern); |
9195
543f068f3706
commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa
Christian Brabandt <cb@256bit.org>
parents:
9175
diff
changeset
|
3902 stop = (qfp == qfpnext); |
543f068f3706
commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa
Christian Brabandt <cb@256bit.org>
parents:
9175
diff
changeset
|
3903 vim_free(qfp); |
3982 | 3904 if (stop) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3905 // Somehow qf_count may have an incorrect value, set it to 1 |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3906 // to avoid crashing when it's wrong. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
3907 // TODO: Avoid qf_count being incorrect. |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3908 qfl->qf_count = 1; |
3949 | 3909 } |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3910 qfl->qf_start = qfpnext; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3911 --qfl->qf_count; |
7 | 3912 } |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
3913 |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3914 qfl->qf_index = 0; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3915 qfl->qf_start = NULL; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3916 qfl->qf_last = NULL; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3917 qfl->qf_ptr = NULL; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3918 qfl->qf_nonevalid = TRUE; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3919 |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3920 qf_clean_dir_stack(&qfl->qf_dir_stack); |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3921 qfl->qf_directory = NULL; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3922 qf_clean_dir_stack(&qfl->qf_file_stack); |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3923 qfl->qf_currfile = NULL; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3924 qfl->qf_multiline = FALSE; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3925 qfl->qf_multiignore = FALSE; |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3926 qfl->qf_multiscan = FALSE; |
7 | 3927 } |
3928 | |
3929 /* | |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
3930 * Free error list "idx". Frees all the entries in the quickfix list, |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
3931 * associated context information and the title. |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
3932 */ |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
3933 static void |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3934 qf_free(qf_list_T *qfl) |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3935 { |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
3936 qf_free_items(qfl); |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
3937 |
13244
ac42c4b11dbc
patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents:
13115
diff
changeset
|
3938 VIM_CLEAR(qfl->qf_title); |
11700
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3939 free_tv(qfl->qf_ctx); |
dd821396754e
patch 8.0.0733: can only add entries to one list in the quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11609
diff
changeset
|
3940 qfl->qf_ctx = NULL; |
28451
e015d650ea9f
patch 8.2.4750: small pieces of dead code
Bram Moolenaar <Bram@vim.org>
parents:
28315
diff
changeset
|
3941 free_callback(&qfl->qf_qftf_cb); |
12287
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
3942 qfl->qf_id = 0; |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
3943 qfl->qf_changedtick = 0L; |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
3944 } |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
3945 |
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
3946 /* |
7 | 3947 * qf_mark_adjust: adjust marks |
3948 */ | |
3949 void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
3950 qf_mark_adjust( |
12449
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
3951 win_T *wp, |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
3952 linenr_T line1, |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
3953 linenr_T line2, |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
3954 long amount, |
7a743053dfd6
patch 8.0.1104: the qf_jump() function is too long
Christian Brabandt <cb@256bit.org>
parents:
12427
diff
changeset
|
3955 long amount_after) |
7 | 3956 { |
230 | 3957 int i; |
3958 qfline_T *qfp; | |
3959 int idx; | |
644 | 3960 qf_info_T *qi = &ql_info; |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
3961 int found_one = FALSE; |
9608
fa64afb99dda
commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504
Christian Brabandt <cb@256bit.org>
parents:
9579
diff
changeset
|
3962 int buf_has_flag = wp == NULL ? BUF_HAS_QF_ENTRY : BUF_HAS_LL_ENTRY; |
fa64afb99dda
commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504
Christian Brabandt <cb@256bit.org>
parents:
9579
diff
changeset
|
3963 |
fa64afb99dda
commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504
Christian Brabandt <cb@256bit.org>
parents:
9579
diff
changeset
|
3964 if (!(curbuf->b_has_qf_entry & buf_has_flag)) |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
3965 return; |
644 | 3966 if (wp != NULL) |
3967 { | |
3968 if (wp->w_llist == NULL) | |
3969 return; | |
3970 qi = wp->w_llist; | |
3971 } | |
3972 | |
3973 for (idx = 0; idx < qi->qf_listcount; ++idx) | |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
3974 { |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
3975 qf_list_T *qfl = qf_get_list(qi, idx); |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
3976 |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
3977 if (!qf_list_empty(qfl)) |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
3978 FOR_ALL_QFL_ITEMS(qfl, qfp, i) |
7 | 3979 if (qfp->qf_fnum == curbuf->b_fnum) |
3980 { | |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
3981 found_one = TRUE; |
7 | 3982 if (qfp->qf_lnum >= line1 && qfp->qf_lnum <= line2) |
3983 { | |
3984 if (amount == MAXLNUM) | |
3985 qfp->qf_cleared = TRUE; | |
3986 else | |
3987 qfp->qf_lnum += amount; | |
3988 } | |
3989 else if (amount_after && qfp->qf_lnum > line2) | |
3990 qfp->qf_lnum += amount_after; | |
3991 } | |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
3992 } |
9201
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
3993 |
692e156c7023
commit https://github.com/vim/vim/commit/2f095a4bc4d786e0ac834f48dd18a94fe2d140e3
Christian Brabandt <cb@256bit.org>
parents:
9197
diff
changeset
|
3994 if (!found_one) |
9608
fa64afb99dda
commit https://github.com/vim/vim/commit/c1542744e788d96fed24dd421f43009288092504
Christian Brabandt <cb@256bit.org>
parents:
9579
diff
changeset
|
3995 curbuf->b_has_qf_entry &= ~buf_has_flag; |
7 | 3996 } |
3997 | |
3998 /* | |
3999 * Make a nice message out of the error character and the error number: | |
4000 * char number message | |
4001 * e or E 0 " error" | |
4002 * w or W 0 " warning" | |
4003 * i or I 0 " info" | |
20729
ada6f26e6eb1
patch 8.2.0917: quickfix entries do not suport a "note" type
Bram Moolenaar <Bram@vim.org>
parents:
20631
diff
changeset
|
4004 * n or N 0 " note" |
7 | 4005 * 0 0 "" |
4006 * other 0 " c" | |
4007 * e or E n " error n" | |
4008 * w or W n " warning n" | |
4009 * i or I n " info n" | |
20729
ada6f26e6eb1
patch 8.2.0917: quickfix entries do not suport a "note" type
Bram Moolenaar <Bram@vim.org>
parents:
20631
diff
changeset
|
4010 * n or N n " note n" |
7 | 4011 * 0 n " error n" |
4012 * other n " c n" | |
4013 * 1 x "" :helpgrep | |
4014 */ | |
4015 static char_u * | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
4016 qf_types(int c, int nr) |
7 | 4017 { |
4018 static char_u buf[20]; | |
4019 static char_u cc[3]; | |
4020 char_u *p; | |
4021 | |
4022 if (c == 'W' || c == 'w') | |
4023 p = (char_u *)" warning"; | |
4024 else if (c == 'I' || c == 'i') | |
4025 p = (char_u *)" info"; | |
20729
ada6f26e6eb1
patch 8.2.0917: quickfix entries do not suport a "note" type
Bram Moolenaar <Bram@vim.org>
parents:
20631
diff
changeset
|
4026 else if (c == 'N' || c == 'n') |
ada6f26e6eb1
patch 8.2.0917: quickfix entries do not suport a "note" type
Bram Moolenaar <Bram@vim.org>
parents:
20631
diff
changeset
|
4027 p = (char_u *)" note"; |
7 | 4028 else if (c == 'E' || c == 'e' || (c == 0 && nr > 0)) |
4029 p = (char_u *)" error"; | |
4030 else if (c == 0 || c == 1) | |
4031 p = (char_u *)""; | |
4032 else | |
4033 { | |
4034 cc[0] = ' '; | |
4035 cc[1] = c; | |
4036 cc[2] = NUL; | |
4037 p = cc; | |
4038 } | |
4039 | |
4040 if (nr <= 0) | |
4041 return p; | |
4042 | |
4043 sprintf((char *)buf, "%s %3d", (char *)p, nr); | |
4044 return buf; | |
4045 } | |
4046 | |
4047 /* | |
14397
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4048 * When "split" is FALSE: Open the entry/result under the cursor. |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4049 * When "split" is TRUE: Open the entry/result under the cursor in a new window. |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4050 */ |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4051 void |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4052 qf_view_result(int split) |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4053 { |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4054 qf_info_T *qi = &ql_info; |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4055 |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4056 if (IS_LL_WINDOW(curwin)) |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4057 qi = GET_LOC_LIST(curwin); |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4058 |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
4059 if (qf_list_empty(qf_get_curlist(qi))) |
14397
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4060 { |
25306
078edc1821bf
patch 8.2.3190: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
25302
diff
changeset
|
4061 emsg(_(e_no_errors)); |
14397
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4062 return; |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4063 } |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4064 |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4065 if (split) |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4066 { |
15024
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
4067 // Open the selected entry in a new window |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
4068 qf_jump_newwin(qi, 0, (long)curwin->w_cursor.lnum, FALSE, TRUE); |
3a3c9b638187
patch 8.1.0523: opening window from quickfix leaves empty buffer behind
Bram Moolenaar <Bram@vim.org>
parents:
14976
diff
changeset
|
4069 do_cmdline_cmd((char_u *) "clearjumps"); |
14397
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4070 return; |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4071 } |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4072 |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4073 do_cmdline_cmd((char_u *)(IS_LL_WINDOW(curwin) ? ".ll" : ".cc")); |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4074 } |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4075 |
19d99d9e670c
patch 8.1.0213: CTRL-W CR does not work properly in a quickfix window
Christian Brabandt <cb@256bit.org>
parents:
14307
diff
changeset
|
4076 /* |
7 | 4077 * ":cwindow": open the quickfix window if we have errors to display, |
4078 * close it if not. | |
644 | 4079 * ":lwindow": open the location list window if we have locations to display, |
4080 * close it if not. | |
7 | 4081 */ |
4082 void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
4083 ex_cwindow(exarg_T *eap) |
7 | 4084 { |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
4085 qf_info_T *qi; |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
4086 qf_list_T *qfl; |
7 | 4087 win_T *win; |
4088 | |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
4089 if ((qi = qf_cmd_get_stack(eap, TRUE)) == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
4090 return; |
644 | 4091 |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
4092 qfl = qf_get_curlist(qi); |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
4093 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4094 // Look for an existing quickfix window. |
644 | 4095 win = qf_find_win(qi); |
7 | 4096 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4097 // If a quickfix window is open but we have no errors to display, |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4098 // close the window. If a quickfix window is not open, then open |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4099 // it if we have errors; otherwise, leave it closed. |
14887
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
4100 if (qf_stack_empty(qi) |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
4101 || qfl->qf_nonevalid |
16062
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
4102 || qf_list_empty(qfl)) |
7 | 4103 { |
4104 if (win != NULL) | |
4105 ex_cclose(eap); | |
4106 } | |
4107 else if (win == NULL) | |
4108 ex_copen(eap); | |
4109 } | |
4110 | |
4111 /* | |
4112 * ":cclose": close the window showing the list of errors. | |
644 | 4113 * ":lclose": close the window showing the location list |
7 | 4114 */ |
4115 void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
4116 ex_cclose(exarg_T *eap) |
7 | 4117 { |
644 | 4118 win_T *win = NULL; |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
4119 qf_info_T *qi; |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
4120 |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
4121 if ((qi = qf_cmd_get_stack(eap, FALSE)) == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
4122 return; |
644 | 4123 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4124 // Find existing quickfix window and close it. |
644 | 4125 win = qf_find_win(qi); |
7 | 4126 if (win != NULL) |
4127 win_close(win, FALSE); | |
4128 } | |
4129 | |
4130 /* | |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
4131 * Set "w:quickfix_title" if "qi" has a title. |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
4132 */ |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
4133 static void |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
4134 qf_set_title_var(qf_list_T *qfl) |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
4135 { |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
4136 if (qfl->qf_title != NULL) |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
4137 set_internal_string_var((char_u *)"w:quickfix_title", qfl->qf_title); |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
4138 } |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
4139 |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
4140 /* |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4141 * Goto a quickfix or location list window (if present). |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4142 * Returns OK if the window is found, FAIL otherwise. |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4143 */ |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4144 static int |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4145 qf_goto_cwindow(qf_info_T *qi, int resize, int sz, int vertsplit) |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4146 { |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4147 win_T *win; |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4148 |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4149 win = qf_find_win(qi); |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4150 if (win == NULL) |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4151 return FAIL; |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4152 |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4153 win_goto(win); |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4154 if (resize) |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4155 { |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4156 if (vertsplit) |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4157 { |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4158 if (sz != win->w_width) |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4159 win_setwidth(sz); |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4160 } |
18319
4cc8a1a134fc
patch 8.1.2154: quickfix window height wrong when there is a tabline
Bram Moolenaar <Bram@vim.org>
parents:
17950
diff
changeset
|
4161 else if (sz != win->w_height && win->w_height |
4cc8a1a134fc
patch 8.1.2154: quickfix window height wrong when there is a tabline
Bram Moolenaar <Bram@vim.org>
parents:
17950
diff
changeset
|
4162 + win->w_status_height + tabline_height() < cmdline_row) |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4163 win_setheight(sz); |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4164 } |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4165 |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4166 return OK; |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4167 } |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4168 |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4169 /* |
15965
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4170 * Set options for the buffer in the quickfix or location list window. |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4171 */ |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4172 static void |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4173 qf_set_cwindow_options(void) |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4174 { |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4175 // switch off 'swapfile' |
28457
4dcccb2673fe
patch 8.2.4753: error from setting an option is silently ignored
Bram Moolenaar <Bram@vim.org>
parents:
28451
diff
changeset
|
4176 set_option_value_give_err((char_u *)"swf", 0L, NULL, OPT_LOCAL); |
4dcccb2673fe
patch 8.2.4753: error from setting an option is silently ignored
Bram Moolenaar <Bram@vim.org>
parents:
28451
diff
changeset
|
4177 set_option_value_give_err((char_u *)"bt", |
4dcccb2673fe
patch 8.2.4753: error from setting an option is silently ignored
Bram Moolenaar <Bram@vim.org>
parents:
28451
diff
changeset
|
4178 0L, (char_u *)"quickfix", OPT_LOCAL); |
4dcccb2673fe
patch 8.2.4753: error from setting an option is silently ignored
Bram Moolenaar <Bram@vim.org>
parents:
28451
diff
changeset
|
4179 set_option_value_give_err((char_u *)"bh", 0L, (char_u *)"hide", OPT_LOCAL); |
15965
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4180 RESET_BINDING(curwin); |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4181 #ifdef FEAT_DIFF |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4182 curwin->w_p_diff = FALSE; |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4183 #endif |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4184 #ifdef FEAT_FOLDING |
28457
4dcccb2673fe
patch 8.2.4753: error from setting an option is silently ignored
Bram Moolenaar <Bram@vim.org>
parents:
28451
diff
changeset
|
4185 set_option_value_give_err((char_u *)"fdm", 0L, (char_u *)"manual", |
15965
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4186 OPT_LOCAL); |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4187 #endif |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4188 } |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4189 |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4190 /* |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4191 * Open a new quickfix or location list window, load the quickfix buffer and |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4192 * set the appropriate options for the window. |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4193 * Returns FAIL if the window could not be opened. |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4194 */ |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4195 static int |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4196 qf_open_new_cwindow(qf_info_T *qi, int height) |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4197 { |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4198 buf_T *qf_buf; |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4199 win_T *oldwin = curwin; |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4200 tabpage_T *prevtab = curtab; |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4201 int flags = 0; |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4202 win_T *win; |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4203 |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4204 qf_buf = qf_find_buf(qi); |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4205 |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4206 // The current window becomes the previous window afterwards. |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4207 win = curwin; |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4208 |
22699
e82579016863
patch 8.2.1898: command modifier parsing always uses global cmdmod
Bram Moolenaar <Bram@vim.org>
parents:
22645
diff
changeset
|
4209 if (IS_QF_STACK(qi) && cmdmod.cmod_split == 0) |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4210 // Create the new quickfix window at the very bottom, except when |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4211 // :belowright or :aboveleft is used. |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4212 win_goto(lastwin); |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4213 // Default is to open the window below the current window |
22699
e82579016863
patch 8.2.1898: command modifier parsing always uses global cmdmod
Bram Moolenaar <Bram@vim.org>
parents:
22645
diff
changeset
|
4214 if (cmdmod.cmod_split == 0) |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4215 flags = WSP_BELOW; |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4216 flags |= WSP_NEWLOC; |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4217 if (win_split(height, flags) == FAIL) |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4218 return FAIL; // not enough room for window |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4219 RESET_BINDING(curwin); |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4220 |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4221 if (IS_LL_STACK(qi)) |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4222 { |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4223 // For the location list window, create a reference to the |
15770
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
4224 // location list stack from the window 'win'. |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
4225 curwin->w_llist_ref = qi; |
77e97f159554
patch 8.1.0892: failure when closing a window when location list is in use
Bram Moolenaar <Bram@vim.org>
parents:
15740
diff
changeset
|
4226 qi->qf_refcount++; |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4227 } |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4228 |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4229 if (oldwin != curwin) |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4230 oldwin = NULL; // don't store info when in another window |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4231 if (qf_buf != NULL) |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4232 { |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4233 // Use the existing quickfix buffer |
22979
fab8455af19c
patch 8.2.2036: buffer messed up if creating the quickfix window fails
Bram Moolenaar <Bram@vim.org>
parents:
22870
diff
changeset
|
4234 if (do_ecmd(qf_buf->b_fnum, NULL, NULL, NULL, ECMD_ONE, |
26026
db9fdfb86679
patch 8.2.3547: opening the quickfix window triggers BufWinEnter twice
Bram Moolenaar <Bram@vim.org>
parents:
25384
diff
changeset
|
4235 ECMD_HIDE + ECMD_OLDBUF + ECMD_NOWINENTER, oldwin) == FAIL) |
22979
fab8455af19c
patch 8.2.2036: buffer messed up if creating the quickfix window fails
Bram Moolenaar <Bram@vim.org>
parents:
22870
diff
changeset
|
4236 return FAIL; |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4237 } |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4238 else |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4239 { |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4240 // Create a new quickfix buffer |
26026
db9fdfb86679
patch 8.2.3547: opening the quickfix window triggers BufWinEnter twice
Bram Moolenaar <Bram@vim.org>
parents:
25384
diff
changeset
|
4241 if (do_ecmd(0, NULL, NULL, NULL, ECMD_ONE, ECMD_HIDE + ECMD_NOWINENTER, |
db9fdfb86679
patch 8.2.3547: opening the quickfix window triggers BufWinEnter twice
Bram Moolenaar <Bram@vim.org>
parents:
25384
diff
changeset
|
4242 oldwin) == FAIL) |
22979
fab8455af19c
patch 8.2.2036: buffer messed up if creating the quickfix window fails
Bram Moolenaar <Bram@vim.org>
parents:
22870
diff
changeset
|
4243 return FAIL; |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4244 |
15740
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
4245 // save the number of the new buffer |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
4246 qi->qf_bufnr = curbuf->b_fnum; |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4247 } |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4248 |
15965
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4249 // Set the options for the quickfix buffer/window (if not already done) |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4250 // Do this even if the quickfix buffer was already present, as an autocmd |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4251 // might have previously deleted (:bdelete) the quickfix buffer. |
17099
54b3059311b5
patch 8.1.1549: quickfix test fails
Bram Moolenaar <Bram@vim.org>
parents:
17095
diff
changeset
|
4252 if (!bt_quickfix(curbuf)) |
15965
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4253 qf_set_cwindow_options(); |
f376cd250b07
patch 8.1.0988: deleting location list buffer breaks location list window
Bram Moolenaar <Bram@vim.org>
parents:
15770
diff
changeset
|
4254 |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4255 // Only set the height when still in the same tab page and there is no |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4256 // window to the side. |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4257 if (curtab == prevtab && curwin->w_width == Columns) |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4258 win_setheight(height); |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4259 curwin->w_p_wfh = TRUE; // set 'winfixheight' |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4260 if (win_valid(win)) |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4261 prevwin = win; |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4262 |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4263 return OK; |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4264 } |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4265 |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4266 /* |
7 | 4267 * ":copen": open a window that shows the list of errors. |
644 | 4268 * ":lopen": open a window that shows the location list. |
7 | 4269 */ |
4270 void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
4271 ex_copen(exarg_T *eap) |
7 | 4272 { |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
4273 qf_info_T *qi; |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
4274 qf_list_T *qfl; |
7 | 4275 int height; |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4276 int status = FAIL; |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
4277 int lnum; |
7 | 4278 |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
4279 if ((qi = qf_cmd_get_stack(eap, TRUE)) == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
4280 return; |
644 | 4281 |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
4282 incr_quickfix_busy(); |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
4283 |
7 | 4284 if (eap->addr_count != 0) |
4285 height = eap->line2; | |
4286 else | |
4287 height = QF_WINHEIGHT; | |
4288 | |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4289 reset_VIsual_and_resel(); // stop Visual mode |
7 | 4290 #ifdef FEAT_GUI |
4291 need_mouse_correct = TRUE; | |
4292 #endif | |
4293 | |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4294 // Find an existing quickfix window, or open a new one. |
22699
e82579016863
patch 8.2.1898: command modifier parsing always uses global cmdmod
Bram Moolenaar <Bram@vim.org>
parents:
22645
diff
changeset
|
4295 if (cmdmod.cmod_tab == 0) |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4296 status = qf_goto_cwindow(qi, eap->addr_count != 0, height, |
22699
e82579016863
patch 8.2.1898: command modifier parsing always uses global cmdmod
Bram Moolenaar <Bram@vim.org>
parents:
22645
diff
changeset
|
4297 cmdmod.cmod_split & WSP_VERT); |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4298 if (status == FAIL) |
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4299 if (qf_open_new_cwindow(qi, height) == FAIL) |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
4300 { |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
4301 decr_quickfix_busy(); |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4302 return; |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
4303 } |
7 | 4304 |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
4305 qfl = qf_get_curlist(qi); |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
4306 qf_set_title_var(qfl); |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
4307 // Save the current index here, as updating the quickfix buffer may free |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
4308 // the quickfix list |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
4309 lnum = qfl->qf_index; |
6793 | 4310 |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4311 // Fill the buffer with the quickfix list. |
20762
68170c89e355
patch 8.2.0933: 'quickfixtextfunc' does not get window ID of location list
Bram Moolenaar <Bram@vim.org>
parents:
20729
diff
changeset
|
4312 qf_fill_buffer(qfl, curbuf, NULL, curwin->w_id); |
644 | 4313 |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
4314 decr_quickfix_busy(); |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
4315 |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
4316 curwin->w_cursor.lnum = lnum; |
7 | 4317 curwin->w_cursor.col = 0; |
4318 check_cursor(); | |
14796
74fd69162d50
patch 8.1.0410: the ex_copen() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14790
diff
changeset
|
4319 update_topline(); // scroll to show the line |
7 | 4320 } |
4321 | |
4322 /* | |
9432
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4323 * Move the cursor in the quickfix window to "lnum". |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4324 */ |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4325 static void |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4326 qf_win_goto(win_T *win, linenr_T lnum) |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4327 { |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4328 win_T *old_curwin = curwin; |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4329 |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4330 curwin = win; |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4331 curbuf = win->w_buffer; |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4332 curwin->w_cursor.lnum = lnum; |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4333 curwin->w_cursor.col = 0; |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4334 curwin->w_cursor.coladd = 0; |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4335 curwin->w_curswant = 0; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4336 update_topline(); // scroll to show the line |
9432
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4337 redraw_later(VALID); |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4338 curwin->w_redr_status = TRUE; // update ruler |
9432
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4339 curwin = old_curwin; |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4340 curbuf = curwin->w_buffer; |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4341 } |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4342 |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4343 /* |
9458
374afcf9d11d
commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d
Christian Brabandt <cb@256bit.org>
parents:
9432
diff
changeset
|
4344 * :cbottom/:lbottom commands. |
9432
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4345 */ |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4346 void |
14550
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
4347 ex_cbottom(exarg_T *eap) |
9432
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4348 { |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
4349 qf_info_T *qi; |
9458
374afcf9d11d
commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d
Christian Brabandt <cb@256bit.org>
parents:
9432
diff
changeset
|
4350 win_T *win; |
374afcf9d11d
commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d
Christian Brabandt <cb@256bit.org>
parents:
9432
diff
changeset
|
4351 |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
4352 if ((qi = qf_cmd_get_stack(eap, TRUE)) == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
4353 return; |
9458
374afcf9d11d
commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d
Christian Brabandt <cb@256bit.org>
parents:
9432
diff
changeset
|
4354 |
374afcf9d11d
commit https://github.com/vim/vim/commit/537ef08408c50e0c4104d57f74993b3b0ed9560d
Christian Brabandt <cb@256bit.org>
parents:
9432
diff
changeset
|
4355 win = qf_find_win(qi); |
9432
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4356 if (win != NULL && win->w_cursor.lnum != win->w_buffer->b_ml.ml_line_count) |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4357 qf_win_goto(win, win->w_buffer->b_ml.ml_line_count); |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4358 } |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4359 |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4360 /* |
7 | 4361 * Return the number of the current entry (line number in the quickfix |
4362 * window). | |
4363 */ | |
4364 linenr_T | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
4365 qf_current_entry(win_T *wp) |
7 | 4366 { |
644 | 4367 qf_info_T *qi = &ql_info; |
4368 | |
4369 if (IS_LL_WINDOW(wp)) | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4370 // In the location list window, use the referenced location list |
644 | 4371 qi = wp->w_llist_ref; |
4372 | |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
4373 return qf_get_curlist(qi)->qf_index; |
7 | 4374 } |
4375 | |
4376 /* | |
4377 * Update the cursor position in the quickfix window to the current error. | |
4378 * Return TRUE if there is a quickfix window. | |
4379 */ | |
4380 static int | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
4381 qf_win_pos_update( |
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
4382 qf_info_T *qi, |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4383 int old_qf_index) // previous qf_index or zero |
7 | 4384 { |
4385 win_T *win; | |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
4386 int qf_index = qf_get_curlist(qi)->qf_index; |
7 | 4387 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4388 // Put the cursor on the current error in the quickfix window, so that |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4389 // it's viewable. |
644 | 4390 win = qf_find_win(qi); |
7 | 4391 if (win != NULL |
4392 && qf_index <= win->w_buffer->b_ml.ml_line_count | |
4393 && old_qf_index != qf_index) | |
4394 { | |
4395 if (qf_index > old_qf_index) | |
4396 { | |
9432
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4397 win->w_redraw_top = old_qf_index; |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4398 win->w_redraw_bot = qf_index; |
7 | 4399 } |
4400 else | |
4401 { | |
9432
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4402 win->w_redraw_top = qf_index; |
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4403 win->w_redraw_bot = old_qf_index; |
7 | 4404 } |
9432
abb72f0b9e06
commit https://github.com/vim/vim/commit/dcb170018642ec144cd87d9d9fe076575b8d1263
Christian Brabandt <cb@256bit.org>
parents:
9397
diff
changeset
|
4405 qf_win_goto(win, qf_index); |
7 | 4406 } |
4407 return win != NULL; | |
4408 } | |
4409 | |
4410 /* | |
859 | 4411 * Check whether the given window is displaying the specified quickfix/location |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
4412 * stack. |
859 | 4413 */ |
4414 static int | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
4415 is_qf_win(win_T *win, qf_info_T *qi) |
859 | 4416 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4417 // A window displaying the quickfix buffer will have the w_llist_ref field |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4418 // set to NULL. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4419 // A window displaying a location list buffer will have the w_llist_ref |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4420 // pointing to the location list. |
859 | 4421 if (bt_quickfix(win->w_buffer)) |
14560
8413e66d00a1
patch 8.1.0293: checks for type of stack is cryptic
Christian Brabandt <cb@256bit.org>
parents:
14552
diff
changeset
|
4422 if ((IS_QF_STACK(qi) && win->w_llist_ref == NULL) |
8413e66d00a1
patch 8.1.0293: checks for type of stack is cryptic
Christian Brabandt <cb@256bit.org>
parents:
14552
diff
changeset
|
4423 || (IS_LL_STACK(qi) && win->w_llist_ref == qi)) |
859 | 4424 return TRUE; |
4425 | |
4426 return FALSE; | |
4427 } | |
4428 | |
4429 /* | |
26458
824fe105f5b9
patch 8.2.3759: quickfix buffer becomes hidden while still in a window
Bram Moolenaar <Bram@vim.org>
parents:
26364
diff
changeset
|
4430 * Find a window displaying the quickfix/location stack 'qi' in the current tab |
824fe105f5b9
patch 8.2.3759: quickfix buffer becomes hidden while still in a window
Bram Moolenaar <Bram@vim.org>
parents:
26364
diff
changeset
|
4431 * page. |
644 | 4432 */ |
4433 static win_T * | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
4434 qf_find_win(qf_info_T *qi) |
644 | 4435 { |
4436 win_T *win; | |
4437 | |
4438 FOR_ALL_WINDOWS(win) | |
859 | 4439 if (is_qf_win(win, qi)) |
13115
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
4440 return win; |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
4441 return NULL; |
644 | 4442 } |
4443 | |
4444 /* | |
859 | 4445 * Find a quickfix buffer. |
26458
824fe105f5b9
patch 8.2.3759: quickfix buffer becomes hidden while still in a window
Bram Moolenaar <Bram@vim.org>
parents:
26364
diff
changeset
|
4446 * Searches in windows opened in all the tab pages. |
7 | 4447 */ |
4448 static buf_T * | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
4449 qf_find_buf(qf_info_T *qi) |
7 | 4450 { |
859 | 4451 tabpage_T *tp; |
644 | 4452 win_T *win; |
4453 | |
15740
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
4454 if (qi->qf_bufnr != INVALID_QFBUFNR) |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
4455 { |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
4456 buf_T *qfbuf; |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
4457 qfbuf = buflist_findnr(qi->qf_bufnr); |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
4458 if (qfbuf != NULL) |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
4459 return qfbuf; |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
4460 // buffer is no longer present |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
4461 qi->qf_bufnr = INVALID_QFBUFNR; |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
4462 } |
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
4463 |
859 | 4464 FOR_ALL_TAB_WINDOWS(tp, win) |
4465 if (is_qf_win(win, qi)) | |
4466 return win->w_buffer; | |
4467 | |
4468 return NULL; | |
7 | 4469 } |
4470 | |
4471 /* | |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4472 * Process the 'quickfixtextfunc' option value. |
26175
6b4f017d7005
patch 8.2.3619: cannot use a lambda for 'operatorfunc'
Bram Moolenaar <Bram@vim.org>
parents:
26026
diff
changeset
|
4473 * Returns OK or FAIL. |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4474 */ |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4475 int |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4476 qf_process_qftf_option(void) |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4477 { |
26175
6b4f017d7005
patch 8.2.3619: cannot use a lambda for 'operatorfunc'
Bram Moolenaar <Bram@vim.org>
parents:
26026
diff
changeset
|
4478 return option_set_callback_func(p_qftf, &qftf_cb); |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4479 } |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4480 |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4481 /* |
23203
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4482 * Update the w:quickfix_title variable in the quickfix/location list window in |
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4483 * all the tab pages. |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
4484 */ |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
4485 static void |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
4486 qf_update_win_titlevar(qf_info_T *qi) |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
4487 { |
23203
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4488 qf_list_T *qfl = qf_get_curlist(qi); |
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4489 tabpage_T *tp; |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
4490 win_T *win; |
23203
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4491 win_T *save_curwin = curwin; |
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4492 |
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4493 FOR_ALL_TAB_WINDOWS(tp, win) |
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4494 { |
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4495 if (is_qf_win(win, qi)) |
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4496 { |
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4497 curwin = win; |
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4498 qf_set_title_var(qfl); |
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4499 } |
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4500 } |
db97415750ce
patch 8.2.2147: quickfix window title not updated in all tab pages
Bram Moolenaar <Bram@vim.org>
parents:
23045
diff
changeset
|
4501 curwin = save_curwin; |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
4502 } |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
4503 |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
4504 /* |
7 | 4505 * Find the quickfix buffer. If it exists, update the contents. |
4506 */ | |
4507 static void | |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4508 qf_update_buffer(qf_info_T *qi, qfline_T *old_last) |
7 | 4509 { |
4510 buf_T *buf; | |
3016 | 4511 win_T *win; |
7 | 4512 aco_save_T aco; |
4513 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4514 // Check if a buffer for the quickfix list exists. Update it. |
644 | 4515 buf = qf_find_buf(qi); |
7 | 4516 if (buf != NULL) |
4517 { | |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4518 linenr_T old_line_count = buf->b_ml.ml_line_count; |
20762
68170c89e355
patch 8.2.0933: 'quickfixtextfunc' does not get window ID of location list
Bram Moolenaar <Bram@vim.org>
parents:
20729
diff
changeset
|
4519 int qf_winid = 0; |
68170c89e355
patch 8.2.0933: 'quickfixtextfunc' does not get window ID of location list
Bram Moolenaar <Bram@vim.org>
parents:
20729
diff
changeset
|
4520 |
68170c89e355
patch 8.2.0933: 'quickfixtextfunc' does not get window ID of location list
Bram Moolenaar <Bram@vim.org>
parents:
20729
diff
changeset
|
4521 if (IS_LL_STACK(qi)) |
24962
437b8be91993
patch 8.2.3018: 'quickfixtextfunc' formatting is lost when switching buffers
Bram Moolenaar <Bram@vim.org>
parents:
24768
diff
changeset
|
4522 { |
437b8be91993
patch 8.2.3018: 'quickfixtextfunc' formatting is lost when switching buffers
Bram Moolenaar <Bram@vim.org>
parents:
24768
diff
changeset
|
4523 if (curwin->w_llist == qi) |
437b8be91993
patch 8.2.3018: 'quickfixtextfunc' formatting is lost when switching buffers
Bram Moolenaar <Bram@vim.org>
parents:
24768
diff
changeset
|
4524 win = curwin; |
437b8be91993
patch 8.2.3018: 'quickfixtextfunc' formatting is lost when switching buffers
Bram Moolenaar <Bram@vim.org>
parents:
24768
diff
changeset
|
4525 else |
437b8be91993
patch 8.2.3018: 'quickfixtextfunc' formatting is lost when switching buffers
Bram Moolenaar <Bram@vim.org>
parents:
24768
diff
changeset
|
4526 { |
27873
d1af65b322d0
patch 8.2.4462: not enough testing for quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27855
diff
changeset
|
4527 // Find the file window (non-quickfix) with this location list |
24962
437b8be91993
patch 8.2.3018: 'quickfixtextfunc' formatting is lost when switching buffers
Bram Moolenaar <Bram@vim.org>
parents:
24768
diff
changeset
|
4528 win = qf_find_win_with_loclist(qi); |
437b8be91993
patch 8.2.3018: 'quickfixtextfunc' formatting is lost when switching buffers
Bram Moolenaar <Bram@vim.org>
parents:
24768
diff
changeset
|
4529 if (win == NULL) |
27873
d1af65b322d0
patch 8.2.4462: not enough testing for quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27855
diff
changeset
|
4530 // File window is not found. Find the location list window. |
d1af65b322d0
patch 8.2.4462: not enough testing for quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27855
diff
changeset
|
4531 win = qf_find_win(qi); |
d1af65b322d0
patch 8.2.4462: not enough testing for quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27855
diff
changeset
|
4532 if (win == NULL) |
24962
437b8be91993
patch 8.2.3018: 'quickfixtextfunc' formatting is lost when switching buffers
Bram Moolenaar <Bram@vim.org>
parents:
24768
diff
changeset
|
4533 return; |
437b8be91993
patch 8.2.3018: 'quickfixtextfunc' formatting is lost when switching buffers
Bram Moolenaar <Bram@vim.org>
parents:
24768
diff
changeset
|
4534 } |
437b8be91993
patch 8.2.3018: 'quickfixtextfunc' formatting is lost when switching buffers
Bram Moolenaar <Bram@vim.org>
parents:
24768
diff
changeset
|
4535 qf_winid = win->w_id; |
437b8be91993
patch 8.2.3018: 'quickfixtextfunc' formatting is lost when switching buffers
Bram Moolenaar <Bram@vim.org>
parents:
24768
diff
changeset
|
4536 } |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4537 |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4538 if (old_last == NULL) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4539 // set curwin/curbuf to buf and save a few things |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4540 aucmd_prepbuf(&aco, buf); |
7 | 4541 |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
4542 qf_update_win_titlevar(qi); |
3016 | 4543 |
20762
68170c89e355
patch 8.2.0933: 'quickfixtextfunc' does not get window ID of location list
Bram Moolenaar <Bram@vim.org>
parents:
20729
diff
changeset
|
4544 qf_fill_buffer(qf_get_curlist(qi), buf, old_last, qf_winid); |
11705
c43118ecb0a3
patch 8.0.0735: no indication that the quickfix window/buffer changed
Christian Brabandt <cb@256bit.org>
parents:
11700
diff
changeset
|
4545 ++CHANGEDTICK(buf); |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4546 |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4547 if (old_last == NULL) |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4548 { |
8932
25c2031e9f9f
commit https://github.com/vim/vim/commit/c1808d5822ed9534ef7f0fe509b15bee92a5cc28
Christian Brabandt <cb@256bit.org>
parents:
8751
diff
changeset
|
4549 (void)qf_win_pos_update(qi, 0); |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4550 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4551 // restore curwin/curbuf and a few other things |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4552 aucmd_restbuf(&aco); |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4553 } |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4554 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4555 // Only redraw when added lines are visible. This avoids flickering |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4556 // when the added lines are not visible. |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4557 if ((win = qf_find_win(qi)) != NULL && old_line_count < win->w_botline) |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4558 redraw_buf_later(buf, NOT_VALID); |
7 | 4559 } |
4560 } | |
4561 | |
6793 | 4562 /* |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4563 * Add an error line to the quickfix buffer. |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4564 */ |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4565 static int |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4566 qf_buf_add_line( |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4567 buf_T *buf, // quickfix window buffer |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4568 linenr_T lnum, |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4569 qfline_T *qfp, |
20762
68170c89e355
patch 8.2.0933: 'quickfixtextfunc' does not get window ID of location list
Bram Moolenaar <Bram@vim.org>
parents:
20729
diff
changeset
|
4570 char_u *dirname, |
22454
849c6f766b19
patch 8.2.1775: MS-Windows: adding a long quickfix list is slow
Bram Moolenaar <Bram@vim.org>
parents:
22256
diff
changeset
|
4571 int first_bufline, |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4572 char_u *qftf_str) |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4573 { |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4574 int len; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4575 buf_T *errbuf; |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4576 |
26771
fc859aea8cec
patch 8.2.3914: various spelling mistakes in comments
Bram Moolenaar <Bram@vim.org>
parents:
26602
diff
changeset
|
4577 // If the 'quickfixtextfunc' function returned a non-empty custom string |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4578 // for this entry, then use it. |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4579 if (qftf_str != NULL && *qftf_str != NUL) |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4580 vim_strncpy(IObuff, qftf_str, IOSIZE - 1); |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4581 else |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4582 { |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4583 if (qfp->qf_module != NULL) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4584 { |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4585 vim_strncpy(IObuff, qfp->qf_module, IOSIZE - 1); |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4586 len = (int)STRLEN(IObuff); |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4587 } |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4588 else if (qfp->qf_fnum != 0 |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4589 && (errbuf = buflist_findnr(qfp->qf_fnum)) != NULL |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4590 && errbuf->b_fname != NULL) |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4591 { |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4592 if (qfp->qf_type == 1) // :helpgrep |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4593 vim_strncpy(IObuff, gettail(errbuf->b_fname), IOSIZE - 1); |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4594 else |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4595 { |
22454
849c6f766b19
patch 8.2.1775: MS-Windows: adding a long quickfix list is slow
Bram Moolenaar <Bram@vim.org>
parents:
22256
diff
changeset
|
4596 // Shorten the file name if not done already. |
849c6f766b19
patch 8.2.1775: MS-Windows: adding a long quickfix list is slow
Bram Moolenaar <Bram@vim.org>
parents:
22256
diff
changeset
|
4597 // For optimization, do this only for the first entry in a |
849c6f766b19
patch 8.2.1775: MS-Windows: adding a long quickfix list is slow
Bram Moolenaar <Bram@vim.org>
parents:
22256
diff
changeset
|
4598 // buffer. |
849c6f766b19
patch 8.2.1775: MS-Windows: adding a long quickfix list is slow
Bram Moolenaar <Bram@vim.org>
parents:
22256
diff
changeset
|
4599 if (first_bufline && (errbuf->b_sfname == NULL |
849c6f766b19
patch 8.2.1775: MS-Windows: adding a long quickfix list is slow
Bram Moolenaar <Bram@vim.org>
parents:
22256
diff
changeset
|
4600 || mch_isFullName(errbuf->b_sfname))) |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4601 { |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4602 if (*dirname == NUL) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4603 mch_dirname(dirname, MAXPATHL); |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4604 shorten_buf_fname(errbuf, dirname, FALSE); |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4605 } |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4606 vim_strncpy(IObuff, errbuf->b_fname, IOSIZE - 1); |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4607 } |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4608 len = (int)STRLEN(IObuff); |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4609 } |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4610 else |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4611 len = 0; |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4612 |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4613 if (len < IOSIZE - 1) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4614 IObuff[len++] = '|'; |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4615 |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4616 if (qfp->qf_lnum > 0) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4617 { |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
4618 qf_range_text(qfp, IObuff + len, IOSIZE - len); |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4619 len += (int)STRLEN(IObuff + len); |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4620 |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4621 vim_snprintf((char *)IObuff + len, IOSIZE - len, "%s", |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4622 (char *)qf_types(qfp->qf_type, qfp->qf_nr)); |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4623 len += (int)STRLEN(IObuff + len); |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4624 } |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4625 else if (qfp->qf_pattern != NULL) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4626 { |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4627 qf_fmt_text(qfp->qf_pattern, IObuff + len, IOSIZE - len); |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4628 len += (int)STRLEN(IObuff + len); |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4629 } |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4630 if (len < IOSIZE - 2) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4631 { |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4632 IObuff[len++] = '|'; |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4633 IObuff[len++] = ' '; |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4634 } |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4635 |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4636 // Remove newlines and leading whitespace from the text. |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4637 // For an unrecognized line keep the indent, the compiler may |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4638 // mark a word with ^^^^. |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4639 qf_fmt_text(len > 3 ? skipwhite(qfp->qf_text) : qfp->qf_text, |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4640 IObuff + len, IOSIZE - len); |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
4641 } |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4642 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4643 if (ml_append_buf(buf, lnum, IObuff, |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4644 (colnr_T)STRLEN(IObuff) + 1, FALSE) == FAIL) |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4645 return FAIL; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4646 |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4647 return OK; |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4648 } |
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4649 |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4650 /* |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4651 * Call the 'quickfixtextfunc' function to get the list of lines to display in |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4652 * the quickfix window for the entries 'start_idx' to 'end_idx'. |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4653 */ |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4654 static list_T * |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4655 call_qftf_func(qf_list_T *qfl, int qf_winid, long start_idx, long end_idx) |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4656 { |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4657 callback_T *cb = &qftf_cb; |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4658 list_T *qftf_list = NULL; |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4659 |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4660 // If 'quickfixtextfunc' is set, then use the user-supplied function to get |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4661 // the text to display. Use the local value of 'quickfixtextfunc' if it is |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4662 // set. |
28451
e015d650ea9f
patch 8.2.4750: small pieces of dead code
Bram Moolenaar <Bram@vim.org>
parents:
28315
diff
changeset
|
4663 if (qfl->qf_qftf_cb.cb_name != NULL) |
e015d650ea9f
patch 8.2.4750: small pieces of dead code
Bram Moolenaar <Bram@vim.org>
parents:
28315
diff
changeset
|
4664 cb = &qfl->qf_qftf_cb; |
e015d650ea9f
patch 8.2.4750: small pieces of dead code
Bram Moolenaar <Bram@vim.org>
parents:
28315
diff
changeset
|
4665 if (cb->cb_name != NULL) |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4666 { |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4667 typval_T args[1]; |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4668 dict_T *d; |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4669 typval_T rettv; |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4670 |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4671 // create the dict argument |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4672 if ((d = dict_alloc_lock(VAR_FIXED)) == NULL) |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4673 return NULL; |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4674 dict_add_number(d, "quickfix", (long)IS_QF_LIST(qfl)); |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4675 dict_add_number(d, "winid", (long)qf_winid); |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4676 dict_add_number(d, "id", (long)qfl->qf_id); |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4677 dict_add_number(d, "start_idx", start_idx); |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4678 dict_add_number(d, "end_idx", end_idx); |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4679 ++d->dv_refcount; |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4680 args[0].v_type = VAR_DICT; |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4681 args[0].vval.v_dict = d; |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4682 |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4683 qftf_list = NULL; |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4684 if (call_callback(cb, 0, &rettv, 1, args) != FAIL) |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4685 { |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4686 if (rettv.v_type == VAR_LIST) |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4687 { |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4688 qftf_list = rettv.vval.v_list; |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4689 qftf_list->lv_refcount++; |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4690 } |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4691 clear_tv(&rettv); |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4692 } |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4693 dict_unref(d); |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4694 } |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4695 |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4696 return qftf_list; |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4697 } |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4698 |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4699 /* |
7 | 4700 * Fill current buffer with quickfix errors, replacing any previous contents. |
4701 * curbuf must be the quickfix buffer! | |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4702 * If "old_last" is not NULL append the items after this one. |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4703 * When "old_last" is NULL then "buf" must equal "curbuf"! Because |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4704 * ml_delete() is used and autocommands will be triggered. |
7 | 4705 */ |
4706 static void | |
20762
68170c89e355
patch 8.2.0933: 'quickfixtextfunc' does not get window ID of location list
Bram Moolenaar <Bram@vim.org>
parents:
20729
diff
changeset
|
4707 qf_fill_buffer(qf_list_T *qfl, buf_T *buf, qfline_T *old_last, int qf_winid) |
7 | 4708 { |
230 | 4709 linenr_T lnum; |
4710 qfline_T *qfp; | |
4711 int old_KeyTyped = KeyTyped; | |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4712 list_T *qftf_list = NULL; |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4713 listitem_T *qftf_li = NULL; |
7 | 4714 |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4715 if (old_last == NULL) |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4716 { |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4717 if (buf != curbuf) |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4718 { |
10359
66f1b5bf3fa6
commit https://github.com/vim/vim/commit/95f096030ed1a8afea028f2ea295d6f6a70f466f
Christian Brabandt <cb@256bit.org>
parents:
10349
diff
changeset
|
4719 internal_error("qf_fill_buffer()"); |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4720 return; |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4721 } |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4722 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4723 // delete all existing lines |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4724 while ((curbuf->b_ml.ml_flags & ML_EMPTY) == 0) |
20599
d571231175b4
patch 8.2.0853: ml_delete() often called with FALSE argument
Bram Moolenaar <Bram@vim.org>
parents:
20007
diff
changeset
|
4725 (void)ml_delete((linenr_T)1); |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4726 } |
7 | 4727 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4728 // Check if there is anything to display |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
4729 if (qfl != NULL) |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
4730 { |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
4731 char_u dirname[MAXPATHL]; |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4732 int invalid_val = FALSE; |
22454
849c6f766b19
patch 8.2.1775: MS-Windows: adding a long quickfix list is slow
Bram Moolenaar <Bram@vim.org>
parents:
22256
diff
changeset
|
4733 int prev_bufnr = -1; |
13819
31bb8e1f7625
patch 8.0.1781: file names in quickfix window are not shortened
Christian Brabandt <cb@256bit.org>
parents:
13802
diff
changeset
|
4734 |
31bb8e1f7625
patch 8.0.1781: file names in quickfix window are not shortened
Christian Brabandt <cb@256bit.org>
parents:
13802
diff
changeset
|
4735 *dirname = NUL; |
31bb8e1f7625
patch 8.0.1781: file names in quickfix window are not shortened
Christian Brabandt <cb@256bit.org>
parents:
13802
diff
changeset
|
4736 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4737 // Add one line for each error |
22870
69b48d2822ec
patch 8.2.1982: quickfix window now updated when adding invalid entries
Bram Moolenaar <Bram@vim.org>
parents:
22699
diff
changeset
|
4738 if (old_last == NULL) |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4739 { |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
4740 qfp = qfl->qf_start; |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4741 lnum = 0; |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4742 } |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4743 else |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4744 { |
22870
69b48d2822ec
patch 8.2.1982: quickfix window now updated when adding invalid entries
Bram Moolenaar <Bram@vim.org>
parents:
22699
diff
changeset
|
4745 if (old_last->qf_next != NULL) |
69b48d2822ec
patch 8.2.1982: quickfix window now updated when adding invalid entries
Bram Moolenaar <Bram@vim.org>
parents:
22699
diff
changeset
|
4746 qfp = old_last->qf_next; |
69b48d2822ec
patch 8.2.1982: quickfix window now updated when adding invalid entries
Bram Moolenaar <Bram@vim.org>
parents:
22699
diff
changeset
|
4747 else |
69b48d2822ec
patch 8.2.1982: quickfix window now updated when adding invalid entries
Bram Moolenaar <Bram@vim.org>
parents:
22699
diff
changeset
|
4748 qfp = old_last; |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4749 lnum = buf->b_ml.ml_line_count; |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4750 } |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4751 |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4752 qftf_list = call_qftf_func(qfl, qf_winid, (long)(lnum + 1), |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4753 (long)qfl->qf_count); |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4754 if (qftf_list != NULL) |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4755 qftf_li = qftf_list->lv_first; |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4756 |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
4757 while (lnum < qfl->qf_count) |
7 | 4758 { |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4759 char_u *qftf_str = NULL; |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4760 |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4761 // Use the text supplied by the user defined function (if any). |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4762 // If the returned value is not string, then ignore the rest |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4763 // of the returned values and use the default. |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4764 if (qftf_li != NULL && !invalid_val) |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4765 { |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4766 qftf_str = tv_get_string_chk(&qftf_li->li_tv); |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4767 if (qftf_str == NULL) |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4768 invalid_val = TRUE; |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
4769 } |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4770 |
22454
849c6f766b19
patch 8.2.1775: MS-Windows: adding a long quickfix list is slow
Bram Moolenaar <Bram@vim.org>
parents:
22256
diff
changeset
|
4771 if (qf_buf_add_line(buf, lnum, qfp, dirname, |
849c6f766b19
patch 8.2.1775: MS-Windows: adding a long quickfix list is slow
Bram Moolenaar <Bram@vim.org>
parents:
22256
diff
changeset
|
4772 prev_bufnr != qfp->qf_fnum, qftf_str) == FAIL) |
7 | 4773 break; |
13992
710b1bb82f2c
patch 8.1.0014: qf_init_ext() is too long
Christian Brabandt <cb@256bit.org>
parents:
13984
diff
changeset
|
4774 |
22454
849c6f766b19
patch 8.2.1775: MS-Windows: adding a long quickfix list is slow
Bram Moolenaar <Bram@vim.org>
parents:
22256
diff
changeset
|
4775 prev_bufnr = qfp->qf_fnum; |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4776 ++lnum; |
7 | 4777 qfp = qfp->qf_next; |
9195
543f068f3706
commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa
Christian Brabandt <cb@256bit.org>
parents:
9175
diff
changeset
|
4778 if (qfp == NULL) |
543f068f3706
commit https://github.com/vim/vim/commit/83e6d7ac6a1c2a0cb5ee6c8420a5dc792f1d5ffa
Christian Brabandt <cb@256bit.org>
parents:
9175
diff
changeset
|
4779 break; |
20814
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4780 |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4781 if (qftf_li != NULL) |
f23c6543a54d
patch 8.2.0959: using 'quickfixtextfunc' is a bit slow
Bram Moolenaar <Bram@vim.org>
parents:
20764
diff
changeset
|
4782 qftf_li = qftf_li->li_next; |
7 | 4783 } |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4784 |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4785 if (old_last == NULL) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4786 // Delete the empty line which is now at the end |
20599
d571231175b4
patch 8.2.0853: ml_delete() often called with FALSE argument
Bram Moolenaar <Bram@vim.org>
parents:
20007
diff
changeset
|
4787 (void)ml_delete(lnum + 1); |
7 | 4788 } |
4789 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4790 // correct cursor position |
7 | 4791 check_lnums(TRUE); |
4792 | |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4793 if (old_last == NULL) |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4794 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4795 // Set the 'filetype' to "qf" each time after filling the buffer. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4796 // This resembles reading a file into a buffer, it's more logical when |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4797 // using autocommands. |
11589
39787def24bb
patch 8.0.0677: setting 'filetype' may switch buffers
Christian Brabandt <cb@256bit.org>
parents:
11549
diff
changeset
|
4798 ++curbuf_lock; |
28457
4dcccb2673fe
patch 8.2.4753: error from setting an option is silently ignored
Bram Moolenaar <Bram@vim.org>
parents:
28451
diff
changeset
|
4799 set_option_value_give_err((char_u *)"ft", |
4dcccb2673fe
patch 8.2.4753: error from setting an option is silently ignored
Bram Moolenaar <Bram@vim.org>
parents:
28451
diff
changeset
|
4800 0L, (char_u *)"qf", OPT_LOCAL); |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4801 curbuf->b_p_ma = FALSE; |
7 | 4802 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4803 keep_filetype = TRUE; // don't detect 'filetype' |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4804 apply_autocmds(EVENT_BUFREADPOST, (char_u *)"quickfix", NULL, |
7 | 4805 FALSE, curbuf); |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4806 apply_autocmds(EVENT_BUFWINENTER, (char_u *)"quickfix", NULL, |
7 | 4807 FALSE, curbuf); |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4808 keep_filetype = FALSE; |
11589
39787def24bb
patch 8.0.0677: setting 'filetype' may switch buffers
Christian Brabandt <cb@256bit.org>
parents:
11549
diff
changeset
|
4809 --curbuf_lock; |
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13252
diff
changeset
|
4810 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4811 // make sure it will be redrawn |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4812 redraw_curbuf_later(NOT_VALID); |
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
4813 } |
7 | 4814 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
4815 // Restore KeyTyped, setting 'filetype' may reset it. |
7 | 4816 KeyTyped = old_KeyTyped; |
4817 } | |
4818 | |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
4819 /* |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
4820 * For every change made to the quickfix list, update the changed tick. |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
4821 */ |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
4822 static void |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
4823 qf_list_changed(qf_list_T *qfl) |
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
4824 { |
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
4825 qfl->qf_changedtick++; |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
4826 } |
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
4827 |
7 | 4828 /* |
14250
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4829 * Return the quickfix/location list number with the given identifier. |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4830 * Returns -1 if list is not found. |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4831 */ |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4832 static int |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4833 qf_id2nr(qf_info_T *qi, int_u qfid) |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4834 { |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4835 int qf_idx; |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4836 |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4837 for (qf_idx = 0; qf_idx < qi->qf_listcount; qf_idx++) |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4838 if (qi->qf_lists[qf_idx].qf_id == qfid) |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4839 return qf_idx; |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4840 return INVALID_QFIDX; |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4841 } |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4842 |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
4843 /* |
14495
178162aeebeb
patch 8.1.0261: Coverity complains about a negative array index
Christian Brabandt <cb@256bit.org>
parents:
14491
diff
changeset
|
4844 * If the current list is not "save_qfid" and we can find the list with that ID |
178162aeebeb
patch 8.1.0261: Coverity complains about a negative array index
Christian Brabandt <cb@256bit.org>
parents:
14491
diff
changeset
|
4845 * then make it the current list. |
178162aeebeb
patch 8.1.0261: Coverity complains about a negative array index
Christian Brabandt <cb@256bit.org>
parents:
14491
diff
changeset
|
4846 * This is used when autocommands may have changed the current list. |
14507
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4847 * Returns OK if successfully restored the list. Returns FAIL if the list with |
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4848 * the specified identifier (save_qfid) is not found in the stack. |
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4849 */ |
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4850 static int |
14495
178162aeebeb
patch 8.1.0261: Coverity complains about a negative array index
Christian Brabandt <cb@256bit.org>
parents:
14491
diff
changeset
|
4851 qf_restore_list(qf_info_T *qi, int_u save_qfid) |
178162aeebeb
patch 8.1.0261: Coverity complains about a negative array index
Christian Brabandt <cb@256bit.org>
parents:
14491
diff
changeset
|
4852 { |
178162aeebeb
patch 8.1.0261: Coverity complains about a negative array index
Christian Brabandt <cb@256bit.org>
parents:
14491
diff
changeset
|
4853 int curlist; |
178162aeebeb
patch 8.1.0261: Coverity complains about a negative array index
Christian Brabandt <cb@256bit.org>
parents:
14491
diff
changeset
|
4854 |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
4855 if (qf_get_curlist(qi)->qf_id != save_qfid) |
14495
178162aeebeb
patch 8.1.0261: Coverity complains about a negative array index
Christian Brabandt <cb@256bit.org>
parents:
14491
diff
changeset
|
4856 { |
178162aeebeb
patch 8.1.0261: Coverity complains about a negative array index
Christian Brabandt <cb@256bit.org>
parents:
14491
diff
changeset
|
4857 curlist = qf_id2nr(qi, save_qfid); |
14507
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4858 if (curlist < 0) |
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4859 // list is not present |
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4860 return FAIL; |
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4861 qi->qf_curlist = curlist; |
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4862 } |
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4863 return OK; |
14495
178162aeebeb
patch 8.1.0261: Coverity complains about a negative array index
Christian Brabandt <cb@256bit.org>
parents:
14491
diff
changeset
|
4864 } |
178162aeebeb
patch 8.1.0261: Coverity complains about a negative array index
Christian Brabandt <cb@256bit.org>
parents:
14491
diff
changeset
|
4865 |
178162aeebeb
patch 8.1.0261: Coverity complains about a negative array index
Christian Brabandt <cb@256bit.org>
parents:
14491
diff
changeset
|
4866 /* |
14469
0211e295835e
patch 8.1.0248: duplicated quickfix code
Christian Brabandt <cb@256bit.org>
parents:
14433
diff
changeset
|
4867 * Jump to the first entry if there is one. |
0211e295835e
patch 8.1.0248: duplicated quickfix code
Christian Brabandt <cb@256bit.org>
parents:
14433
diff
changeset
|
4868 */ |
0211e295835e
patch 8.1.0248: duplicated quickfix code
Christian Brabandt <cb@256bit.org>
parents:
14433
diff
changeset
|
4869 static void |
0211e295835e
patch 8.1.0248: duplicated quickfix code
Christian Brabandt <cb@256bit.org>
parents:
14433
diff
changeset
|
4870 qf_jump_first(qf_info_T *qi, int_u save_qfid, int forceit) |
0211e295835e
patch 8.1.0248: duplicated quickfix code
Christian Brabandt <cb@256bit.org>
parents:
14433
diff
changeset
|
4871 { |
14507
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4872 if (qf_restore_list(qi, save_qfid) == FAIL) |
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4873 return; |
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4874 |
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
4875 // Autocommands might have cleared the list, check for that. |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
4876 if (!qf_list_empty(qf_get_curlist(qi))) |
14469
0211e295835e
patch 8.1.0248: duplicated quickfix code
Christian Brabandt <cb@256bit.org>
parents:
14433
diff
changeset
|
4877 qf_jump(qi, 0, 0, forceit); |
0211e295835e
patch 8.1.0248: duplicated quickfix code
Christian Brabandt <cb@256bit.org>
parents:
14433
diff
changeset
|
4878 } |
0211e295835e
patch 8.1.0248: duplicated quickfix code
Christian Brabandt <cb@256bit.org>
parents:
14433
diff
changeset
|
4879 |
0211e295835e
patch 8.1.0248: duplicated quickfix code
Christian Brabandt <cb@256bit.org>
parents:
14433
diff
changeset
|
4880 /* |
41 | 4881 * Return TRUE when using ":vimgrep" for ":grep". |
4882 */ | |
4883 int | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
4884 grep_internal(cmdidx_T cmdidx) |
41 | 4885 { |
661 | 4886 return ((cmdidx == CMD_grep |
4887 || cmdidx == CMD_lgrep | |
4888 || cmdidx == CMD_grepadd | |
4889 || cmdidx == CMD_lgrepadd) | |
41 | 4890 && STRCMP("internal", |
4891 *curbuf->b_p_gp == NUL ? p_gp : curbuf->b_p_gp) == 0); | |
4892 } | |
4893 | |
4894 /* | |
14852
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4895 * Return the make/grep autocmd name. |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4896 */ |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4897 static char_u * |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4898 make_get_auname(cmdidx_T cmdidx) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4899 { |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4900 switch (cmdidx) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4901 { |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4902 case CMD_make: return (char_u *)"make"; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4903 case CMD_lmake: return (char_u *)"lmake"; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4904 case CMD_grep: return (char_u *)"grep"; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4905 case CMD_lgrep: return (char_u *)"lgrep"; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4906 case CMD_grepadd: return (char_u *)"grepadd"; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4907 case CMD_lgrepadd: return (char_u *)"lgrepadd"; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4908 default: return NULL; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4909 } |
7 | 4910 } |
4911 | |
4912 /* | |
4913 * Return the name for the errorfile, in allocated memory. | |
4914 * Find a new unique name when 'makeef' contains "##". | |
4915 * Returns NULL for error. | |
4916 */ | |
4917 static char_u * | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
4918 get_mef_name(void) |
7 | 4919 { |
4920 char_u *p; | |
4921 char_u *name; | |
4922 static int start = -1; | |
4923 static int off = 0; | |
4924 #ifdef HAVE_LSTAT | |
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
9379
diff
changeset
|
4925 stat_T sb; |
7 | 4926 #endif |
4927 | |
4928 if (*p_mef == NUL) | |
4929 { | |
6721 | 4930 name = vim_tempname('e', FALSE); |
7 | 4931 if (name == NULL) |
26877
06a137af96f8
patch 8.2.3967: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26865
diff
changeset
|
4932 emsg(_(e_cant_get_temp_file_name)); |
7 | 4933 return name; |
4934 } | |
4935 | |
4936 for (p = p_mef; *p; ++p) | |
4937 if (p[0] == '#' && p[1] == '#') | |
4938 break; | |
4939 | |
4940 if (*p == NUL) | |
4941 return vim_strsave(p_mef); | |
4942 | |
14852
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4943 // Keep trying until the name doesn't exist yet. |
7 | 4944 for (;;) |
4945 { | |
4946 if (start == -1) | |
4947 start = mch_get_pid(); | |
4948 else | |
4949 off += 19; | |
4950 | |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
4951 name = alloc_id(STRLEN(p_mef) + 30, aid_qf_mef_name); |
7 | 4952 if (name == NULL) |
4953 break; | |
4954 STRCPY(name, p_mef); | |
4955 sprintf((char *)name + (p - p_mef), "%d%d", start, off); | |
4956 STRCAT(name, p + 2); | |
4957 if (mch_getperm(name) < 0 | |
4958 #ifdef HAVE_LSTAT | |
14852
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4959 // Don't accept a symbolic link, it's a security risk. |
7 | 4960 && mch_lstat((char *)name, &sb) < 0 |
4961 #endif | |
4962 ) | |
4963 break; | |
4964 vim_free(name); | |
4965 } | |
4966 return name; | |
4967 } | |
4968 | |
4969 /* | |
14852
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4970 * Form the complete command line to invoke 'make'/'grep'. Quote the command |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4971 * using 'shellquote' and append 'shellpipe'. Echo the fully formed command. |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4972 */ |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4973 static char_u * |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4974 make_get_fullcmd(char_u *makecmd, char_u *fname) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4975 { |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4976 char_u *cmd; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4977 unsigned len; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4978 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4979 len = (unsigned)STRLEN(p_shq) * 2 + (unsigned)STRLEN(makecmd) + 1; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4980 if (*p_sp != NUL) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4981 len += (unsigned)STRLEN(p_sp) + (unsigned)STRLEN(fname) + 3; |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
4982 cmd = alloc_id(len, aid_qf_makecmd); |
14852
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4983 if (cmd == NULL) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4984 return NULL; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4985 sprintf((char *)cmd, "%s%s%s", (char *)p_shq, (char *)makecmd, |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4986 (char *)p_shq); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4987 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4988 // If 'shellpipe' empty: don't redirect to 'errorfile'. |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4989 if (*p_sp != NUL) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4990 append_redir(cmd, len, p_sp, fname); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4991 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4992 // Display the fully formed command. Output a newline if there's something |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4993 // else than the :make command that was typed (in which case the cursor is |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4994 // in column 0). |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4995 if (msg_col == 0) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4996 msg_didout = FALSE; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4997 msg_start(); |
15543
dd725a8ab112
patch 8.1.0779: argument for message functions is inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
15490
diff
changeset
|
4998 msg_puts(":!"); |
14852
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
4999 msg_outtrans(cmd); // show what we are doing |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5000 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5001 return cmd; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5002 } |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5003 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5004 /* |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5005 * Used for ":make", ":lmake", ":grep", ":lgrep", ":grepadd", and ":lgrepadd" |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5006 */ |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5007 void |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5008 ex_make(exarg_T *eap) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5009 { |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5010 char_u *fname; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5011 char_u *cmd; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5012 char_u *enc = NULL; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5013 win_T *wp = NULL; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5014 qf_info_T *qi = &ql_info; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5015 int res; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5016 char_u *au_name = NULL; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5017 int_u save_qfid; |
27938
b65a50d2fa4f
patch 8.2.4494: the find_tags() function is much too long
Bram Moolenaar <Bram@vim.org>
parents:
27897
diff
changeset
|
5018 char_u *errorformat = p_efm; |
b65a50d2fa4f
patch 8.2.4494: the find_tags() function is much too long
Bram Moolenaar <Bram@vim.org>
parents:
27897
diff
changeset
|
5019 int newlist = TRUE; |
14852
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5020 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5021 // Redirect ":grep" to ":vimgrep" if 'grepprg' is "internal". |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5022 if (grep_internal(eap->cmdidx)) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5023 { |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5024 ex_vimgrep(eap); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5025 return; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5026 } |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5027 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5028 au_name = make_get_auname(eap->cmdidx); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5029 if (au_name != NULL && apply_autocmds(EVENT_QUICKFIXCMDPRE, au_name, |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5030 curbuf->b_fname, TRUE, curbuf)) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5031 { |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5032 #ifdef FEAT_EVAL |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5033 if (aborting()) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5034 return; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5035 #endif |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5036 } |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5037 enc = (*curbuf->b_p_menc != NUL) ? curbuf->b_p_menc : p_menc; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5038 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5039 if (is_loclist_cmd(eap->cmdidx)) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5040 wp = curwin; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5041 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5042 autowrite_all(); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5043 fname = get_mef_name(); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5044 if (fname == NULL) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5045 return; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5046 mch_remove(fname); // in case it's not unique |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5047 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5048 cmd = make_get_fullcmd(eap->arg, fname); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5049 if (cmd == NULL) |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
5050 { |
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
5051 vim_free(fname); |
14852
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5052 return; |
27897
2a2c0958a913
patch 8.2.4474: memory allocation failures not tested in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27873
diff
changeset
|
5053 } |
14852
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5054 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5055 // let the shell know if we are redirecting output or not |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5056 do_shell(cmd, *p_sp != NUL ? SHELL_DOOUT : 0); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5057 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5058 #ifdef AMIGA |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5059 out_flush(); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5060 // read window status report and redraw before message |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5061 (void)char_avail(); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5062 #endif |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5063 |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
5064 incr_quickfix_busy(); |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
5065 |
27938
b65a50d2fa4f
patch 8.2.4494: the find_tags() function is much too long
Bram Moolenaar <Bram@vim.org>
parents:
27897
diff
changeset
|
5066 if (eap->cmdidx != CMD_make && eap->cmdidx != CMD_lmake) |
b65a50d2fa4f
patch 8.2.4494: the find_tags() function is much too long
Bram Moolenaar <Bram@vim.org>
parents:
27897
diff
changeset
|
5067 errorformat = p_gefm; |
b65a50d2fa4f
patch 8.2.4494: the find_tags() function is much too long
Bram Moolenaar <Bram@vim.org>
parents:
27897
diff
changeset
|
5068 if (eap->cmdidx == CMD_grepadd || eap->cmdidx == CMD_lgrepadd) |
b65a50d2fa4f
patch 8.2.4494: the find_tags() function is much too long
Bram Moolenaar <Bram@vim.org>
parents:
27897
diff
changeset
|
5069 newlist = FALSE; |
b65a50d2fa4f
patch 8.2.4494: the find_tags() function is much too long
Bram Moolenaar <Bram@vim.org>
parents:
27897
diff
changeset
|
5070 |
b65a50d2fa4f
patch 8.2.4494: the find_tags() function is much too long
Bram Moolenaar <Bram@vim.org>
parents:
27897
diff
changeset
|
5071 res = qf_init(wp, fname, errorformat, newlist, qf_cmdtitle(*eap->cmdlinep), |
b65a50d2fa4f
patch 8.2.4494: the find_tags() function is much too long
Bram Moolenaar <Bram@vim.org>
parents:
27897
diff
changeset
|
5072 enc); |
14852
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5073 if (wp != NULL) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5074 { |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5075 qi = GET_LOC_LIST(wp); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5076 if (qi == NULL) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5077 goto cleanup; |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5078 } |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5079 if (res >= 0) |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
5080 qf_list_changed(qf_get_curlist(qi)); |
14852
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5081 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5082 // Remember the current quickfix list identifier, so that we can |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5083 // check for autocommands changing the current quickfix list. |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
5084 save_qfid = qf_get_curlist(qi)->qf_id; |
14852
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5085 if (au_name != NULL) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5086 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name, |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5087 curbuf->b_fname, TRUE, curbuf); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5088 if (res > 0 && !eap->forceit && qflist_valid(wp, save_qfid)) |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5089 // display the first error |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5090 qf_jump_first(qi, save_qfid, FALSE); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5091 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5092 cleanup: |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
5093 decr_quickfix_busy(); |
14852
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5094 mch_remove(fname); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5095 vim_free(fname); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5096 vim_free(cmd); |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5097 } |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5098 |
3c8a4b25427c
patch 8.1.0438: the ex_make() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14844
diff
changeset
|
5099 /* |
16515
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5100 * Returns the number of entries in the current quickfix/location list. |
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5101 */ |
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5102 int |
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5103 qf_get_size(exarg_T *eap) |
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5104 { |
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5105 qf_info_T *qi; |
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5106 |
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5107 if ((qi = qf_cmd_get_stack(eap, FALSE)) == NULL) |
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5108 return 0; |
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5109 return qf_get_curlist(qi)->qf_count; |
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5110 } |
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5111 |
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5112 /* |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5113 * Returns the number of valid entries in the current quickfix/location list. |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5114 */ |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5115 int |
16515
6e87a69b8e0c
patch 8.1.1261: no error for quickfix commands with negative range
Bram Moolenaar <Bram@vim.org>
parents:
16505
diff
changeset
|
5116 qf_get_valid_size(exarg_T *eap) |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5117 { |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5118 qf_info_T *qi; |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
5119 qf_list_T *qfl; |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5120 qfline_T *qfp; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5121 int i, sz = 0; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5122 int prev_fnum = 0; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5123 |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5124 if ((qi = qf_cmd_get_stack(eap, FALSE)) == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5125 return 0; |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5126 |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
5127 qfl = qf_get_curlist(qi); |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5128 FOR_ALL_QFL_ITEMS(qfl, qfp, i) |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5129 { |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5130 if (qfp->qf_valid) |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5131 { |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5132 if (eap->cmdidx == CMD_cdo || eap->cmdidx == CMD_ldo) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5133 sz++; // Count all valid entries |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5134 else if (qfp->qf_fnum > 0 && qfp->qf_fnum != prev_fnum) |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5135 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5136 // Count the number of files |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5137 sz++; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5138 prev_fnum = qfp->qf_fnum; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5139 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5140 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5141 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5142 |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5143 return sz; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5144 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5145 |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5146 /* |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5147 * Returns the current index of the quickfix/location list. |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5148 * Returns 0 if there is an error. |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5149 */ |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5150 int |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
5151 qf_get_cur_idx(exarg_T *eap) |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5152 { |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5153 qf_info_T *qi; |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5154 |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5155 if ((qi = qf_cmd_get_stack(eap, FALSE)) == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5156 return 0; |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5157 |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
5158 return qf_get_curlist(qi)->qf_index; |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5159 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5160 |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5161 /* |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5162 * Returns the current index in the quickfix/location list (counting only valid |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5163 * entries). If no valid entries are in the list, then returns 1. |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5164 */ |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5165 int |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
5166 qf_get_cur_valid_idx(exarg_T *eap) |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5167 { |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5168 qf_info_T *qi; |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5169 qf_list_T *qfl; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5170 qfline_T *qfp; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5171 int i, eidx = 0; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5172 int prev_fnum = 0; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5173 |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5174 if ((qi = qf_cmd_get_stack(eap, FALSE)) == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5175 return 1; |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5176 |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
5177 qfl = qf_get_curlist(qi); |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5178 qfp = qfl->qf_start; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5179 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5180 // check if the list has valid errors |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5181 if (!qf_list_has_valid_entries(qfl)) |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5182 return 1; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5183 |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5184 for (i = 1; i <= qfl->qf_index && qfp!= NULL; i++, qfp = qfp->qf_next) |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5185 { |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5186 if (qfp->qf_valid) |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5187 { |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5188 if (eap->cmdidx == CMD_cfdo || eap->cmdidx == CMD_lfdo) |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5189 { |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5190 if (qfp->qf_fnum > 0 && qfp->qf_fnum != prev_fnum) |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5191 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5192 // Count the number of files |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5193 eidx++; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5194 prev_fnum = qfp->qf_fnum; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5195 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5196 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5197 else |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5198 eidx++; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5199 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5200 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5201 |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5202 return eidx ? eidx : 1; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5203 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5204 |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5205 /* |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5206 * Get the 'n'th valid error entry in the quickfix or location list. |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5207 * Used by :cdo, :ldo, :cfdo and :lfdo commands. |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5208 * For :cdo and :ldo returns the 'n'th valid error entry. |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5209 * For :cfdo and :lfdo returns the 'n'th valid file entry. |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5210 */ |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5211 static int |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
5212 qf_get_nth_valid_entry(qf_list_T *qfl, int n, int fdo) |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
5213 { |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
5214 qfline_T *qfp; |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5215 int i, eidx; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5216 int prev_fnum = 0; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5217 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5218 // check if the list has valid errors |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5219 if (!qf_list_has_valid_entries(qfl)) |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5220 return 1; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5221 |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
5222 eidx = 0; |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
5223 FOR_ALL_QFL_ITEMS(qfl, qfp, i) |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5224 { |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5225 if (qfp->qf_valid) |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5226 { |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5227 if (fdo) |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5228 { |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5229 if (qfp->qf_fnum > 0 && qfp->qf_fnum != prev_fnum) |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5230 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5231 // Count the number of files |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5232 eidx++; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5233 prev_fnum = qfp->qf_fnum; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5234 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5235 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5236 else |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5237 eidx++; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5238 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5239 |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5240 if (eidx == n) |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5241 break; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5242 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5243 |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5244 if (i <= qfl->qf_count) |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5245 return i; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5246 else |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5247 return 1; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5248 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5249 |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5250 /* |
7 | 5251 * ":cc", ":crewind", ":cfirst" and ":clast". |
644 | 5252 * ":ll", ":lrewind", ":lfirst" and ":llast". |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5253 * ":cdo", ":ldo", ":cfdo" and ":lfdo" |
7 | 5254 */ |
5255 void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
5256 ex_cc(exarg_T *eap) |
7 | 5257 { |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5258 qf_info_T *qi; |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5259 int errornr; |
659 | 5260 |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5261 if ((qi = qf_cmd_get_stack(eap, TRUE)) == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5262 return; |
644 | 5263 |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5264 if (eap->addr_count > 0) |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5265 errornr = (int)eap->line2; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5266 else |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5267 { |
14550
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5268 switch (eap->cmdidx) |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5269 { |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5270 case CMD_cc: case CMD_ll: |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5271 errornr = 0; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5272 break; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5273 case CMD_crewind: case CMD_lrewind: case CMD_cfirst: |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5274 case CMD_lfirst: |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5275 errornr = 1; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5276 break; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5277 default: |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5278 errornr = 32767; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5279 } |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5280 } |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5281 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5282 // For cdo and ldo commands, jump to the nth valid error. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5283 // For cfdo and lfdo commands, jump to the nth valid file entry. |
12084
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
5284 if (eap->cmdidx == CMD_cdo || eap->cmdidx == CMD_ldo |
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
5285 || eap->cmdidx == CMD_cfdo || eap->cmdidx == CMD_lfdo) |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
5286 errornr = qf_get_nth_valid_entry(qf_get_curlist(qi), |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5287 eap->addr_count > 0 ? (int)eap->line1 : 1, |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5288 eap->cmdidx == CMD_cfdo || eap->cmdidx == CMD_lfdo); |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5289 |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5290 qf_jump(qi, 0, errornr, eap->forceit); |
7 | 5291 } |
5292 | |
5293 /* | |
5294 * ":cnext", ":cnfile", ":cNext" and ":cprevious". | |
644 | 5295 * ":lnext", ":lNext", ":lprevious", ":lnfile", ":lNfile" and ":lpfile". |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5296 * Also, used by ":cdo", ":ldo", ":cfdo" and ":lfdo" commands. |
7 | 5297 */ |
5298 void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
5299 ex_cnext(exarg_T *eap) |
7 | 5300 { |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5301 qf_info_T *qi; |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5302 int errornr; |
14550
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5303 int dir; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5304 |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5305 if ((qi = qf_cmd_get_stack(eap, TRUE)) == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
5306 return; |
644 | 5307 |
12084
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
5308 if (eap->addr_count > 0 |
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
5309 && (eap->cmdidx != CMD_cdo && eap->cmdidx != CMD_ldo |
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
5310 && eap->cmdidx != CMD_cfdo && eap->cmdidx != CMD_lfdo)) |
7092
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5311 errornr = (int)eap->line2; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5312 else |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5313 errornr = 1; |
64e30831fa42
commit https://github.com/vim/vim/commit/aa23b379421aa214e6543b06c974594a25799b09
Christian Brabandt <cb@256bit.org>
parents:
6853
diff
changeset
|
5314 |
14550
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5315 // Depending on the command jump to either next or previous entry/file. |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5316 switch (eap->cmdidx) |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5317 { |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5318 case CMD_cnext: case CMD_lnext: case CMD_cdo: case CMD_ldo: |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5319 dir = FORWARD; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5320 break; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5321 case CMD_cprevious: case CMD_lprevious: case CMD_cNext: |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5322 case CMD_lNext: |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5323 dir = BACKWARD; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5324 break; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5325 case CMD_cnfile: case CMD_lnfile: case CMD_cfdo: case CMD_lfdo: |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5326 dir = FORWARD_FILE; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5327 break; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5328 case CMD_cpfile: case CMD_lpfile: case CMD_cNfile: case CMD_lNfile: |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5329 dir = BACKWARD_FILE; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5330 break; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5331 default: |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5332 dir = FORWARD; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5333 break; |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5334 } |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5335 |
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5336 qf_jump(qi, dir, errornr, eap->forceit); |
7 | 5337 } |
5338 | |
5339 /* | |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5340 * Find the first entry in the quickfix list 'qfl' from buffer 'bnr'. |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5341 * The index of the entry is stored in 'errornr'. |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5342 * Returns NULL if an entry is not found. |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5343 */ |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5344 static qfline_T * |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5345 qf_find_first_entry_in_buf(qf_list_T *qfl, int bnr, int *errornr) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5346 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5347 qfline_T *qfp = NULL; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5348 int idx = 0; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5349 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5350 // Find the first entry in this file |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5351 FOR_ALL_QFL_ITEMS(qfl, qfp, idx) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5352 if (qfp->qf_fnum == bnr) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5353 break; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5354 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5355 *errornr = idx; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5356 return qfp; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5357 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5358 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5359 /* |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5360 * Find the first quickfix entry on the same line as 'entry'. Updates 'errornr' |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5361 * with the error number for the first entry. Assumes the entries are sorted in |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5362 * the quickfix list by line number. |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5363 */ |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5364 static qfline_T * |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5365 qf_find_first_entry_on_line(qfline_T *entry, int *errornr) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5366 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5367 while (!got_int |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5368 && entry->qf_prev != NULL |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5369 && entry->qf_fnum == entry->qf_prev->qf_fnum |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5370 && entry->qf_lnum == entry->qf_prev->qf_lnum) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5371 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5372 entry = entry->qf_prev; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5373 --*errornr; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5374 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5375 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5376 return entry; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5377 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5378 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5379 /* |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5380 * Find the last quickfix entry on the same line as 'entry'. Updates 'errornr' |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5381 * with the error number for the last entry. Assumes the entries are sorted in |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5382 * the quickfix list by line number. |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5383 */ |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5384 static qfline_T * |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5385 qf_find_last_entry_on_line(qfline_T *entry, int *errornr) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5386 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5387 while (!got_int && |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5388 entry->qf_next != NULL |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5389 && entry->qf_fnum == entry->qf_next->qf_fnum |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5390 && entry->qf_lnum == entry->qf_next->qf_lnum) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5391 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5392 entry = entry->qf_next; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5393 ++*errornr; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5394 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5395 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5396 return entry; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5397 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5398 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5399 /* |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5400 * Returns TRUE if the specified quickfix entry is |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5401 * after the given line (linewise is TRUE) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5402 * or after the line and column. |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5403 */ |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5404 static int |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5405 qf_entry_after_pos(qfline_T *qfp, pos_T *pos, int linewise) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5406 { |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5407 if (linewise) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5408 return qfp->qf_lnum > pos->lnum; |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5409 else |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5410 return (qfp->qf_lnum > pos->lnum || |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5411 (qfp->qf_lnum == pos->lnum && qfp->qf_col > pos->col)); |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5412 } |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5413 |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5414 /* |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5415 * Returns TRUE if the specified quickfix entry is |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5416 * before the given line (linewise is TRUE) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5417 * or before the line and column. |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5418 */ |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5419 static int |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5420 qf_entry_before_pos(qfline_T *qfp, pos_T *pos, int linewise) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5421 { |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5422 if (linewise) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5423 return qfp->qf_lnum < pos->lnum; |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5424 else |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5425 return (qfp->qf_lnum < pos->lnum || |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5426 (qfp->qf_lnum == pos->lnum && qfp->qf_col < pos->col)); |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5427 } |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5428 |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5429 /* |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5430 * Returns TRUE if the specified quickfix entry is |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5431 * on or after the given line (linewise is TRUE) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5432 * or on or after the line and column. |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5433 */ |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5434 static int |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5435 qf_entry_on_or_after_pos(qfline_T *qfp, pos_T *pos, int linewise) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5436 { |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5437 if (linewise) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5438 return qfp->qf_lnum >= pos->lnum; |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5439 else |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5440 return (qfp->qf_lnum > pos->lnum || |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5441 (qfp->qf_lnum == pos->lnum && qfp->qf_col >= pos->col)); |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5442 } |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5443 |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5444 /* |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5445 * Returns TRUE if the specified quickfix entry is |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5446 * on or before the given line (linewise is TRUE) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5447 * or on or before the line and column. |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5448 */ |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5449 static int |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5450 qf_entry_on_or_before_pos(qfline_T *qfp, pos_T *pos, int linewise) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5451 { |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5452 if (linewise) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5453 return qfp->qf_lnum <= pos->lnum; |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5454 else |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5455 return (qfp->qf_lnum < pos->lnum || |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5456 (qfp->qf_lnum == pos->lnum && qfp->qf_col <= pos->col)); |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5457 } |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5458 |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5459 /* |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5460 * Find the first quickfix entry after position 'pos' in buffer 'bnr'. |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5461 * If 'linewise' is TRUE, returns the entry after the specified line and treats |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5462 * multiple entries on a single line as one. Otherwise returns the entry after |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5463 * the specified line and column. |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5464 * 'qfp' points to the very first entry in the buffer and 'errornr' is the |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5465 * index of the very first entry in the quickfix list. |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5466 * Returns NULL if an entry is not found after 'pos'. |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5467 */ |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5468 static qfline_T * |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5469 qf_find_entry_after_pos( |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5470 int bnr, |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5471 pos_T *pos, |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5472 int linewise, |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5473 qfline_T *qfp, |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5474 int *errornr) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5475 { |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5476 if (qf_entry_after_pos(qfp, pos, linewise)) |
18498
9e6d5a4abb1c
patch 8.1.2243: typos in comments
Bram Moolenaar <Bram@vim.org>
parents:
18452
diff
changeset
|
5477 // First entry is after position 'pos' |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5478 return qfp; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5479 |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5480 // Find the entry just before or at the position 'pos' |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5481 while (qfp->qf_next != NULL |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5482 && qfp->qf_next->qf_fnum == bnr |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5483 && qf_entry_on_or_before_pos(qfp->qf_next, pos, linewise)) |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5484 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5485 qfp = qfp->qf_next; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5486 ++*errornr; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5487 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5488 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5489 if (qfp->qf_next == NULL || qfp->qf_next->qf_fnum != bnr) |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5490 // No entries found after position 'pos' |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5491 return NULL; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5492 |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5493 // Use the entry just after position 'pos' |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5494 qfp = qfp->qf_next; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5495 ++*errornr; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5496 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5497 return qfp; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5498 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5499 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5500 /* |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5501 * Find the first quickfix entry before position 'pos' in buffer 'bnr'. |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5502 * If 'linewise' is TRUE, returns the entry before the specified line and |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5503 * treats multiple entries on a single line as one. Otherwise returns the entry |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5504 * before the specified line and column. |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5505 * 'qfp' points to the very first entry in the buffer and 'errornr' is the |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5506 * index of the very first entry in the quickfix list. |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5507 * Returns NULL if an entry is not found before 'pos'. |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5508 */ |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5509 static qfline_T * |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5510 qf_find_entry_before_pos( |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5511 int bnr, |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5512 pos_T *pos, |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5513 int linewise, |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5514 qfline_T *qfp, |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5515 int *errornr) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5516 { |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5517 // Find the entry just before the position 'pos' |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5518 while (qfp->qf_next != NULL |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5519 && qfp->qf_next->qf_fnum == bnr |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5520 && qf_entry_before_pos(qfp->qf_next, pos, linewise)) |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5521 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5522 qfp = qfp->qf_next; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5523 ++*errornr; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5524 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5525 |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5526 if (qf_entry_on_or_after_pos(qfp, pos, linewise)) |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5527 return NULL; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5528 |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5529 if (linewise) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5530 // If multiple entries are on the same line, then use the first entry |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5531 qfp = qf_find_first_entry_on_line(qfp, errornr); |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5532 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5533 return qfp; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5534 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5535 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5536 /* |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5537 * Find a quickfix entry in 'qfl' closest to position 'pos' in buffer 'bnr' in |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5538 * the direction 'dir'. |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5539 */ |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5540 static qfline_T * |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5541 qf_find_closest_entry( |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5542 qf_list_T *qfl, |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5543 int bnr, |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5544 pos_T *pos, |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5545 int dir, |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5546 int linewise, |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5547 int *errornr) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5548 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5549 qfline_T *qfp; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5550 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5551 *errornr = 0; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5552 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5553 // Find the first entry in this file |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5554 qfp = qf_find_first_entry_in_buf(qfl, bnr, errornr); |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5555 if (qfp == NULL) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5556 return NULL; // no entry in this file |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5557 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5558 if (dir == FORWARD) |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5559 qfp = qf_find_entry_after_pos(bnr, pos, linewise, qfp, errornr); |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5560 else |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5561 qfp = qf_find_entry_before_pos(bnr, pos, linewise, qfp, errornr); |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5562 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5563 return qfp; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5564 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5565 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5566 /* |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5567 * Get the nth quickfix entry below the specified entry. Searches forward in |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5568 * the list. If linewise is TRUE, then treat multiple entries on a single line |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5569 * as one. |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5570 */ |
16978
15bc5a64bd50
patch 8.1.1489: sign order wrong when priority was changed
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
5571 static void |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
5572 qf_get_nth_below_entry(qfline_T *entry_arg, int n, int linewise, int *errornr) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
5573 { |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
5574 qfline_T *entry = entry_arg; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
5575 |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5576 while (n-- > 0 && !got_int) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5577 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5578 int first_errornr = *errornr; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5579 |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5580 if (linewise) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5581 // Treat all the entries on the same line in this file as one |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5582 entry = qf_find_last_entry_on_line(entry, errornr); |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5583 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5584 if (entry->qf_next == NULL |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5585 || entry->qf_next->qf_fnum != entry->qf_fnum) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5586 { |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5587 if (linewise) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5588 *errornr = first_errornr; |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5589 break; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5590 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5591 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5592 entry = entry->qf_next; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5593 ++*errornr; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5594 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5595 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5596 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5597 /* |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5598 * Get the nth quickfix entry above the specified entry. Searches backwards in |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5599 * the list. If linewise is TRUE, then treat multiple entries on a single line |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5600 * as one. |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5601 */ |
16978
15bc5a64bd50
patch 8.1.1489: sign order wrong when priority was changed
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
5602 static void |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5603 qf_get_nth_above_entry(qfline_T *entry, int n, int linewise, int *errornr) |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5604 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5605 while (n-- > 0 && !got_int) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5606 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5607 if (entry->qf_prev == NULL |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5608 || entry->qf_prev->qf_fnum != entry->qf_fnum) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5609 break; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5610 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5611 entry = entry->qf_prev; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5612 --*errornr; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5613 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5614 // If multiple entries are on the same line, then use the first entry |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5615 if (linewise) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5616 entry = qf_find_first_entry_on_line(entry, errornr); |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5617 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5618 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5619 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5620 /* |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5621 * Find the n'th quickfix entry adjacent to position 'pos' in buffer 'bnr' in |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5622 * the specified direction. Returns the error number in the quickfix list or 0 |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5623 * if an entry is not found. |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5624 */ |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5625 static int |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5626 qf_find_nth_adj_entry( |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5627 qf_list_T *qfl, |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5628 int bnr, |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5629 pos_T *pos, |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5630 int n, |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5631 int dir, |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5632 int linewise) |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5633 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5634 qfline_T *adj_entry; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5635 int errornr; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5636 |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5637 // Find an entry closest to the specified position |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5638 adj_entry = qf_find_closest_entry(qfl, bnr, pos, dir, linewise, &errornr); |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5639 if (adj_entry == NULL) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5640 return 0; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5641 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5642 if (--n > 0) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5643 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5644 // Go to the n'th entry in the current buffer |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5645 if (dir == FORWARD) |
16978
15bc5a64bd50
patch 8.1.1489: sign order wrong when priority was changed
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
5646 qf_get_nth_below_entry(adj_entry, n, linewise, &errornr); |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5647 else |
16978
15bc5a64bd50
patch 8.1.1489: sign order wrong when priority was changed
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
5648 qf_get_nth_above_entry(adj_entry, n, linewise, &errornr); |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5649 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5650 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5651 return errornr; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5652 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5653 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5654 /* |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5655 * Jump to a quickfix entry in the current file nearest to the current line or |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5656 * current line/col. |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5657 * ":cabove", ":cbelow", ":labove", ":lbelow", ":cafter", ":cbefore", |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5658 * ":lafter" and ":lbefore" commands |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5659 */ |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5660 void |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5661 ex_cbelow(exarg_T *eap) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5662 { |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5663 qf_info_T *qi; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5664 qf_list_T *qfl; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5665 int dir; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5666 int buf_has_flag; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5667 int errornr = 0; |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5668 pos_T pos; |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5669 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5670 if (eap->addr_count > 0 && eap->line2 <= 0) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5671 { |
25064
8f2262c72178
patch 8.2.3069: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
24964
diff
changeset
|
5672 emsg(_(e_invalid_range)); |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5673 return; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5674 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5675 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5676 // Check whether the current buffer has any quickfix entries |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5677 if (eap->cmdidx == CMD_cabove || eap->cmdidx == CMD_cbelow |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5678 || eap->cmdidx == CMD_cbefore || eap->cmdidx == CMD_cafter) |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5679 buf_has_flag = BUF_HAS_QF_ENTRY; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5680 else |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5681 buf_has_flag = BUF_HAS_LL_ENTRY; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5682 if (!(curbuf->b_has_qf_entry & buf_has_flag)) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5683 { |
25306
078edc1821bf
patch 8.2.3190: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
25302
diff
changeset
|
5684 emsg(_(e_no_errors)); |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5685 return; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5686 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5687 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5688 if ((qi = qf_cmd_get_stack(eap, TRUE)) == NULL) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5689 return; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5690 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5691 qfl = qf_get_curlist(qi); |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5692 // check if the list has valid errors |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5693 if (!qf_list_has_valid_entries(qfl)) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5694 { |
25306
078edc1821bf
patch 8.2.3190: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
25302
diff
changeset
|
5695 emsg(_(e_no_errors)); |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5696 return; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5697 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5698 |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5699 if (eap->cmdidx == CMD_cbelow |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5700 || eap->cmdidx == CMD_lbelow |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5701 || eap->cmdidx == CMD_cafter |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5702 || eap->cmdidx == CMD_lafter) |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5703 // Forward motion commands |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5704 dir = FORWARD; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5705 else |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5706 dir = BACKWARD; |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5707 |
16543
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5708 pos = curwin->w_cursor; |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5709 // A quickfix entry column number is 1 based whereas cursor column |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5710 // number is 0 based. Adjust the column number. |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5711 pos.col++; |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5712 errornr = qf_find_nth_adj_entry(qfl, curbuf->b_fnum, &pos, |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5713 eap->addr_count > 0 ? eap->line2 : 0, dir, |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5714 eap->cmdidx == CMD_cbelow |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5715 || eap->cmdidx == CMD_lbelow |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5716 || eap->cmdidx == CMD_cabove |
1d2b3bb35414
patch 8.1.1275: cannot navigate to errors before/after the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16515
diff
changeset
|
5717 || eap->cmdidx == CMD_labove); |
16505
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5718 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5719 if (errornr > 0) |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5720 qf_jump(qi, 0, errornr, FALSE); |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5721 else |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5722 emsg(_(e_no_more_items)); |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5723 } |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5724 |
28e3ba82d8c8
patch 8.1.1256: cannot navigate through errors relative to the cursor
Bram Moolenaar <Bram@vim.org>
parents:
16483
diff
changeset
|
5725 /* |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5726 * Return the autocmd name for the :cfile Ex commands |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5727 */ |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5728 static char_u * |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5729 cfile_get_auname(cmdidx_T cmdidx) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5730 { |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5731 switch (cmdidx) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5732 { |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5733 case CMD_cfile: return (char_u *)"cfile"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5734 case CMD_cgetfile: return (char_u *)"cgetfile"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5735 case CMD_caddfile: return (char_u *)"caddfile"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5736 case CMD_lfile: return (char_u *)"lfile"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5737 case CMD_lgetfile: return (char_u *)"lgetfile"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5738 case CMD_laddfile: return (char_u *)"laddfile"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5739 default: return NULL; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5740 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5741 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5742 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5743 /* |
446 | 5744 * ":cfile"/":cgetfile"/":caddfile" commands. |
644 | 5745 * ":lfile"/":lgetfile"/":laddfile" commands. |
7 | 5746 */ |
5747 void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
5748 ex_cfile(exarg_T *eap) |
7 | 5749 { |
11063
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
5750 char_u *enc = NULL; |
644 | 5751 win_T *wp = NULL; |
659 | 5752 qf_info_T *qi = &ql_info; |
3404 | 5753 char_u *au_name = NULL; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5754 int_u save_qfid = 0; // init for gcc |
12954
49e136457c66
patch 8.0.1353: QuickFixCmdPost is not used consistently
Christian Brabandt <cb@256bit.org>
parents:
12912
diff
changeset
|
5755 int res; |
644 | 5756 |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5757 au_name = cfile_get_auname(eap->cmdidx); |
18452
0ac9e720a56e
patch 8.1.2220: :cfile does not abort like other quickfix commands
Bram Moolenaar <Bram@vim.org>
parents:
18358
diff
changeset
|
5758 if (au_name != NULL && apply_autocmds(EVENT_QUICKFIXCMDPRE, au_name, |
0ac9e720a56e
patch 8.1.2220: :cfile does not abort like other quickfix commands
Bram Moolenaar <Bram@vim.org>
parents:
18358
diff
changeset
|
5759 NULL, FALSE, curbuf)) |
0ac9e720a56e
patch 8.1.2220: :cfile does not abort like other quickfix commands
Bram Moolenaar <Bram@vim.org>
parents:
18358
diff
changeset
|
5760 { |
0ac9e720a56e
patch 8.1.2220: :cfile does not abort like other quickfix commands
Bram Moolenaar <Bram@vim.org>
parents:
18358
diff
changeset
|
5761 #ifdef FEAT_EVAL |
0ac9e720a56e
patch 8.1.2220: :cfile does not abort like other quickfix commands
Bram Moolenaar <Bram@vim.org>
parents:
18358
diff
changeset
|
5762 if (aborting()) |
0ac9e720a56e
patch 8.1.2220: :cfile does not abort like other quickfix commands
Bram Moolenaar <Bram@vim.org>
parents:
18358
diff
changeset
|
5763 return; |
0ac9e720a56e
patch 8.1.2220: :cfile does not abort like other quickfix commands
Bram Moolenaar <Bram@vim.org>
parents:
18358
diff
changeset
|
5764 #endif |
0ac9e720a56e
patch 8.1.2220: :cfile does not abort like other quickfix commands
Bram Moolenaar <Bram@vim.org>
parents:
18358
diff
changeset
|
5765 } |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
5766 |
11063
e71d3bdf3bc3
patch 8.0.0420: text garbled when the system encoding differs from 'encoding'
Christian Brabandt <cb@256bit.org>
parents:
10379
diff
changeset
|
5767 enc = (*curbuf->b_p_menc != NUL) ? curbuf->b_p_menc : p_menc; |
2296
eb7be7b075a6
Support :browse for commands that use an error file argument. (Lech Lorens)
Bram Moolenaar <bram@vim.org>
parents:
2146
diff
changeset
|
5768 #ifdef FEAT_BROWSE |
22699
e82579016863
patch 8.2.1898: command modifier parsing always uses global cmdmod
Bram Moolenaar <Bram@vim.org>
parents:
22645
diff
changeset
|
5769 if (cmdmod.cmod_flags & CMOD_BROWSE) |
2296
eb7be7b075a6
Support :browse for commands that use an error file argument. (Lech Lorens)
Bram Moolenaar <bram@vim.org>
parents:
2146
diff
changeset
|
5770 { |
eb7be7b075a6
Support :browse for commands that use an error file argument. (Lech Lorens)
Bram Moolenaar <bram@vim.org>
parents:
2146
diff
changeset
|
5771 char_u *browse_file = do_browse(0, (char_u *)_("Error file"), eap->arg, |
13802
378f9f8e6d8f
patch 8.0.1773: dialog messages are not translated
Christian Brabandt <cb@256bit.org>
parents:
13800
diff
changeset
|
5772 NULL, NULL, |
378f9f8e6d8f
patch 8.0.1773: dialog messages are not translated
Christian Brabandt <cb@256bit.org>
parents:
13800
diff
changeset
|
5773 (char_u *)_(BROWSE_FILTER_ALL_FILES), NULL); |
2296
eb7be7b075a6
Support :browse for commands that use an error file argument. (Lech Lorens)
Bram Moolenaar <bram@vim.org>
parents:
2146
diff
changeset
|
5774 if (browse_file == NULL) |
eb7be7b075a6
Support :browse for commands that use an error file argument. (Lech Lorens)
Bram Moolenaar <bram@vim.org>
parents:
2146
diff
changeset
|
5775 return; |
eb7be7b075a6
Support :browse for commands that use an error file argument. (Lech Lorens)
Bram Moolenaar <bram@vim.org>
parents:
2146
diff
changeset
|
5776 set_string_option_direct((char_u *)"ef", -1, browse_file, OPT_FREE, 0); |
eb7be7b075a6
Support :browse for commands that use an error file argument. (Lech Lorens)
Bram Moolenaar <bram@vim.org>
parents:
2146
diff
changeset
|
5777 vim_free(browse_file); |
eb7be7b075a6
Support :browse for commands that use an error file argument. (Lech Lorens)
Bram Moolenaar <bram@vim.org>
parents:
2146
diff
changeset
|
5778 } |
eb7be7b075a6
Support :browse for commands that use an error file argument. (Lech Lorens)
Bram Moolenaar <bram@vim.org>
parents:
2146
diff
changeset
|
5779 else |
eb7be7b075a6
Support :browse for commands that use an error file argument. (Lech Lorens)
Bram Moolenaar <bram@vim.org>
parents:
2146
diff
changeset
|
5780 #endif |
7 | 5781 if (*eap->arg != NUL) |
694 | 5782 set_string_option_direct((char_u *)"ef", -1, eap->arg, OPT_FREE, 0); |
446 | 5783 |
14550
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
5784 if (is_loclist_cmd(eap->cmdidx)) |
13078
a1f8939a4644
patch 8.0.1414: accessing freed memory in :lfile.
Christian Brabandt <cb@256bit.org>
parents:
13076
diff
changeset
|
5785 wp = curwin; |
a1f8939a4644
patch 8.0.1414: accessing freed memory in :lfile.
Christian Brabandt <cb@256bit.org>
parents:
13076
diff
changeset
|
5786 |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
5787 incr_quickfix_busy(); |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
5788 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5789 // This function is used by the :cfile, :cgetfile and :caddfile |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5790 // commands. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5791 // :cfile always creates a new quickfix list and jumps to the |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5792 // first error. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5793 // :cgetfile creates a new quickfix list but doesn't jump to the |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5794 // first error. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5795 // :caddfile adds to an existing quickfix list. If there is no |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5796 // quickfix list then a new list is created. |
12954
49e136457c66
patch 8.0.1353: QuickFixCmdPost is not used consistently
Christian Brabandt <cb@256bit.org>
parents:
12912
diff
changeset
|
5797 res = qf_init(wp, p_ef, p_efm, (eap->cmdidx != CMD_caddfile |
13921
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
5798 && eap->cmdidx != CMD_laddfile), |
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
5799 qf_cmdtitle(*eap->cmdlinep), enc); |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
5800 if (wp != NULL) |
14250
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
5801 { |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
5802 qi = GET_LOC_LIST(wp); |
14250
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
5803 if (qi == NULL) |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
5804 { |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
5805 decr_quickfix_busy(); |
14250
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
5806 return; |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
5807 } |
14250
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
5808 } |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
5809 if (res >= 0) |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
5810 qf_list_changed(qf_get_curlist(qi)); |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
5811 save_qfid = qf_get_curlist(qi)->qf_id; |
12954
49e136457c66
patch 8.0.1353: QuickFixCmdPost is not used consistently
Christian Brabandt <cb@256bit.org>
parents:
12912
diff
changeset
|
5812 if (au_name != NULL) |
49e136457c66
patch 8.0.1353: QuickFixCmdPost is not used consistently
Christian Brabandt <cb@256bit.org>
parents:
12912
diff
changeset
|
5813 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name, NULL, FALSE, curbuf); |
13252
66b8b29854d9
patch 8.0.1500: possible NULL pointer dereference
Christian Brabandt <cb@256bit.org>
parents:
13244
diff
changeset
|
5814 |
14250
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
5815 // Jump to the first error for a new list and if autocmds didn't |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
5816 // free the list. |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
5817 if (res > 0 && (eap->cmdidx == CMD_cfile || eap->cmdidx == CMD_lfile) |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
5818 && qflist_valid(wp, save_qfid)) |
14469
0211e295835e
patch 8.1.0248: duplicated quickfix code
Christian Brabandt <cb@256bit.org>
parents:
14433
diff
changeset
|
5819 // display the first error |
0211e295835e
patch 8.1.0248: duplicated quickfix code
Christian Brabandt <cb@256bit.org>
parents:
14433
diff
changeset
|
5820 qf_jump_first(qi, save_qfid, eap->forceit); |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
5821 |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
5822 decr_quickfix_busy(); |
13594
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5823 } |
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5824 |
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5825 /* |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5826 * Return the vimgrep autocmd name. |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5827 */ |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5828 static char_u * |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5829 vgr_get_auname(cmdidx_T cmdidx) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5830 { |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5831 switch (cmdidx) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5832 { |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5833 case CMD_vimgrep: return (char_u *)"vimgrep"; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5834 case CMD_lvimgrep: return (char_u *)"lvimgrep"; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5835 case CMD_vimgrepadd: return (char_u *)"vimgrepadd"; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5836 case CMD_lvimgrepadd: return (char_u *)"lvimgrepadd"; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5837 case CMD_grep: return (char_u *)"grep"; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5838 case CMD_lgrep: return (char_u *)"lgrep"; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5839 case CMD_grepadd: return (char_u *)"grepadd"; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5840 case CMD_lgrepadd: return (char_u *)"lgrepadd"; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5841 default: return NULL; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5842 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5843 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5844 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5845 /* |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5846 * Initialize the regmatch used by vimgrep for pattern "s". |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5847 */ |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5848 static void |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5849 vgr_init_regmatch(regmmatch_T *regmatch, char_u *s) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5850 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5851 // Get the search pattern: either white-separated or enclosed in // |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5852 regmatch->regprog = NULL; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5853 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5854 if (s == NULL || *s == NUL) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5855 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5856 // Pattern is empty, use last search pattern. |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5857 if (last_search_pat() == NULL) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5858 { |
25306
078edc1821bf
patch 8.2.3190: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
25302
diff
changeset
|
5859 emsg(_(e_no_previous_regular_expression)); |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5860 return; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5861 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5862 regmatch->regprog = vim_regcomp(last_search_pat(), RE_MAGIC); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5863 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5864 else |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5865 regmatch->regprog = vim_regcomp(s, RE_MAGIC); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5866 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5867 regmatch->rmm_ic = p_ic; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5868 regmatch->rmm_maxcol = 0; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5869 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5870 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5871 /* |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5872 * Display a file name when vimgrep is running. |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5873 */ |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5874 static void |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5875 vgr_display_fname(char_u *fname) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5876 { |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5877 char_u *p; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5878 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5879 msg_start(); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5880 p = msg_strtrunc(fname, TRUE); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5881 if (p == NULL) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5882 msg_outtrans(fname); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5883 else |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5884 { |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5885 msg_outtrans(p); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5886 vim_free(p); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5887 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5888 msg_clr_eos(); |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5889 msg_didout = FALSE; // overwrite this message |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5890 msg_nowait = TRUE; // don't wait for this message |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5891 msg_col = 0; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5892 out_flush(); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5893 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5894 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5895 /* |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5896 * Load a dummy buffer to search for a pattern using vimgrep. |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5897 */ |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5898 static buf_T * |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5899 vgr_load_dummy_buf( |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5900 char_u *fname, |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5901 char_u *dirname_start, |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5902 char_u *dirname_now) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5903 { |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5904 int save_mls; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5905 #if defined(FEAT_SYN_HL) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5906 char_u *save_ei = NULL; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5907 #endif |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5908 buf_T *buf; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5909 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5910 #if defined(FEAT_SYN_HL) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5911 // Don't do Filetype autocommands to avoid loading syntax and |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5912 // indent scripts, a great speed improvement. |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5913 save_ei = au_event_disable(",Filetype"); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5914 #endif |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5915 // Don't use modelines here, it's useless. |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5916 save_mls = p_mls; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5917 p_mls = 0; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5918 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5919 // Load file into a buffer, so that 'fileencoding' is detected, |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5920 // autocommands applied, etc. |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5921 buf = load_dummy_buffer(fname, dirname_start, dirname_now); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5922 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5923 p_mls = save_mls; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5924 #if defined(FEAT_SYN_HL) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5925 au_event_restore(save_ei); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5926 #endif |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5927 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5928 return buf; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5929 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5930 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5931 /* |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
5932 * Check whether a quickfix/location list is valid. Autocmds may remove or |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
5933 * change a quickfix list when vimgrep is running. If the list is not found, |
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
5934 * create a new list. |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5935 */ |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5936 static int |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5937 vgr_qflist_valid( |
13594
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5938 win_T *wp, |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5939 qf_info_T *qi, |
13594
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5940 int_u qfid, |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5941 char_u *title) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5942 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5943 // Verify that the quickfix/location list was not freed by an autocmd |
13594
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5944 if (!qflist_valid(wp, qfid)) |
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5945 { |
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5946 if (wp != NULL) |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5947 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5948 // An autocmd has freed the location list. |
22256
c3c9830c7cdc
patch 8.2.1677: memory access errors when calling setloclist() in autocommand
Bram Moolenaar <Bram@vim.org>
parents:
22137
diff
changeset
|
5949 emsg(_(e_current_location_list_was_changed)); |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5950 return FALSE; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5951 } |
13594
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5952 else |
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5953 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
5954 // Quickfix list is not found, create a new one. |
13594
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5955 qf_new_list(qi, title); |
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5956 return TRUE; |
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5957 } |
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5958 } |
4d55eb79178b
patch 8.0.1669: :vimgrep may add entries to the wrong quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13521
diff
changeset
|
5959 |
14507
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
5960 if (qf_restore_list(qi, qfid) == FAIL) |
5a10a0020c3e
patch 8.1.0267: no good check if restoring quickfix list worked
Christian Brabandt <cb@256bit.org>
parents:
14495
diff
changeset
|
5961 return FALSE; |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5962 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5963 return TRUE; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5964 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5965 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5966 /* |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5967 * Search for a pattern in all the lines in a buffer and add the matching lines |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5968 * to a quickfix list. |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5969 */ |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5970 static int |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5971 vgr_match_buflines( |
16062
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
5972 qf_list_T *qfl, |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5973 char_u *fname, |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5974 buf_T *buf, |
24547
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
5975 char_u *spat, |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5976 regmmatch_T *regmatch, |
14976
676db1b7fc35
patch 8.1.0499: :2vimgrep causes an ml_get error
Bram Moolenaar <Bram@vim.org>
parents:
14956
diff
changeset
|
5977 long *tomatch, |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5978 int duplicate_name, |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5979 int flags) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5980 { |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5981 int found_match = FALSE; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5982 long lnum; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5983 colnr_T col; |
24574
3a3d5ee00574
patch 8.2.2826: compiler warnings for int to size_t conversion
Bram Moolenaar <Bram@vim.org>
parents:
24547
diff
changeset
|
5984 int pat_len = (int)STRLEN(spat); |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5985 |
14976
676db1b7fc35
patch 8.1.0499: :2vimgrep causes an ml_get error
Bram Moolenaar <Bram@vim.org>
parents:
14956
diff
changeset
|
5986 for (lnum = 1; lnum <= buf->b_ml.ml_line_count && *tomatch > 0; ++lnum) |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5987 { |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5988 col = 0; |
24547
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
5989 if (!(flags & VGR_FUZZY)) |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5990 { |
24547
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
5991 // Regular expression match |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
5992 while (vim_regexec_multi(regmatch, curwin, buf, lnum, |
29071
b90bca860b5a
patch 8.2.5057: using gettimeofday() for timeout is very inefficient
Bram Moolenaar <Bram@vim.org>
parents:
28871
diff
changeset
|
5993 col, NULL) > 0) |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
5994 { |
24547
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
5995 // Pass the buffer number so that it gets used even for a |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
5996 // dummy buffer, unless duplicate_name is set, then the |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
5997 // buffer will be wiped out below. |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
5998 if (qf_add_entry(qfl, |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
5999 NULL, // dir |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6000 fname, |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6001 NULL, |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6002 duplicate_name ? 0 : buf->b_fnum, |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6003 ml_get_buf(buf, |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6004 regmatch->startpos[0].lnum + lnum, FALSE), |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6005 regmatch->startpos[0].lnum + lnum, |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
6006 regmatch->endpos[0].lnum + lnum, |
24547
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6007 regmatch->startpos[0].col + 1, |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
6008 regmatch->endpos[0].col + 1, |
24547
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6009 FALSE, // vis_col |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6010 NULL, // search pattern |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6011 0, // nr |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6012 0, // type |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6013 TRUE // valid |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6014 ) == QF_FAIL) |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6015 { |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6016 got_int = TRUE; |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6017 break; |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6018 } |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6019 found_match = TRUE; |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6020 if (--*tomatch == 0) |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6021 break; |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6022 if ((flags & VGR_GLOBAL) == 0 |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6023 || regmatch->endpos[0].lnum > 0) |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6024 break; |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6025 col = regmatch->endpos[0].col |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6026 + (col == regmatch->endpos[0].col); |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6027 if (col > (colnr_T)STRLEN(ml_get_buf(buf, lnum, FALSE))) |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6028 break; |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6029 } |
24547
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6030 } |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6031 else |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6032 { |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6033 char_u *str = ml_get_buf(buf, lnum, FALSE); |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6034 int score; |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6035 int_u matches[MAX_FUZZY_MATCHES]; |
24768
7334bf933510
patch 8.2.2922: computing array length is done in various ways
Bram Moolenaar <Bram@vim.org>
parents:
24590
diff
changeset
|
6036 int_u sz = ARRAY_LENGTH(matches); |
24547
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6037 |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6038 // Fuzzy string match |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6039 while (fuzzy_match(str + col, spat, FALSE, &score, matches, sz) > 0) |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6040 { |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6041 // Pass the buffer number so that it gets used even for a |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6042 // dummy buffer, unless duplicate_name is set, then the |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6043 // buffer will be wiped out below. |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6044 if (qf_add_entry(qfl, |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6045 NULL, // dir |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6046 fname, |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6047 NULL, |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6048 duplicate_name ? 0 : buf->b_fnum, |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6049 str, |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6050 lnum, |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
6051 0, |
24547
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6052 matches[0] + col + 1, |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
6053 0, |
24547
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6054 FALSE, // vis_col |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6055 NULL, // search pattern |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6056 0, // nr |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6057 0, // type |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6058 TRUE // valid |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6059 ) == QF_FAIL) |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6060 { |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6061 got_int = TRUE; |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6062 break; |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6063 } |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6064 found_match = TRUE; |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6065 if (--*tomatch == 0) |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6066 break; |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6067 if ((flags & VGR_GLOBAL) == 0) |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6068 break; |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6069 col = matches[pat_len - 1] + col + 1; |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6070 if (col > (colnr_T)STRLEN(str)) |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6071 break; |
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6072 } |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6073 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6074 line_breakcheck(); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6075 if (got_int) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6076 break; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6077 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6078 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6079 return found_match; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6080 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6081 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6082 /* |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6083 * Jump to the first match and update the directory. |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6084 */ |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6085 static void |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6086 vgr_jump_to_match( |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6087 qf_info_T *qi, |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6088 int forceit, |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6089 int *redraw_for_dummy, |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6090 buf_T *first_match_buf, |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6091 char_u *target_dir) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6092 { |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6093 buf_T *buf; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6094 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6095 buf = curbuf; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6096 qf_jump(qi, 0, 0, forceit); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6097 if (buf != curbuf) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6098 // If we jumped to another buffer redrawing will already be |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6099 // taken care of. |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6100 *redraw_for_dummy = FALSE; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6101 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6102 // Jump to the directory used after loading the buffer. |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6103 if (curbuf == first_match_buf && target_dir != NULL) |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6104 { |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6105 exarg_T ea; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6106 |
20007
aadd1cae2ff5
patch 8.2.0559: clearing a struct is verbose
Bram Moolenaar <Bram@vim.org>
parents:
19934
diff
changeset
|
6107 CLEAR_FIELD(ea); |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6108 ea.arg = target_dir; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6109 ea.cmdidx = CMD_lcd; |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6110 ex_cd(&ea); |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6111 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6112 } |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6113 |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6114 /* |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6115 * :vimgrep command arguments |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6116 */ |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6117 typedef struct |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6118 { |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6119 long tomatch; // maximum number of matches to find |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6120 char_u *spat; // search pattern |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6121 int flags; // search modifier |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6122 char_u **fnames; // list of files to search |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6123 int fcount; // number of files |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6124 regmmatch_T regmatch; // compiled search pattern |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6125 char_u *qf_title; // quickfix list title |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6126 } vgr_args_T; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6127 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6128 /* |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6129 * Process :vimgrep command arguments. The command syntax is: |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6130 * |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6131 * :{count}vimgrep /{pattern}/[g][j] {file} ... |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6132 */ |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6133 static int |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6134 vgr_process_args( |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6135 exarg_T *eap, |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6136 vgr_args_T *args) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6137 { |
153 | 6138 char_u *p; |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6139 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6140 vim_memset(args, 0, sizeof(*args)); |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6141 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6142 args->regmatch.regprog = NULL; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6143 args->qf_title = vim_strsave(qf_cmdtitle(*eap->cmdlinep)); |
657 | 6144 |
716 | 6145 if (eap->addr_count > 0) |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6146 args->tomatch = eap->line2; |
716 | 6147 else |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6148 args->tomatch = MAXLNUM; |
716 | 6149 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6150 // Get the search pattern: either white-separated or enclosed in // |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6151 p = skip_vimgrep_pat(eap->arg, &args->spat, &args->flags); |
153 | 6152 if (p == NULL) |
41 | 6153 { |
26883
7f150a4936f2
patch 8.2.3970: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26877
diff
changeset
|
6154 emsg(_(e_invalid_search_pattern_or_delimiter)); |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6155 return FAIL; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6156 } |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6157 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6158 vgr_init_regmatch(&args->regmatch, args->spat); |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6159 if (args->regmatch.regprog == NULL) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6160 return FAIL; |
41 | 6161 |
6162 p = skipwhite(p); | |
6163 if (*p == NUL) | |
6164 { | |
26952
b34ddbca305c
patch 8.2.4005: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26917
diff
changeset
|
6165 emsg(_(e_file_name_missing_or_invalid_pattern)); |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6166 return FAIL; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6167 } |
41 | 6168 |
23778
8b682f6f3709
patch 8.2.2430: :vimgrep expands wildcards twice
Bram Moolenaar <Bram@vim.org>
parents:
23493
diff
changeset
|
6169 // Parse the list of arguments, wildcards have already been expanded. |
26364
baf0d27eb024
patch 8.2.3713: MS-Windows: no error if vimgrep pattern is not matching
Bram Moolenaar <Bram@vim.org>
parents:
26175
diff
changeset
|
6170 if ((get_arglist_exp(p, &args->fcount, &args->fnames, TRUE) == FAIL) || |
baf0d27eb024
patch 8.2.3713: MS-Windows: no error if vimgrep pattern is not matching
Bram Moolenaar <Bram@vim.org>
parents:
26175
diff
changeset
|
6171 args->fcount == 0) |
41 | 6172 { |
26877
06a137af96f8
patch 8.2.3967: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26865
diff
changeset
|
6173 emsg(_(e_no_match)); |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6174 return FAIL; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6175 } |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6176 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6177 return OK; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6178 } |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6179 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6180 /* |
21668
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6181 * Return TRUE if "buf" had an existing swap file, the current swap file does |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6182 * not end in ".swp". |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6183 */ |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6184 static int |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6185 existing_swapfile(buf_T *buf) |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6186 { |
22015
d8065205ea82
patch 8.2.1557: crash in :vimgrep when started as "vim -n"
Bram Moolenaar <Bram@vim.org>
parents:
21668
diff
changeset
|
6187 if (buf->b_ml.ml_mfp != NULL && buf->b_ml.ml_mfp->mf_fname != NULL) |
21668
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6188 { |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6189 char_u *fname = buf->b_ml.ml_mfp->mf_fname; |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6190 size_t len = STRLEN(fname); |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6191 |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6192 return fname[len - 1] != 'p' || fname[len - 2] != 'w'; |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6193 } |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6194 return FALSE; |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6195 } |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6196 |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6197 /* |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6198 * Search for a pattern in a list of files and populate the quickfix list with |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6199 * the matches. |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6200 */ |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6201 static int |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6202 vgr_process_files( |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6203 win_T *wp, |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6204 qf_info_T *qi, |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6205 vgr_args_T *cmd_args, |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6206 int *redraw_for_dummy, |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6207 buf_T **first_match_buf, |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6208 char_u **target_dir) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6209 { |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6210 int status = FAIL; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6211 int_u save_qfid = qf_get_curlist(qi)->qf_id; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6212 time_t seconds = 0; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6213 char_u *fname; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6214 int fi; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6215 buf_T *buf; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6216 int duplicate_name = FALSE; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6217 int using_dummy; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6218 char_u *dirname_start = NULL; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6219 char_u *dirname_now = NULL; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6220 int found_match; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6221 aco_save_T aco; |
41 | 6222 |
7558
9a4c9dccd603
commit https://github.com/vim/vim/commit/b86a343280b08d6701da68ee0651e960a0a7a61c
Christian Brabandt <cb@256bit.org>
parents:
7515
diff
changeset
|
6223 dirname_start = alloc_id(MAXPATHL, aid_qf_dirname_start); |
9a4c9dccd603
commit https://github.com/vim/vim/commit/b86a343280b08d6701da68ee0651e960a0a7a61c
Christian Brabandt <cb@256bit.org>
parents:
7515
diff
changeset
|
6224 dirname_now = alloc_id(MAXPATHL, aid_qf_dirname_now); |
2770 | 6225 if (dirname_start == NULL || dirname_now == NULL) |
6226 goto theend; | |
6227 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6228 // Remember the current directory, because a BufRead autocommand that does |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6229 // ":lcd %:p:h" changes the meaning of short path names. |
1411 | 6230 mch_dirname(dirname_start, MAXPATHL); |
6231 | |
123 | 6232 seconds = (time_t)0; |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6233 for (fi = 0; fi < cmd_args->fcount && !got_int && cmd_args->tomatch > 0; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6234 ++fi) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6235 { |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6236 fname = shorten_fname1(cmd_args->fnames[fi]); |
123 | 6237 if (time(NULL) > seconds) |
6238 { | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6239 // Display the file name every second or so, show the user we are |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6240 // working on it. |
123 | 6241 seconds = time(NULL); |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6242 vgr_display_fname(fname); |
123 | 6243 } |
6244 | |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6245 buf = buflist_findname_exp(cmd_args->fnames[fi]); |
42 | 6246 if (buf == NULL || buf->b_ml.ml_mfp == NULL) |
6247 { | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6248 // Remember that a buffer with this name already exists. |
42 | 6249 duplicate_name = (buf != NULL); |
123 | 6250 using_dummy = TRUE; |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6251 *redraw_for_dummy = TRUE; |
123 | 6252 |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6253 buf = vgr_load_dummy_buf(fname, dirname_start, dirname_now); |
42 | 6254 } |
6255 else | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6256 // Use existing, loaded buffer. |
42 | 6257 using_dummy = FALSE; |
123 | 6258 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6259 // Check whether the quickfix list is still valid. When loading a |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6260 // buffer above, autocommands might have changed the quickfix list. |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6261 if (!vgr_qflist_valid(wp, qi, save_qfid, cmd_args->qf_title)) |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6262 goto theend; |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6263 |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
6264 save_qfid = qf_get_curlist(qi)->qf_id; |
4003 | 6265 |
42 | 6266 if (buf == NULL) |
123 | 6267 { |
6268 if (!got_int) | |
15470
55ccc2d353bd
patch 8.1.0743: giving error messages is not flexible
Bram Moolenaar <Bram@vim.org>
parents:
15424
diff
changeset
|
6269 smsg(_("Cannot open file \"%s\""), fname); |
123 | 6270 } |
41 | 6271 else |
6272 { | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6273 // Try for a match in all lines of the buffer. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6274 // For ":1vimgrep" look for first match only. |
16062
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
6275 found_match = vgr_match_buflines(qf_get_curlist(qi), |
24547
192058cad081
patch 8.2.2813: cannot grep using fuzzy matching
Bram Moolenaar <Bram@vim.org>
parents:
23865
diff
changeset
|
6276 fname, buf, cmd_args->spat, &cmd_args->regmatch, |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6277 &cmd_args->tomatch, duplicate_name, cmd_args->flags); |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6278 |
42 | 6279 if (using_dummy) |
6280 { | |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6281 if (found_match && *first_match_buf == NULL) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6282 *first_match_buf = buf; |
42 | 6283 if (duplicate_name) |
123 | 6284 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6285 // Never keep a dummy buffer if there is another buffer |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6286 // with the same name. |
3490 | 6287 wipe_dummy_buffer(buf, dirname_start); |
123 | 6288 buf = NULL; |
6289 } | |
22699
e82579016863
patch 8.2.1898: command modifier parsing always uses global cmdmod
Bram Moolenaar <Bram@vim.org>
parents:
22645
diff
changeset
|
6290 else if ((cmdmod.cmod_flags & CMOD_HIDE) == 0 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6291 || buf->b_p_bh[0] == 'u' // "unload" |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6292 || buf->b_p_bh[0] == 'w' // "wipe" |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6293 || buf->b_p_bh[0] == 'd') // "delete" |
42 | 6294 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6295 // When no match was found we don't need to remember the |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6296 // buffer, wipe it out. If there was a match and it |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6297 // wasn't the first one or we won't jump there: only |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6298 // unload the buffer. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6299 // Ignore 'hidden' here, because it may lead to having too |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6300 // many swap files. |
42 | 6301 if (!found_match) |
123 | 6302 { |
3490 | 6303 wipe_dummy_buffer(buf, dirname_start); |
123 | 6304 buf = NULL; |
6305 } | |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6306 else if (buf != *first_match_buf |
21668
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6307 || (cmd_args->flags & VGR_NOJUMP) |
0843f244e547
patch 8.2.1384: no ATTENTION prompt for :vimgrep first match file
Bram Moolenaar <Bram@vim.org>
parents:
21461
diff
changeset
|
6308 || existing_swapfile(buf)) |
123 | 6309 { |
3490 | 6310 unload_dummy_buffer(buf, dirname_start); |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6311 // Keeping the buffer, remove the dummy flag. |
9540
64a791c53418
commit https://github.com/vim/vim/commit/015102e91e978a0bb42a14461c132a85e8f7e1ea
Christian Brabandt <cb@256bit.org>
parents:
9538
diff
changeset
|
6312 buf->b_flags &= ~BF_DUMMY; |
123 | 6313 buf = NULL; |
6314 } | |
42 | 6315 } |
123 | 6316 |
6317 if (buf != NULL) | |
6318 { | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6319 // Keeping the buffer, remove the dummy flag. |
9540
64a791c53418
commit https://github.com/vim/vim/commit/015102e91e978a0bb42a14461c132a85e8f7e1ea
Christian Brabandt <cb@256bit.org>
parents:
9538
diff
changeset
|
6320 buf->b_flags &= ~BF_DUMMY; |
64a791c53418
commit https://github.com/vim/vim/commit/015102e91e978a0bb42a14461c132a85e8f7e1ea
Christian Brabandt <cb@256bit.org>
parents:
9538
diff
changeset
|
6321 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6322 // If the buffer is still loaded we need to use the |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6323 // directory we jumped to below. |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6324 if (buf == *first_match_buf |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6325 && *target_dir == NULL |
1411 | 6326 && STRCMP(dirname_start, dirname_now) != 0) |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6327 *target_dir = vim_strsave(dirname_now); |
1411 | 6328 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6329 // The buffer is still loaded, the Filetype autocommands |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6330 // need to be done now, in that buffer. And the modelines |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6331 // need to be done (again). But not the window-local |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6332 // options! |
123 | 6333 aucmd_prepbuf(&aco, buf); |
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13252
diff
changeset
|
6334 #if defined(FEAT_SYN_HL) |
123 | 6335 apply_autocmds(EVENT_FILETYPE, buf->b_p_ft, |
6336 buf->b_fname, TRUE, buf); | |
677 | 6337 #endif |
717 | 6338 do_modelines(OPT_NOWIN); |
123 | 6339 aucmd_restbuf(&aco); |
6340 } | |
42 | 6341 } |
41 | 6342 } |
6343 } | |
6344 | |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6345 status = OK; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6346 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6347 theend: |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6348 vim_free(dirname_now); |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6349 vim_free(dirname_start); |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6350 return status; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6351 } |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6352 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6353 /* |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6354 * ":vimgrep {pattern} file(s)" |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6355 * ":vimgrepadd {pattern} file(s)" |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6356 * ":lvimgrep {pattern} file(s)" |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6357 * ":lvimgrepadd {pattern} file(s)" |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6358 */ |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6359 void |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6360 ex_vimgrep(exarg_T *eap) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6361 { |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6362 vgr_args_T args; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6363 qf_info_T *qi; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6364 qf_list_T *qfl; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6365 int_u save_qfid; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6366 win_T *wp = NULL; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6367 int redraw_for_dummy = FALSE; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6368 buf_T *first_match_buf = NULL; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6369 char_u *target_dir = NULL; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6370 char_u *au_name = NULL; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6371 int status; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6372 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6373 au_name = vgr_get_auname(eap->cmdidx); |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6374 if (au_name != NULL && apply_autocmds(EVENT_QUICKFIXCMDPRE, au_name, |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6375 curbuf->b_fname, TRUE, curbuf)) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6376 { |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6377 #ifdef FEAT_EVAL |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6378 if (aborting()) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6379 return; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6380 #endif |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6381 } |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6382 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6383 qi = qf_cmd_get_or_alloc_stack(eap, &wp); |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6384 if (qi == NULL) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6385 return; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6386 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6387 if (vgr_process_args(eap, &args) == FAIL) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6388 goto theend; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6389 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6390 if ((eap->cmdidx != CMD_grepadd && eap->cmdidx != CMD_lgrepadd |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6391 && eap->cmdidx != CMD_vimgrepadd |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6392 && eap->cmdidx != CMD_lvimgrepadd) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6393 || qf_stack_empty(qi)) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6394 // make place for a new list |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6395 qf_new_list(qi, args.qf_title); |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6396 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6397 incr_quickfix_busy(); |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6398 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6399 status = vgr_process_files(wp, qi, &args, &redraw_for_dummy, |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6400 &first_match_buf, &target_dir); |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6401 if (status != OK) |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6402 { |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6403 FreeWild(args.fcount, args.fnames); |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6404 decr_quickfix_busy(); |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6405 goto theend; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6406 } |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6407 |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6408 FreeWild(args.fcount, args.fnames); |
41 | 6409 |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
6410 qfl = qf_get_curlist(qi); |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
6411 qfl->qf_nonevalid = FALSE; |
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
6412 qfl->qf_ptr = qfl->qf_start; |
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
6413 qfl->qf_index = 1; |
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
6414 qf_list_changed(qfl); |
41 | 6415 |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
6416 qf_update_buffer(qi, NULL); |
41 | 6417 |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6418 // Remember the current quickfix list identifier, so that we can check for |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6419 // autocommands changing the current quickfix list. |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6420 save_qfid = qf_get_curlist(qi)->qf_id; |
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6421 |
842 | 6422 if (au_name != NULL) |
6423 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name, | |
6424 curbuf->b_fname, TRUE, curbuf); | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6425 // The QuickFixCmdPost autocmd may free the quickfix list. Check the list |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6426 // is still valid. |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
6427 if (!qflist_valid(wp, save_qfid) |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
6428 || qf_restore_list(qi, save_qfid) == FAIL) |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
6429 { |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
6430 decr_quickfix_busy(); |
13090
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
6431 goto theend; |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
6432 } |
14250
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
6433 |
14603
d1b69129db99
patch 8.1.0315: helpgrep with language doesn't work properly
Christian Brabandt <cb@256bit.org>
parents:
14560
diff
changeset
|
6434 // Jump to first match. |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
6435 if (!qf_list_empty(qf_get_curlist(qi))) |
170 | 6436 { |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6437 if ((args.flags & VGR_NOJUMP) == 0) |
13521
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6438 vgr_jump_to_match(qi, eap->forceit, &redraw_for_dummy, |
15c856a1617b
patch 8.0.1634: the ex_vimgrep() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13497
diff
changeset
|
6439 first_match_buf, target_dir); |
170 | 6440 } |
42 | 6441 else |
26877
06a137af96f8
patch 8.2.3967: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26865
diff
changeset
|
6442 semsg(_(e_no_match_str_2), args.spat); |
41 | 6443 |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
6444 decr_quickfix_busy(); |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
6445 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6446 // If we loaded a dummy buffer into the current window, the autocommands |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6447 // may have messed up things, need to redraw and recompute folds. |
1396 | 6448 if (redraw_for_dummy) |
6449 { | |
6450 #ifdef FEAT_FOLDING | |
6451 foldUpdateAll(curwin); | |
6452 #else | |
6453 redraw_later(NOT_VALID); | |
6454 #endif | |
6455 } | |
6456 | |
41 | 6457 theend: |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6458 vim_free(args.qf_title); |
1411 | 6459 vim_free(target_dir); |
18607
fbeb1bf0cea8
patch 8.1.2297: the ex_vimgrep() function is too long
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
6460 vim_regfree(args.regmatch.regprog); |
41 | 6461 } |
6462 | |
6463 /* | |
3490 | 6464 * Restore current working directory to "dirname_start" if they differ, taking |
6465 * into account whether it is set locally or globally. | |
6466 */ | |
6467 static void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
6468 restore_start_dir(char_u *dirname_start) |
3490 | 6469 { |
6470 char_u *dirname_now = alloc(MAXPATHL); | |
6471 | |
6472 if (NULL != dirname_now) | |
6473 { | |
6474 mch_dirname(dirname_now, MAXPATHL); | |
6475 if (STRCMP(dirname_start, dirname_now) != 0) | |
6476 { | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6477 // If the directory has changed, change it back by building up an |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6478 // appropriate ex command and executing it. |
3490 | 6479 exarg_T ea; |
6480 | |
20007
aadd1cae2ff5
patch 8.2.0559: clearing a struct is verbose
Bram Moolenaar <Bram@vim.org>
parents:
19934
diff
changeset
|
6481 CLEAR_FIELD(ea); |
3490 | 6482 ea.arg = dirname_start; |
6483 ea.cmdidx = (curwin->w_localdir == NULL) ? CMD_cd : CMD_lcd; | |
6484 ex_cd(&ea); | |
6485 } | |
3974 | 6486 vim_free(dirname_now); |
3490 | 6487 } |
6488 } | |
6489 | |
6490 /* | |
6491 * Load file "fname" into a dummy buffer and return the buffer pointer, | |
6492 * placing the directory resulting from the buffer load into the | |
6493 * "resulting_dir" pointer. "resulting_dir" must be allocated by the caller | |
6494 * prior to calling this function. Restores directory to "dirname_start" prior | |
6495 * to returning, if autocmds or the 'autochdir' option have changed it. | |
6496 * | |
6497 * If creating the dummy buffer does not fail, must call unload_dummy_buffer() | |
6498 * or wipe_dummy_buffer() later! | |
6499 * | |
42 | 6500 * Returns NULL if it fails. |
6501 */ | |
6502 static buf_T * | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
6503 load_dummy_buffer( |
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
6504 char_u *fname, |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6505 char_u *dirname_start, // in: old directory |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6506 char_u *resulting_dir) // out: new directory |
42 | 6507 { |
6508 buf_T *newbuf; | |
9487
69ed2c9d34a6
commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b
Christian Brabandt <cb@256bit.org>
parents:
9485
diff
changeset
|
6509 bufref_T newbufref; |
69ed2c9d34a6
commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b
Christian Brabandt <cb@256bit.org>
parents:
9485
diff
changeset
|
6510 bufref_T newbuf_to_wipe; |
42 | 6511 int failed = TRUE; |
6512 aco_save_T aco; | |
13056
b931b2751650
patch 8.0.1403: using freed buffer in grep command
Christian Brabandt <cb@256bit.org>
parents:
13026
diff
changeset
|
6513 int readfile_result; |
42 | 6514 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6515 // Allocate a buffer without putting it in the buffer list. |
42 | 6516 newbuf = buflist_new(NULL, NULL, (linenr_T)1, BLN_DUMMY); |
6517 if (newbuf == NULL) | |
6518 return NULL; | |
9487
69ed2c9d34a6
commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b
Christian Brabandt <cb@256bit.org>
parents:
9485
diff
changeset
|
6519 set_bufref(&newbufref, newbuf); |
42 | 6520 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6521 // Init the options. |
177 | 6522 buf_copy_options(newbuf, BCO_ENTER | BCO_NOHELP); |
6523 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6524 // need to open the memfile before putting the buffer in a window |
1918 | 6525 if (ml_open(newbuf) == OK) |
42 | 6526 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6527 // Make sure this buffer isn't wiped out by autocommands. |
13056
b931b2751650
patch 8.0.1403: using freed buffer in grep command
Christian Brabandt <cb@256bit.org>
parents:
13026
diff
changeset
|
6528 ++newbuf->b_locked; |
b931b2751650
patch 8.0.1403: using freed buffer in grep command
Christian Brabandt <cb@256bit.org>
parents:
13026
diff
changeset
|
6529 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6530 // set curwin/curbuf to buf and save a few things |
1918 | 6531 aucmd_prepbuf(&aco, newbuf); |
6532 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6533 // Need to set the filename for autocommands. |
1918 | 6534 (void)setfname(curbuf, fname, NULL, FALSE); |
6535 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6536 // Create swap file now to avoid the ATTENTION message. |
42 | 6537 check_need_swap(TRUE); |
6538 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6539 // Remove the "dummy" flag, otherwise autocommands may not |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6540 // work. |
42 | 6541 curbuf->b_flags &= ~BF_DUMMY; |
6542 | |
9487
69ed2c9d34a6
commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b
Christian Brabandt <cb@256bit.org>
parents:
9485
diff
changeset
|
6543 newbuf_to_wipe.br_buf = NULL; |
13056
b931b2751650
patch 8.0.1403: using freed buffer in grep command
Christian Brabandt <cb@256bit.org>
parents:
13026
diff
changeset
|
6544 readfile_result = readfile(fname, NULL, |
42 | 6545 (linenr_T)0, (linenr_T)0, (linenr_T)MAXLNUM, |
13056
b931b2751650
patch 8.0.1403: using freed buffer in grep command
Christian Brabandt <cb@256bit.org>
parents:
13026
diff
changeset
|
6546 NULL, READ_NEW | READ_DUMMY); |
b931b2751650
patch 8.0.1403: using freed buffer in grep command
Christian Brabandt <cb@256bit.org>
parents:
13026
diff
changeset
|
6547 --newbuf->b_locked; |
b931b2751650
patch 8.0.1403: using freed buffer in grep command
Christian Brabandt <cb@256bit.org>
parents:
13026
diff
changeset
|
6548 if (readfile_result == OK |
857 | 6549 && !got_int |
42 | 6550 && !(curbuf->b_flags & BF_NEW)) |
6551 { | |
6552 failed = FALSE; | |
6553 if (curbuf != newbuf) | |
6554 { | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6555 // Bloody autocommands changed the buffer! Can happen when |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6556 // using netrw and editing a remote file. Use the current |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6557 // buffer instead, delete the dummy one after restoring the |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6558 // window stuff. |
9487
69ed2c9d34a6
commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b
Christian Brabandt <cb@256bit.org>
parents:
9485
diff
changeset
|
6559 set_bufref(&newbuf_to_wipe, newbuf); |
42 | 6560 newbuf = curbuf; |
6561 } | |
6562 } | |
1918 | 6563 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6564 // restore curwin/curbuf and a few other things |
1918 | 6565 aucmd_restbuf(&aco); |
9487
69ed2c9d34a6
commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b
Christian Brabandt <cb@256bit.org>
parents:
9485
diff
changeset
|
6566 if (newbuf_to_wipe.br_buf != NULL && bufref_valid(&newbuf_to_wipe)) |
69ed2c9d34a6
commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b
Christian Brabandt <cb@256bit.org>
parents:
9485
diff
changeset
|
6567 wipe_buffer(newbuf_to_wipe.br_buf, FALSE); |
9485
c16e207dc465
commit https://github.com/vim/vim/commit/ea3f2e7be447a8f0c4436869620f908de5e8ef1e
Christian Brabandt <cb@256bit.org>
parents:
9475
diff
changeset
|
6568 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6569 // Add back the "dummy" flag, otherwise buflist_findname_stat() won't |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6570 // skip it. |
9485
c16e207dc465
commit https://github.com/vim/vim/commit/ea3f2e7be447a8f0c4436869620f908de5e8ef1e
Christian Brabandt <cb@256bit.org>
parents:
9475
diff
changeset
|
6571 newbuf->b_flags |= BF_DUMMY; |
42 | 6572 } |
6573 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6574 // When autocommands/'autochdir' option changed directory: go back. |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6575 // Let the caller know what the resulting dir was first, in case it is |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6576 // important. |
3490 | 6577 mch_dirname(resulting_dir, MAXPATHL); |
6578 restore_start_dir(dirname_start); | |
6579 | |
9487
69ed2c9d34a6
commit https://github.com/vim/vim/commit/7c0a2f367f2507669560b1a66423155c70d2e75b
Christian Brabandt <cb@256bit.org>
parents:
9485
diff
changeset
|
6580 if (!bufref_valid(&newbufref)) |
42 | 6581 return NULL; |
6582 if (failed) | |
6583 { | |
3490 | 6584 wipe_dummy_buffer(newbuf, dirname_start); |
42 | 6585 return NULL; |
6586 } | |
6587 return newbuf; | |
6588 } | |
6589 | |
6590 /* | |
3490 | 6591 * Wipe out the dummy buffer that load_dummy_buffer() created. Restores |
6592 * directory to "dirname_start" prior to returning, if autocmds or the | |
6593 * 'autochdir' option have changed it. | |
42 | 6594 */ |
6595 static void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
6596 wipe_dummy_buffer(buf_T *buf, char_u *dirname_start) |
42 | 6597 { |
19649
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6598 // If any autocommand opened a window on the dummy buffer, close that |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6599 // window. If we can't close them all then give up. |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6600 while (buf->b_nwindows > 0) |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6601 { |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6602 int did_one = FALSE; |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6603 win_T *wp; |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6604 |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6605 if (firstwin->w_next != NULL) |
19934
3ff714d765ba
patch 8.2.0523: loops are repeated
Bram Moolenaar <Bram@vim.org>
parents:
19888
diff
changeset
|
6606 FOR_ALL_WINDOWS(wp) |
19649
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6607 if (wp->w_buffer == buf) |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6608 { |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6609 if (win_close(wp, FALSE) == OK) |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6610 did_one = TRUE; |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6611 break; |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6612 } |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6613 if (!did_one) |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6614 return; |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6615 } |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6616 |
d4baa35fea5d
patch 8.2.0381: using freed memory with :lvimgrep and autocommand
Bram Moolenaar <Bram@vim.org>
parents:
19475
diff
changeset
|
6617 if (curbuf != buf && buf->b_nwindows == 0) // safety check |
857 | 6618 { |
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13252
diff
changeset
|
6619 #if defined(FEAT_EVAL) |
857 | 6620 cleanup_T cs; |
6621 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6622 // Reset the error/interrupt/exception state here so that aborting() |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6623 // returns FALSE when wiping out the buffer. Otherwise it doesn't |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6624 // work when got_int is set. |
857 | 6625 enter_cleanup(&cs); |
6626 #endif | |
6627 | |
23278
51b1a7e3e4ab
patch 8.2.2185: BufUnload is not triggered for the quickfix dummy buffer
Bram Moolenaar <Bram@vim.org>
parents:
23203
diff
changeset
|
6628 wipe_buffer(buf, TRUE); |
857 | 6629 |
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13252
diff
changeset
|
6630 #if defined(FEAT_EVAL) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6631 // Restore the error/interrupt/exception state if not discarded by a |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6632 // new aborting error, interrupt, or uncaught exception. |
857 | 6633 leave_cleanup(&cs); |
6634 #endif | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6635 // When autocommands/'autochdir' option changed directory: go back. |
3490 | 6636 restore_start_dir(dirname_start); |
857 | 6637 } |
42 | 6638 } |
6639 | |
6640 /* | |
3490 | 6641 * Unload the dummy buffer that load_dummy_buffer() created. Restores |
6642 * directory to "dirname_start" prior to returning, if autocmds or the | |
6643 * 'autochdir' option have changed it. | |
42 | 6644 */ |
6645 static void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
6646 unload_dummy_buffer(buf_T *buf, char_u *dirname_start) |
42 | 6647 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6648 if (curbuf != buf) // safety check |
3490 | 6649 { |
18886
050f5eaa9e50
patch 8.2.0004: get E685 and E931 if buffer reload is interrupted
Bram Moolenaar <Bram@vim.org>
parents:
18827
diff
changeset
|
6650 close_buffer(NULL, buf, DOBUF_UNLOAD, FALSE, TRUE); |
3490 | 6651 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6652 // When autocommands/'autochdir' option changed directory: go back. |
3490 | 6653 restore_start_dir(dirname_start); |
6654 } | |
42 | 6655 } |
6656 | |
170 | 6657 #if defined(FEAT_EVAL) || defined(PROTO) |
6658 /* | |
19195
2ef19eed524a
patch 8.2.0156: various typos in source files and tests
Bram Moolenaar <Bram@vim.org>
parents:
18886
diff
changeset
|
6659 * Copy the specified quickfix entry items into a new dict and append the dict |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6660 * to 'list'. Returns OK on success. |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6661 */ |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6662 static int |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6663 get_qfline_items(qfline_T *qfp, list_T *list) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6664 { |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6665 int bufnum; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6666 dict_T *dict; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6667 char_u buf[2]; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6668 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6669 // Handle entries with a non-existing buffer number. |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6670 bufnum = qfp->qf_fnum; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6671 if (bufnum != 0 && (buflist_findnr(bufnum) == NULL)) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6672 bufnum = 0; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6673 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6674 if ((dict = dict_alloc()) == NULL) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6675 return FAIL; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6676 if (list_append_dict(list, dict) == FAIL) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6677 return FAIL; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6678 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6679 buf[0] = qfp->qf_type; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6680 buf[1] = NUL; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6681 if (dict_add_number(dict, "bufnr", (long)bufnum) == FAIL |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
6682 || dict_add_number(dict, "lnum", (long)qfp->qf_lnum) == FAIL |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
6683 || dict_add_number(dict, "end_lnum", (long)qfp->qf_end_lnum) == FAIL |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
6684 || dict_add_number(dict, "col", (long)qfp->qf_col) == FAIL |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
6685 || dict_add_number(dict, "end_col", (long)qfp->qf_end_col) == FAIL |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
6686 || dict_add_number(dict, "vcol", (long)qfp->qf_viscol) == FAIL |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
6687 || dict_add_number(dict, "nr", (long)qfp->qf_nr) == FAIL |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6688 || dict_add_string(dict, "module", qfp->qf_module) == FAIL |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6689 || dict_add_string(dict, "pattern", qfp->qf_pattern) == FAIL |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6690 || dict_add_string(dict, "text", qfp->qf_text) == FAIL |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6691 || dict_add_string(dict, "type", buf) == FAIL |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6692 || dict_add_number(dict, "valid", (long)qfp->qf_valid) == FAIL) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6693 return FAIL; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6694 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6695 return OK; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6696 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6697 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6698 /* |
170 | 6699 * Add each quickfix error to list "list" as a dictionary. |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6700 * If qf_idx is -1, use the current list. Otherwise, use the specified list. |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6701 * If eidx is not 0, then return only the specified entry. Otherwise return |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6702 * all the entries. |
170 | 6703 */ |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
6704 static int |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6705 get_errorlist( |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6706 qf_info_T *qi_arg, |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6707 win_T *wp, |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6708 int qf_idx, |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6709 int eidx, |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6710 list_T *list) |
170 | 6711 { |
12252
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6712 qf_info_T *qi = qi_arg; |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
6713 qf_list_T *qfl; |
230 | 6714 qfline_T *qfp; |
6715 int i; | |
170 | 6716 |
12252
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6717 if (qi == NULL) |
647 | 6718 { |
12252
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6719 qi = &ql_info; |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6720 if (wp != NULL) |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6721 { |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6722 qi = GET_LOC_LIST(wp); |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6723 if (qi == NULL) |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6724 return FAIL; |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6725 } |
647 | 6726 } |
6727 | |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6728 if (eidx < 0) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6729 return OK; |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6730 |
13800
e4dc4ede9ef8
patch 8.0.1772: quickfix: mixup of FALSE and FAIL, returning -1
Christian Brabandt <cb@256bit.org>
parents:
13764
diff
changeset
|
6731 if (qf_idx == INVALID_QFIDX) |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6732 qf_idx = qi->qf_curlist; |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6733 |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
6734 if (qf_idx >= qi->qf_listcount) |
170 | 6735 return FAIL; |
6736 | |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
6737 qfl = qf_get_list(qi, qf_idx); |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
6738 if (qf_list_empty(qfl)) |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
6739 return FAIL; |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
6740 |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6741 FOR_ALL_QFL_ITEMS(qfl, qfp, i) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6742 { |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6743 if (eidx > 0) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6744 { |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6745 if (eidx == i) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6746 return get_qfline_items(qfp, list); |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6747 } |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6748 else if (get_qfline_items(qfp, list) == FAIL) |
170 | 6749 return FAIL; |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6750 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
6751 |
170 | 6752 return OK; |
6753 } | |
230 | 6754 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6755 // Flags used by getqflist()/getloclist() to determine which fields to return. |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6756 enum { |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6757 QF_GETLIST_NONE = 0x0, |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6758 QF_GETLIST_TITLE = 0x1, |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6759 QF_GETLIST_ITEMS = 0x2, |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6760 QF_GETLIST_NR = 0x4, |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6761 QF_GETLIST_WINID = 0x8, |
11412
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
6762 QF_GETLIST_CONTEXT = 0x10, |
12287
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
6763 QF_GETLIST_ID = 0x20, |
12465
805f7fd40e0d
patch 8.0.1112: can't get size or current index from quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12449
diff
changeset
|
6764 QF_GETLIST_IDX = 0x40, |
805f7fd40e0d
patch 8.0.1112: can't get size or current index from quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12449
diff
changeset
|
6765 QF_GETLIST_SIZE = 0x80, |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
6766 QF_GETLIST_TICK = 0x100, |
14664
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
6767 QF_GETLIST_FILEWINID = 0x200, |
16019
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
6768 QF_GETLIST_QFBUFNR = 0x400, |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
6769 QF_GETLIST_QFTF = 0x800, |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
6770 QF_GETLIST_ALL = 0xFFF, |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6771 }; |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6772 |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6773 /* |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6774 * Parse text from 'di' and return the quickfix list items. |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6775 * Existing quickfix lists are not modified. |
12252
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6776 */ |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6777 static int |
12321
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6778 qf_get_list_from_lines(dict_T *what, dictitem_T *di, dict_T *retdict) |
12252
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6779 { |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6780 int status = FAIL; |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6781 qf_info_T *qi; |
12321
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6782 char_u *errorformat = p_efm; |
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6783 dictitem_T *efm_di; |
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6784 list_T *l; |
12252
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6785 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6786 // Only a List value is supported |
12303
ec7a4fd21dd5
patch 8.0.1031: "text" argument for getqflist() is confusing
Christian Brabandt <cb@256bit.org>
parents:
12299
diff
changeset
|
6787 if (di->di_tv.v_type == VAR_LIST && di->di_tv.vval.v_list != NULL) |
12252
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6788 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6789 // If errorformat is supplied then use it, otherwise use the 'efm' |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6790 // option setting |
12321
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6791 if ((efm_di = dict_find(what, (char_u *)"efm", -1)) != NULL) |
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6792 { |
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6793 if (efm_di->di_tv.v_type != VAR_STRING || |
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6794 efm_di->di_tv.vval.v_string == NULL) |
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6795 return FAIL; |
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6796 errorformat = efm_di->di_tv.vval.v_string; |
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6797 } |
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6798 |
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6799 l = list_alloc(); |
12299
f4d00472e617
patch 8.0.1029: return value of getqflist() is inconsistent
Christian Brabandt <cb@256bit.org>
parents:
12287
diff
changeset
|
6800 if (l == NULL) |
f4d00472e617
patch 8.0.1029: return value of getqflist() is inconsistent
Christian Brabandt <cb@256bit.org>
parents:
12287
diff
changeset
|
6801 return FAIL; |
f4d00472e617
patch 8.0.1029: return value of getqflist() is inconsistent
Christian Brabandt <cb@256bit.org>
parents:
12287
diff
changeset
|
6802 |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
6803 qi = qf_alloc_stack(QFLT_INTERNAL); |
12252
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6804 if (qi != NULL) |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6805 { |
12321
2779d593a706
patch 8.0.1040: cannot use another error format in getqflist()
Christian Brabandt <cb@256bit.org>
parents:
12303
diff
changeset
|
6806 if (qf_init_ext(qi, 0, NULL, NULL, &di->di_tv, errorformat, |
12252
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6807 TRUE, (linenr_T)0, (linenr_T)0, NULL, NULL) > 0) |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6808 { |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
6809 (void)get_errorlist(qi, NULL, 0, 0, l); |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
6810 qf_free(&qi->qf_lists[0]); |
12252
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6811 } |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6812 free(qi); |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6813 } |
12299
f4d00472e617
patch 8.0.1029: return value of getqflist() is inconsistent
Christian Brabandt <cb@256bit.org>
parents:
12287
diff
changeset
|
6814 dict_add_list(retdict, "items", l); |
f4d00472e617
patch 8.0.1029: return value of getqflist() is inconsistent
Christian Brabandt <cb@256bit.org>
parents:
12287
diff
changeset
|
6815 status = OK; |
12252
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6816 } |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6817 |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6818 return status; |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6819 } |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6820 |
3d0e042ec13c
patch 8.0.1006: quickfix list changes when parsing text with 'erroformat'
Christian Brabandt <cb@256bit.org>
parents:
12146
diff
changeset
|
6821 /* |
13115
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6822 * Return the quickfix/location list window identifier in the current tabpage. |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6823 */ |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6824 static int |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6825 qf_winid(qf_info_T *qi) |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6826 { |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6827 win_T *win; |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6828 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6829 // The quickfix window can be opened even if the quickfix list is not set |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6830 // using ":copen". This is not true for location lists. |
13115
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6831 if (qi == NULL) |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6832 return 0; |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6833 win = qf_find_win(qi); |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6834 if (win != NULL) |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6835 return win->w_id; |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6836 return 0; |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6837 } |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6838 |
9812a9ca3ab2
patch 8.0.1432: after ":copen" can't get the window-ID of the quickfix window
Christian Brabandt <cb@256bit.org>
parents:
13105
diff
changeset
|
6839 /* |
16019
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
6840 * Returns the number of the buffer displayed in the quickfix/location list |
26464
c0cb28384dc2
patch 8.2.3762: if quickfix buffer is wiped out getqflist() still returns it
Bram Moolenaar <Bram@vim.org>
parents:
26458
diff
changeset
|
6841 * window. If there is no buffer associated with the list or the buffer is |
c0cb28384dc2
patch 8.2.3762: if quickfix buffer is wiped out getqflist() still returns it
Bram Moolenaar <Bram@vim.org>
parents:
26458
diff
changeset
|
6842 * wiped out, then returns 0. |
16019
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
6843 */ |
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
6844 static int |
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
6845 qf_getprop_qfbufnr(qf_info_T *qi, dict_T *retdict) |
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
6846 { |
26464
c0cb28384dc2
patch 8.2.3762: if quickfix buffer is wiped out getqflist() still returns it
Bram Moolenaar <Bram@vim.org>
parents:
26458
diff
changeset
|
6847 int bufnum = 0; |
c0cb28384dc2
patch 8.2.3762: if quickfix buffer is wiped out getqflist() still returns it
Bram Moolenaar <Bram@vim.org>
parents:
26458
diff
changeset
|
6848 |
c0cb28384dc2
patch 8.2.3762: if quickfix buffer is wiped out getqflist() still returns it
Bram Moolenaar <Bram@vim.org>
parents:
26458
diff
changeset
|
6849 if (qi != NULL && buflist_findnr(qi->qf_bufnr) != NULL) |
c0cb28384dc2
patch 8.2.3762: if quickfix buffer is wiped out getqflist() still returns it
Bram Moolenaar <Bram@vim.org>
parents:
26458
diff
changeset
|
6850 bufnum = qi->qf_bufnr; |
c0cb28384dc2
patch 8.2.3762: if quickfix buffer is wiped out getqflist() still returns it
Bram Moolenaar <Bram@vim.org>
parents:
26458
diff
changeset
|
6851 |
c0cb28384dc2
patch 8.2.3762: if quickfix buffer is wiped out getqflist() still returns it
Bram Moolenaar <Bram@vim.org>
parents:
26458
diff
changeset
|
6852 return dict_add_number(retdict, "qfbufnr", bufnum); |
16019
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
6853 } |
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
6854 |
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
6855 /* |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6856 * Convert the keys in 'what' to quickfix list property flags. |
230 | 6857 */ |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6858 static int |
14664
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
6859 qf_getprop_keys2flags(dict_T *what, int loclist) |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6860 { |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6861 int flags = QF_GETLIST_NONE; |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
6862 |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
6863 if (dict_has_key(what, "all")) |
14664
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
6864 { |
12287
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
6865 flags |= QF_GETLIST_ALL; |
14664
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
6866 if (!loclist) |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
6867 // File window ID is applicable only to location list windows |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
6868 flags &= ~ QF_GETLIST_FILEWINID; |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
6869 } |
12287
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
6870 |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
6871 if (dict_has_key(what, "title")) |
12287
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
6872 flags |= QF_GETLIST_TITLE; |
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
6873 |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
6874 if (dict_has_key(what, "nr")) |
13026
7c0e0e923537
patch 8.0.1389: getqflist() items are missing if not set
Christian Brabandt <cb@256bit.org>
parents:
13016
diff
changeset
|
6875 flags |= QF_GETLIST_NR; |
7c0e0e923537
patch 8.0.1389: getqflist() items are missing if not set
Christian Brabandt <cb@256bit.org>
parents:
13016
diff
changeset
|
6876 |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
6877 if (dict_has_key(what, "winid")) |
12287
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
6878 flags |= QF_GETLIST_WINID; |
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
6879 |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
6880 if (dict_has_key(what, "context")) |
12287
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
6881 flags |= QF_GETLIST_CONTEXT; |
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
6882 |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
6883 if (dict_has_key(what, "id")) |
13026
7c0e0e923537
patch 8.0.1389: getqflist() items are missing if not set
Christian Brabandt <cb@256bit.org>
parents:
13016
diff
changeset
|
6884 flags |= QF_GETLIST_ID; |
7c0e0e923537
patch 8.0.1389: getqflist() items are missing if not set
Christian Brabandt <cb@256bit.org>
parents:
13016
diff
changeset
|
6885 |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
6886 if (dict_has_key(what, "items")) |
12287
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
6887 flags |= QF_GETLIST_ITEMS; |
11412
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
6888 |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
6889 if (dict_has_key(what, "idx")) |
12465
805f7fd40e0d
patch 8.0.1112: can't get size or current index from quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12449
diff
changeset
|
6890 flags |= QF_GETLIST_IDX; |
805f7fd40e0d
patch 8.0.1112: can't get size or current index from quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12449
diff
changeset
|
6891 |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
6892 if (dict_has_key(what, "size")) |
12465
805f7fd40e0d
patch 8.0.1112: can't get size or current index from quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12449
diff
changeset
|
6893 flags |= QF_GETLIST_SIZE; |
805f7fd40e0d
patch 8.0.1112: can't get size or current index from quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12449
diff
changeset
|
6894 |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
6895 if (dict_has_key(what, "changedtick")) |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
6896 flags |= QF_GETLIST_TICK; |
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
6897 |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
6898 if (loclist && dict_has_key(what, "filewinid")) |
14664
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
6899 flags |= QF_GETLIST_FILEWINID; |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
6900 |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
6901 if (dict_has_key(what, "qfbufnr")) |
16019
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
6902 flags |= QF_GETLIST_QFBUFNR; |
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
6903 |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
6904 if (dict_has_key(what, "quickfixtextfunc")) |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
6905 flags |= QF_GETLIST_QFTF; |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
6906 |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6907 return flags; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6908 } |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6909 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6910 /* |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6911 * Return the quickfix list index based on 'nr' or 'id' in 'what'. |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6912 * If 'nr' and 'id' are not present in 'what' then return the current |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6913 * quickfix list index. |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6914 * If 'nr' is zero then return the current quickfix list index. |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6915 * If 'nr' is '$' then return the last quickfix list index. |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6916 * If 'id' is present then return the index of the quickfix list with that id. |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6917 * If 'id' is zero then return the quickfix list index specified by 'nr'. |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6918 * Return -1, if quickfix list is not present or if the stack is empty. |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6919 */ |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6920 static int |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6921 qf_getprop_qfidx(qf_info_T *qi, dict_T *what) |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6922 { |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6923 int qf_idx; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6924 dictitem_T *di; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6925 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6926 qf_idx = qi->qf_curlist; // default is the current list |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6927 if ((di = dict_find(what, (char_u *)"nr", -1)) != NULL) |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6928 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6929 // Use the specified quickfix/location list |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6930 if (di->di_tv.v_type == VAR_NUMBER) |
13026
7c0e0e923537
patch 8.0.1389: getqflist() items are missing if not set
Christian Brabandt <cb@256bit.org>
parents:
13016
diff
changeset
|
6931 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6932 // for zero use the current list |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6933 if (di->di_tv.vval.v_number != 0) |
13026
7c0e0e923537
patch 8.0.1389: getqflist() items are missing if not set
Christian Brabandt <cb@256bit.org>
parents:
13016
diff
changeset
|
6934 { |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6935 qf_idx = di->di_tv.vval.v_number - 1; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6936 if (qf_idx < 0 || qf_idx >= qi->qf_listcount) |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
6937 qf_idx = INVALID_QFIDX; |
13026
7c0e0e923537
patch 8.0.1389: getqflist() items are missing if not set
Christian Brabandt <cb@256bit.org>
parents:
13016
diff
changeset
|
6938 } |
7c0e0e923537
patch 8.0.1389: getqflist() items are missing if not set
Christian Brabandt <cb@256bit.org>
parents:
13016
diff
changeset
|
6939 } |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6940 else if (di->di_tv.v_type == VAR_STRING |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6941 && di->di_tv.vval.v_string != NULL |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6942 && STRCMP(di->di_tv.vval.v_string, "$") == 0) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6943 // Get the last quickfix list number |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6944 qf_idx = qi->qf_listcount - 1; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6945 else |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
6946 qf_idx = INVALID_QFIDX; |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6947 } |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6948 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6949 if ((di = dict_find(what, (char_u *)"id", -1)) != NULL) |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6950 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6951 // Look for a list with the specified id |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6952 if (di->di_tv.v_type == VAR_NUMBER) |
13026
7c0e0e923537
patch 8.0.1389: getqflist() items are missing if not set
Christian Brabandt <cb@256bit.org>
parents:
13016
diff
changeset
|
6953 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
6954 // For zero, use the current list or the list specified by 'nr' |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6955 if (di->di_tv.vval.v_number != 0) |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6956 qf_idx = qf_id2nr(qi, di->di_tv.vval.v_number); |
13026
7c0e0e923537
patch 8.0.1389: getqflist() items are missing if not set
Christian Brabandt <cb@256bit.org>
parents:
13016
diff
changeset
|
6957 } |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6958 else |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
6959 qf_idx = INVALID_QFIDX; |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6960 } |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6961 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6962 return qf_idx; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6963 } |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6964 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6965 /* |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6966 * Return default values for quickfix list properties in retdict. |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6967 */ |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6968 static int |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
6969 qf_getprop_defaults(qf_info_T *qi, int flags, int locstack, dict_T *retdict) |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6970 { |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6971 int status = OK; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6972 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6973 if (flags & QF_GETLIST_TITLE) |
14301
3c80092eb211
patch 8.1.0166: using dict_add_nr_str() is clumsy
Christian Brabandt <cb@256bit.org>
parents:
14299
diff
changeset
|
6974 status = dict_add_string(retdict, "title", (char_u *)""); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6975 if ((status == OK) && (flags & QF_GETLIST_ITEMS)) |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6976 { |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6977 list_T *l = list_alloc(); |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6978 if (l != NULL) |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6979 status = dict_add_list(retdict, "items", l); |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6980 else |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6981 status = FAIL; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6982 } |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6983 if ((status == OK) && (flags & QF_GETLIST_NR)) |
14301
3c80092eb211
patch 8.1.0166: using dict_add_nr_str() is clumsy
Christian Brabandt <cb@256bit.org>
parents:
14299
diff
changeset
|
6984 status = dict_add_number(retdict, "nr", 0); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6985 if ((status == OK) && (flags & QF_GETLIST_WINID)) |
14301
3c80092eb211
patch 8.1.0166: using dict_add_nr_str() is clumsy
Christian Brabandt <cb@256bit.org>
parents:
14299
diff
changeset
|
6986 status = dict_add_number(retdict, "winid", qf_winid(qi)); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6987 if ((status == OK) && (flags & QF_GETLIST_CONTEXT)) |
14301
3c80092eb211
patch 8.1.0166: using dict_add_nr_str() is clumsy
Christian Brabandt <cb@256bit.org>
parents:
14299
diff
changeset
|
6988 status = dict_add_string(retdict, "context", (char_u *)""); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6989 if ((status == OK) && (flags & QF_GETLIST_ID)) |
14301
3c80092eb211
patch 8.1.0166: using dict_add_nr_str() is clumsy
Christian Brabandt <cb@256bit.org>
parents:
14299
diff
changeset
|
6990 status = dict_add_number(retdict, "id", 0); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6991 if ((status == OK) && (flags & QF_GETLIST_IDX)) |
14301
3c80092eb211
patch 8.1.0166: using dict_add_nr_str() is clumsy
Christian Brabandt <cb@256bit.org>
parents:
14299
diff
changeset
|
6992 status = dict_add_number(retdict, "idx", 0); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6993 if ((status == OK) && (flags & QF_GETLIST_SIZE)) |
14301
3c80092eb211
patch 8.1.0166: using dict_add_nr_str() is clumsy
Christian Brabandt <cb@256bit.org>
parents:
14299
diff
changeset
|
6994 status = dict_add_number(retdict, "size", 0); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
6995 if ((status == OK) && (flags & QF_GETLIST_TICK)) |
14301
3c80092eb211
patch 8.1.0166: using dict_add_nr_str() is clumsy
Christian Brabandt <cb@256bit.org>
parents:
14299
diff
changeset
|
6996 status = dict_add_number(retdict, "changedtick", 0); |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
6997 if ((status == OK) && locstack && (flags & QF_GETLIST_FILEWINID)) |
14664
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
6998 status = dict_add_number(retdict, "filewinid", 0); |
16019
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
6999 if ((status == OK) && (flags & QF_GETLIST_QFBUFNR)) |
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
7000 status = qf_getprop_qfbufnr(qi, retdict); |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7001 if ((status == OK) && (flags & QF_GETLIST_QFTF)) |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7002 status = dict_add_string(retdict, "quickfixtextfunc", (char_u *)""); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7003 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7004 return status; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7005 } |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7006 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7007 /* |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7008 * Return the quickfix list title as 'title' in retdict |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7009 */ |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7010 static int |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7011 qf_getprop_title(qf_list_T *qfl, dict_T *retdict) |
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7012 { |
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7013 return dict_add_string(retdict, "title", qfl->qf_title); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7014 } |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7015 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7016 /* |
14664
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7017 * Returns the identifier of the window used to display files from a location |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7018 * list. If there is no associated window, then returns 0. Useful only when |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7019 * called from a location list window. |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7020 */ |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7021 static int |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7022 qf_getprop_filewinid(win_T *wp, qf_info_T *qi, dict_T *retdict) |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7023 { |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7024 int winid = 0; |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7025 |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7026 if (wp != NULL && IS_LL_WINDOW(wp)) |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7027 { |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7028 win_T *ll_wp = qf_find_win_with_loclist(qi); |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7029 if (ll_wp != NULL) |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7030 winid = ll_wp->w_id; |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7031 } |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7032 |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7033 return dict_add_number(retdict, "filewinid", winid); |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7034 } |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7035 |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7036 /* |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7037 * Return the quickfix list items/entries as 'items' in retdict. |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7038 * If eidx is not 0, then return the item at the specified index. |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7039 */ |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7040 static int |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7041 qf_getprop_items(qf_info_T *qi, int qf_idx, int eidx, dict_T *retdict) |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7042 { |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7043 int status = OK; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7044 list_T *l = list_alloc(); |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7045 if (l != NULL) |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7046 { |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7047 (void)get_errorlist(qi, NULL, qf_idx, eidx, l); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7048 dict_add_list(retdict, "items", l); |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7049 } |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7050 else |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7051 status = FAIL; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7052 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7053 return status; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7054 } |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7055 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7056 /* |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7057 * Return the quickfix list context (if any) as 'context' in retdict. |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7058 */ |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7059 static int |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7060 qf_getprop_ctx(qf_list_T *qfl, dict_T *retdict) |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7061 { |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7062 int status; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7063 dictitem_T *di; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7064 |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7065 if (qfl->qf_ctx != NULL) |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7066 { |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7067 di = dictitem_alloc((char_u *)"context"); |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7068 if (di != NULL) |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7069 { |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7070 copy_tv(qfl->qf_ctx, &di->di_tv); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7071 status = dict_add(retdict, di); |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7072 if (status == FAIL) |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7073 dictitem_free(di); |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7074 } |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7075 else |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7076 status = FAIL; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7077 } |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7078 else |
14301
3c80092eb211
patch 8.1.0166: using dict_add_nr_str() is clumsy
Christian Brabandt <cb@256bit.org>
parents:
14299
diff
changeset
|
7079 status = dict_add_string(retdict, "context", (char_u *)""); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7080 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7081 return status; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7082 } |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7083 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7084 /* |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7085 * Return the current quickfix list index as 'idx' in retdict. |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7086 * If a specific entry index (eidx) is supplied, then use that. |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7087 */ |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7088 static int |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7089 qf_getprop_idx(qf_list_T *qfl, int eidx, dict_T *retdict) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7090 { |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7091 if (eidx == 0) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7092 { |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7093 eidx = qfl->qf_index; |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7094 if (qf_list_empty(qfl)) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7095 // For empty lists, current index is set to 0 |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7096 eidx = 0; |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7097 } |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7098 return dict_add_number(retdict, "idx", eidx); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7099 } |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7100 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7101 /* |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7102 * Return the 'quickfixtextfunc' function of a quickfix/location list |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7103 */ |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7104 static int |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7105 qf_getprop_qftf(qf_list_T *qfl, dict_T *retdict) |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7106 { |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7107 int status; |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7108 |
28451
e015d650ea9f
patch 8.2.4750: small pieces of dead code
Bram Moolenaar <Bram@vim.org>
parents:
28315
diff
changeset
|
7109 if (qfl->qf_qftf_cb.cb_name != NULL) |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7110 { |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7111 typval_T tv; |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7112 |
28451
e015d650ea9f
patch 8.2.4750: small pieces of dead code
Bram Moolenaar <Bram@vim.org>
parents:
28315
diff
changeset
|
7113 put_callback(&qfl->qf_qftf_cb, &tv); |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7114 status = dict_add_tv(retdict, "quickfixtextfunc", &tv); |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7115 clear_tv(&tv); |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7116 } |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7117 else |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7118 status = dict_add_string(retdict, "quickfixtextfunc", (char_u *)""); |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7119 |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7120 return status; |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7121 } |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7122 |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7123 /* |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7124 * Return quickfix/location list details (title) as a |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7125 * dictionary. 'what' contains the details to return. If 'list_idx' is -1, |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7126 * then current list is used. Otherwise the specified list is used. |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7127 */ |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
7128 static int |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7129 qf_get_properties(win_T *wp, dict_T *what, dict_T *retdict) |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7130 { |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7131 qf_info_T *qi = &ql_info; |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7132 qf_list_T *qfl; |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7133 int status = OK; |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7134 int qf_idx = INVALID_QFIDX; |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7135 int eidx = 0; |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7136 dictitem_T *di; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7137 int flags = QF_GETLIST_NONE; |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7138 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7139 if ((di = dict_find(what, (char_u *)"lines", -1)) != NULL) |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7140 return qf_get_list_from_lines(what, di, retdict); |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7141 |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7142 if (wp != NULL) |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7143 qi = GET_LOC_LIST(wp); |
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7144 |
14664
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7145 flags = qf_getprop_keys2flags(what, (wp != NULL)); |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7146 |
14887
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
7147 if (!qf_stack_empty(qi)) |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7148 qf_idx = qf_getprop_qfidx(qi, what); |
13026
7c0e0e923537
patch 8.0.1389: getqflist() items are missing if not set
Christian Brabandt <cb@256bit.org>
parents:
13016
diff
changeset
|
7149 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7150 // List is not present or is empty |
14887
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
7151 if (qf_stack_empty(qi) || qf_idx == INVALID_QFIDX) |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
7152 return qf_getprop_defaults(qi, flags, wp != NULL, retdict); |
13026
7c0e0e923537
patch 8.0.1389: getqflist() items are missing if not set
Christian Brabandt <cb@256bit.org>
parents:
13016
diff
changeset
|
7153 |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
7154 qfl = qf_get_list(qi, qf_idx); |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7155 |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7156 // If an entry index is specified, use that |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7157 if ((di = dict_find(what, (char_u *)"idx", -1)) != NULL) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7158 { |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7159 if (di->di_tv.v_type != VAR_NUMBER) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7160 return FAIL; |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7161 eidx = di->di_tv.vval.v_number; |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7162 } |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7163 |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7164 if (flags & QF_GETLIST_TITLE) |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7165 status = qf_getprop_title(qfl, retdict); |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7166 if ((status == OK) && (flags & QF_GETLIST_NR)) |
14301
3c80092eb211
patch 8.1.0166: using dict_add_nr_str() is clumsy
Christian Brabandt <cb@256bit.org>
parents:
14299
diff
changeset
|
7167 status = dict_add_number(retdict, "nr", qf_idx + 1); |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7168 if ((status == OK) && (flags & QF_GETLIST_WINID)) |
14301
3c80092eb211
patch 8.1.0166: using dict_add_nr_str() is clumsy
Christian Brabandt <cb@256bit.org>
parents:
14299
diff
changeset
|
7169 status = dict_add_number(retdict, "winid", qf_winid(qi)); |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
7170 if ((status == OK) && (flags & QF_GETLIST_ITEMS)) |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7171 status = qf_getprop_items(qi, qf_idx, eidx, retdict); |
11412
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7172 if ((status == OK) && (flags & QF_GETLIST_CONTEXT)) |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7173 status = qf_getprop_ctx(qfl, retdict); |
12287
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
7174 if ((status == OK) && (flags & QF_GETLIST_ID)) |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7175 status = dict_add_number(retdict, "id", qfl->qf_id); |
12465
805f7fd40e0d
patch 8.0.1112: can't get size or current index from quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12449
diff
changeset
|
7176 if ((status == OK) && (flags & QF_GETLIST_IDX)) |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7177 status = qf_getprop_idx(qfl, eidx, retdict); |
12465
805f7fd40e0d
patch 8.0.1112: can't get size or current index from quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12449
diff
changeset
|
7178 if ((status == OK) && (flags & QF_GETLIST_SIZE)) |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7179 status = dict_add_number(retdict, "size", qfl->qf_count); |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
7180 if ((status == OK) && (flags & QF_GETLIST_TICK)) |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7181 status = dict_add_number(retdict, "changedtick", qfl->qf_changedtick); |
14664
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7182 if ((status == OK) && (wp != NULL) && (flags & QF_GETLIST_FILEWINID)) |
8770189c3e22
patch 8.1.0345: cannot get the window id associated with the location list
Christian Brabandt <cb@256bit.org>
parents:
14633
diff
changeset
|
7183 status = qf_getprop_filewinid(wp, qi, retdict); |
16019
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
7184 if ((status == OK) && (flags & QF_GETLIST_QFBUFNR)) |
096b8ccd855e
patch 8.1.1015: quickfix buffer shows up in list, can't get buffer number
Bram Moolenaar <Bram@vim.org>
parents:
16001
diff
changeset
|
7185 status = qf_getprop_qfbufnr(qi, retdict); |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7186 if ((status == OK) && (flags & QF_GETLIST_QFTF)) |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7187 status = qf_getprop_qftf(qfl, retdict); |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
7188 |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7189 return status; |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7190 } |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7191 |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7192 /* |
14633
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7193 * Add a new quickfix entry to list at 'qf_idx' in the stack 'qi' from the |
15225
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7194 * items in the dict 'd'. If it is a valid error entry, then set 'valid_entry' |
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7195 * to TRUE. |
14633
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7196 */ |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7197 static int |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7198 qf_add_entry_from_dict( |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
7199 qf_list_T *qfl, |
14633
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7200 dict_T *d, |
15225
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7201 int first_entry, |
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7202 int *valid_entry) |
14633
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7203 { |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7204 static int did_bufnr_emsg; |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7205 char_u *filename, *module, *pattern, *text, *type; |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
7206 int bufnum, valid, status, col, end_col, vcol, nr; |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
7207 long lnum, end_lnum; |
14633
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7208 |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7209 if (first_entry) |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7210 did_bufnr_emsg = FALSE; |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7211 |
15146
7903dce131d4
patch 8.1.0583: using illogical name for get_dict_number()/get_dict_string()
Bram Moolenaar <Bram@vim.org>
parents:
15042
diff
changeset
|
7212 filename = dict_get_string(d, (char_u *)"filename", TRUE); |
7903dce131d4
patch 8.1.0583: using illogical name for get_dict_number()/get_dict_string()
Bram Moolenaar <Bram@vim.org>
parents:
15042
diff
changeset
|
7213 module = dict_get_string(d, (char_u *)"module", TRUE); |
7903dce131d4
patch 8.1.0583: using illogical name for get_dict_number()/get_dict_string()
Bram Moolenaar <Bram@vim.org>
parents:
15042
diff
changeset
|
7214 bufnum = (int)dict_get_number(d, (char_u *)"bufnr"); |
7903dce131d4
patch 8.1.0583: using illogical name for get_dict_number()/get_dict_string()
Bram Moolenaar <Bram@vim.org>
parents:
15042
diff
changeset
|
7215 lnum = (int)dict_get_number(d, (char_u *)"lnum"); |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
7216 end_lnum = (int)dict_get_number(d, (char_u *)"end_lnum"); |
15146
7903dce131d4
patch 8.1.0583: using illogical name for get_dict_number()/get_dict_string()
Bram Moolenaar <Bram@vim.org>
parents:
15042
diff
changeset
|
7217 col = (int)dict_get_number(d, (char_u *)"col"); |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
7218 end_col = (int)dict_get_number(d, (char_u *)"end_col"); |
15146
7903dce131d4
patch 8.1.0583: using illogical name for get_dict_number()/get_dict_string()
Bram Moolenaar <Bram@vim.org>
parents:
15042
diff
changeset
|
7219 vcol = (int)dict_get_number(d, (char_u *)"vcol"); |
7903dce131d4
patch 8.1.0583: using illogical name for get_dict_number()/get_dict_string()
Bram Moolenaar <Bram@vim.org>
parents:
15042
diff
changeset
|
7220 nr = (int)dict_get_number(d, (char_u *)"nr"); |
7903dce131d4
patch 8.1.0583: using illogical name for get_dict_number()/get_dict_string()
Bram Moolenaar <Bram@vim.org>
parents:
15042
diff
changeset
|
7221 type = dict_get_string(d, (char_u *)"type", TRUE); |
7903dce131d4
patch 8.1.0583: using illogical name for get_dict_number()/get_dict_string()
Bram Moolenaar <Bram@vim.org>
parents:
15042
diff
changeset
|
7222 pattern = dict_get_string(d, (char_u *)"pattern", TRUE); |
7903dce131d4
patch 8.1.0583: using illogical name for get_dict_number()/get_dict_string()
Bram Moolenaar <Bram@vim.org>
parents:
15042
diff
changeset
|
7223 text = dict_get_string(d, (char_u *)"text", TRUE); |
14633
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7224 if (text == NULL) |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7225 text = vim_strsave((char_u *)""); |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7226 |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7227 valid = TRUE; |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7228 if ((filename == NULL && bufnum == 0) || (lnum == 0 && pattern == NULL)) |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7229 valid = FALSE; |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7230 |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7231 // Mark entries with non-existing buffer number as not valid. Give the |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7232 // error message only once. |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7233 if (bufnum != 0 && (buflist_findnr(bufnum) == NULL)) |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7234 { |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7235 if (!did_bufnr_emsg) |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7236 { |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7237 did_bufnr_emsg = TRUE; |
26602
fac6673086df
patch 8.2.3830: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26518
diff
changeset
|
7238 semsg(_(e_buffer_nr_not_found), bufnum); |
14633
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7239 } |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7240 valid = FALSE; |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7241 bufnum = 0; |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7242 } |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7243 |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7244 // If the 'valid' field is present it overrules the detected value. |
28315
62cc3b60493b
patch 8.2.4683: verbose check with dict_find() to see if a key is present
Bram Moolenaar <Bram@vim.org>
parents:
28247
diff
changeset
|
7245 if (dict_has_key(d, "valid")) |
22137
faaf88167b58
patch 8.2.1618: Vim9: cannot pass "true" to setloclist()
Bram Moolenaar <Bram@vim.org>
parents:
22099
diff
changeset
|
7246 valid = (int)dict_get_bool(d, (char_u *)"valid", FALSE); |
14633
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7247 |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
7248 status = qf_add_entry(qfl, |
14633
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7249 NULL, // dir |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7250 filename, |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7251 module, |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7252 bufnum, |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7253 text, |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7254 lnum, |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
7255 end_lnum, |
14633
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7256 col, |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
7257 end_col, |
14633
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7258 vcol, // vis_col |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7259 pattern, // search pattern |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7260 nr, |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7261 type == NULL ? NUL : *type, |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7262 valid); |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7263 |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7264 vim_free(filename); |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7265 vim_free(module); |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7266 vim_free(pattern); |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7267 vim_free(text); |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7268 vim_free(type); |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7269 |
15225
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7270 if (valid) |
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7271 *valid_entry = TRUE; |
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7272 |
14633
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7273 return status; |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7274 } |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7275 |
462087b5c415
patch 8.1.0330: the qf_add_entries() function is too long
Christian Brabandt <cb@256bit.org>
parents:
14603
diff
changeset
|
7276 /* |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7277 * Add list of entries to quickfix/location list. Each list entry is |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7278 * a dictionary with item information. |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7279 */ |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7280 static int |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7281 qf_add_entries( |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7282 qf_info_T *qi, |
11449
d2f00eb352b9
patch 8.0.0608: cannot manipulate other than the current quickfix list
Christian Brabandt <cb@256bit.org>
parents:
11447
diff
changeset
|
7283 int qf_idx, |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7284 list_T *list, |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7285 char_u *title, |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7286 int action) |
230 | 7287 { |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
7288 qf_list_T *qfl = qf_get_list(qi, qf_idx); |
230 | 7289 listitem_T *li; |
7290 dict_T *d; | |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
7291 qfline_T *old_last = NULL; |
230 | 7292 int retval = OK; |
15225
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7293 int valid_entry = FALSE; |
644 | 7294 |
11449
d2f00eb352b9
patch 8.0.0608: cannot manipulate other than the current quickfix list
Christian Brabandt <cb@256bit.org>
parents:
11447
diff
changeset
|
7295 if (action == ' ' || qf_idx == qi->qf_listcount) |
d2f00eb352b9
patch 8.0.0608: cannot manipulate other than the current quickfix list
Christian Brabandt <cb@256bit.org>
parents:
11447
diff
changeset
|
7296 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7297 // make place for a new list |
3965 | 7298 qf_new_list(qi, title); |
11449
d2f00eb352b9
patch 8.0.0608: cannot manipulate other than the current quickfix list
Christian Brabandt <cb@256bit.org>
parents:
11447
diff
changeset
|
7299 qf_idx = qi->qf_curlist; |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
7300 qfl = qf_get_list(qi, qf_idx); |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
7301 } |
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
7302 else if (action == 'a' && !qf_list_empty(qfl)) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7303 // Adding to existing list, use last entry. |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7304 old_last = qfl->qf_last; |
277 | 7305 else if (action == 'r') |
6079 | 7306 { |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7307 qf_free_items(qfl); |
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7308 qf_store_title(qfl, title); |
6079 | 7309 } |
230 | 7310 |
19888
435726a03481
patch 8.2.0500: using the same loop in many places
Bram Moolenaar <Bram@vim.org>
parents:
19649
diff
changeset
|
7311 FOR_ALL_LIST_ITEMS(list, li) |
230 | 7312 { |
7313 if (li->li_tv.v_type != VAR_DICT) | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7314 continue; // Skip non-dict items |
230 | 7315 |
7316 d = li->li_tv.vval.v_dict; | |
7317 if (d == NULL) | |
7318 continue; | |
7319 | |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
7320 retval = qf_add_entry_from_dict(qfl, d, li == list->lv_first, |
15225
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7321 &valid_entry); |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
7322 if (retval == QF_FAIL) |
230 | 7323 break; |
7324 } | |
7325 | |
15225
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7326 // Check if any valid error entries are added to the list. |
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7327 if (valid_entry) |
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7328 qfl->qf_nonevalid = FALSE; |
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7329 else if (qfl->qf_index == 0) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7330 // no valid entry |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7331 qfl->qf_nonevalid = TRUE; |
15225
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7332 |
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7333 // If not appending to the list, set the current error to the first entry |
11263
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7334 if (action != 'a') |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7335 qfl->qf_ptr = qfl->qf_start; |
15225
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7336 |
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7337 // Update the current error index if not appending to the list or if the |
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7338 // list was empty before and it is not empty now. |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
7339 if ((action != 'a' || qfl->qf_index == 0) && !qf_list_empty(qfl)) |
15225
a413374825dd
patch 8.1.0622: adding quickfix items marks items as valid errors
Bram Moolenaar <Bram@vim.org>
parents:
15146
diff
changeset
|
7340 qfl->qf_index = 1; |
230 | 7341 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7342 // Don't update the cursor in quickfix window when appending entries |
9175
d415c079f84e
commit https://github.com/vim/vim/commit/864293abb72d62604d8d6b458addfb43c14230c3
Christian Brabandt <cb@256bit.org>
parents:
9114
diff
changeset
|
7343 qf_update_buffer(qi, old_last); |
230 | 7344 |
7345 return retval; | |
7346 } | |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7347 |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7348 /* |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7349 * Get the quickfix list index from 'nr' or 'id' |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7350 */ |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7351 static int |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7352 qf_setprop_get_qfidx( |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7353 qf_info_T *qi, |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7354 dict_T *what, |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7355 int action, |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7356 int *newlist) |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7357 { |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7358 dictitem_T *di; |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7359 int qf_idx = qi->qf_curlist; // default is the current list |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7360 |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7361 if ((di = dict_find(what, (char_u *)"nr", -1)) != NULL) |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7362 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7363 // Use the specified quickfix/location list |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7364 if (di->di_tv.v_type == VAR_NUMBER) |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7365 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7366 // for zero use the current list |
11445
461ac47c3793
patch 8.0.0606: cannot set the context for a specified quickfix list
Christian Brabandt <cb@256bit.org>
parents:
11443
diff
changeset
|
7367 if (di->di_tv.vval.v_number != 0) |
461ac47c3793
patch 8.0.0606: cannot set the context for a specified quickfix list
Christian Brabandt <cb@256bit.org>
parents:
11443
diff
changeset
|
7368 qf_idx = di->di_tv.vval.v_number - 1; |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
7369 |
12084
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
7370 if ((action == ' ' || action == 'a') && qf_idx == qi->qf_listcount) |
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
7371 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7372 // When creating a new list, accept qf_idx pointing to the next |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7373 // non-available list and add the new list at the end of the |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7374 // stack. |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7375 *newlist = TRUE; |
14887
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
7376 qf_idx = qf_stack_empty(qi) ? 0 : qi->qf_listcount - 1; |
12084
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
7377 } |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
7378 else if (qf_idx < 0 || qf_idx >= qi->qf_listcount) |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7379 return INVALID_QFIDX; |
12084
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
7380 else if (action != ' ') |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7381 *newlist = FALSE; // use the specified list |
12084
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
7382 } |
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
7383 else if (di->di_tv.v_type == VAR_STRING |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7384 && di->di_tv.vval.v_string != NULL |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7385 && STRCMP(di->di_tv.vval.v_string, "$") == 0) |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
7386 { |
14887
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
7387 if (!qf_stack_empty(qi)) |
12084
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
7388 qf_idx = qi->qf_listcount - 1; |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7389 else if (*newlist) |
12084
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
7390 qf_idx = 0; |
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
7391 else |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7392 return INVALID_QFIDX; |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
7393 } |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7394 else |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7395 return INVALID_QFIDX; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7396 } |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7397 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7398 if (!*newlist && (di = dict_find(what, (char_u *)"id", -1)) != NULL) |
12287
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
7399 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7400 // Use the quickfix/location list with the specified id |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7401 if (di->di_tv.v_type != VAR_NUMBER) |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7402 return INVALID_QFIDX; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7403 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7404 return qf_id2nr(qi, di->di_tv.vval.v_number); |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7405 } |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7406 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7407 return qf_idx; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7408 } |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7409 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7410 /* |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7411 * Set the quickfix list title. |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7412 */ |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7413 static int |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7414 qf_setprop_title(qf_info_T *qi, int qf_idx, dict_T *what, dictitem_T *di) |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7415 { |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
7416 qf_list_T *qfl = qf_get_list(qi, qf_idx); |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7417 |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7418 if (di->di_tv.v_type != VAR_STRING) |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7419 return FAIL; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7420 |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7421 vim_free(qfl->qf_title); |
15146
7903dce131d4
patch 8.1.0583: using illogical name for get_dict_number()/get_dict_string()
Bram Moolenaar <Bram@vim.org>
parents:
15042
diff
changeset
|
7422 qfl->qf_title = dict_get_string(what, (char_u *)"title", TRUE); |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7423 if (qf_idx == qi->qf_curlist) |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7424 qf_update_win_titlevar(qi); |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7425 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7426 return OK; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7427 } |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7428 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7429 /* |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7430 * Set quickfix list items/entries. |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7431 */ |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7432 static int |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7433 qf_setprop_items(qf_info_T *qi, int qf_idx, dictitem_T *di, int action) |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7434 { |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7435 int retval = FAIL; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7436 char_u *title_save; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7437 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7438 if (di->di_tv.v_type != VAR_LIST) |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7439 return FAIL; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7440 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7441 title_save = vim_strsave(qi->qf_lists[qf_idx].qf_title); |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7442 retval = qf_add_entries(qi, qf_idx, di->di_tv.vval.v_list, |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7443 title_save, action == ' ' ? 'a' : action); |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7444 vim_free(title_save); |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7445 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7446 return retval; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7447 } |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7448 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7449 /* |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7450 * Set quickfix list items/entries from a list of lines. |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7451 */ |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7452 static int |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7453 qf_setprop_items_from_lines( |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7454 qf_info_T *qi, |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7455 int qf_idx, |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7456 dict_T *what, |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7457 dictitem_T *di, |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7458 int action) |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7459 { |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7460 char_u *errorformat = p_efm; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7461 dictitem_T *efm_di; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7462 int retval = FAIL; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7463 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7464 // Use the user supplied errorformat settings (if present) |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7465 if ((efm_di = dict_find(what, (char_u *)"efm", -1)) != NULL) |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7466 { |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7467 if (efm_di->di_tv.v_type != VAR_STRING || |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7468 efm_di->di_tv.vval.v_string == NULL) |
12287
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
7469 return FAIL; |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7470 errorformat = efm_di->di_tv.vval.v_string; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7471 } |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7472 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7473 // Only a List value is supported |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7474 if (di->di_tv.v_type != VAR_LIST || di->di_tv.vval.v_list == NULL) |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7475 return FAIL; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7476 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7477 if (action == 'r') |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7478 qf_free_items(&qi->qf_lists[qf_idx]); |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7479 if (qf_init_ext(qi, qf_idx, NULL, NULL, &di->di_tv, errorformat, |
23045
450d6e4992e1
patch 8.2.2069: the quickfix window is not updated after setqflist()
Bram Moolenaar <Bram@vim.org>
parents:
22979
diff
changeset
|
7480 FALSE, (linenr_T)0, (linenr_T)0, NULL, NULL) >= 0) |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7481 retval = OK; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7482 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7483 return retval; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7484 } |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7485 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7486 /* |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7487 * Set quickfix list context. |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7488 */ |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7489 static int |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7490 qf_setprop_context(qf_list_T *qfl, dictitem_T *di) |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7491 { |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7492 typval_T *ctx; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7493 |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7494 free_tv(qfl->qf_ctx); |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7495 ctx = alloc_tv(); |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7496 if (ctx != NULL) |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7497 copy_tv(&di->di_tv, ctx); |
14790
3ca7aba1116e
patch 8.1.0407: quickfix code mixes using the stack and a list pointer
Christian Brabandt <cb@256bit.org>
parents:
14664
diff
changeset
|
7498 qfl->qf_ctx = ctx; |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7499 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7500 return OK; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7501 } |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7502 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7503 /* |
15424
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7504 * Set the current index in the specified quickfix list |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7505 */ |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7506 static int |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7507 qf_setprop_curidx(qf_info_T *qi, qf_list_T *qfl, dictitem_T *di) |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7508 { |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7509 int denote = FALSE; |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7510 int newidx; |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7511 int old_qfidx; |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7512 qfline_T *qf_ptr; |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7513 |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7514 // If the specified index is '$', then use the last entry |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7515 if (di->di_tv.v_type == VAR_STRING |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7516 && di->di_tv.vval.v_string != NULL |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7517 && STRCMP(di->di_tv.vval.v_string, "$") == 0) |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7518 newidx = qfl->qf_count; |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7519 else |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7520 { |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7521 // Otherwise use the specified index |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7522 newidx = tv_get_number_chk(&di->di_tv, &denote); |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7523 if (denote) |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7524 return FAIL; |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7525 } |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7526 |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7527 if (newidx < 1) // sanity check |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7528 return FAIL; |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7529 if (newidx > qfl->qf_count) |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7530 newidx = qfl->qf_count; |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7531 |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7532 old_qfidx = qfl->qf_index; |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7533 qf_ptr = get_nth_entry(qfl, newidx, &newidx); |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7534 if (qf_ptr == NULL) |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7535 return FAIL; |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7536 qfl->qf_ptr = qf_ptr; |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7537 qfl->qf_index = newidx; |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7538 |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7539 // If the current list is modified and it is displayed in the quickfix |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7540 // window, then Update it. |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
7541 if (qf_get_curlist(qi)->qf_id == qfl->qf_id) |
15424
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7542 qf_win_pos_update(qi, old_qfidx); |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7543 |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7544 return OK; |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7545 } |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7546 |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7547 /* |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7548 * Set the current index in the specified quickfix list |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7549 */ |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7550 static int |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7551 qf_setprop_qftf(qf_info_T *qi UNUSED, qf_list_T *qfl, dictitem_T *di) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7552 { |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7553 callback_T cb; |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7554 |
28451
e015d650ea9f
patch 8.2.4750: small pieces of dead code
Bram Moolenaar <Bram@vim.org>
parents:
28315
diff
changeset
|
7555 free_callback(&qfl->qf_qftf_cb); |
21409
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7556 cb = get_callback(&di->di_tv); |
2c40e60017a8
patch 8.2.1255: cannot use a lambda with quickfix functions
Bram Moolenaar <Bram@vim.org>
parents:
21102
diff
changeset
|
7557 if (cb.cb_name != NULL && *cb.cb_name != NUL) |
28451
e015d650ea9f
patch 8.2.4750: small pieces of dead code
Bram Moolenaar <Bram@vim.org>
parents:
28315
diff
changeset
|
7558 set_callback(&qfl->qf_qftf_cb, &cb); |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7559 |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7560 return OK; |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7561 } |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7562 |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7563 /* |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7564 * Set quickfix/location list properties (title, items, context). |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7565 * Also used to add items from parsing a list of lines. |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
7566 * Used by the setqflist() and setloclist() Vim script functions. |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7567 */ |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7568 static int |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7569 qf_set_properties(qf_info_T *qi, dict_T *what, int action, char_u *title) |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7570 { |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7571 dictitem_T *di; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7572 int retval = FAIL; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7573 int qf_idx; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7574 int newlist = FALSE; |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7575 qf_list_T *qfl; |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7576 |
14887
863bdbc8465b
patch 8.1.0455: checking for empty quickfix stack is not consistent
Bram Moolenaar <Bram@vim.org>
parents:
14852
diff
changeset
|
7577 if (action == ' ' || qf_stack_empty(qi)) |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7578 newlist = TRUE; |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7579 |
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7580 qf_idx = qf_setprop_get_qfidx(qi, what, action, &newlist); |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7581 if (qf_idx == INVALID_QFIDX) // List not found |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7582 return FAIL; |
12287
20641a7e1fc9
patch 8.0.1023: it is not easy to identify a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
12252
diff
changeset
|
7583 |
9982
e24aa20d815c
commit https://github.com/vim/vim/commit/2b529bb6260b52246e92429375d995b9b5ce76b6
Christian Brabandt <cb@256bit.org>
parents:
9931
diff
changeset
|
7584 if (newlist) |
e24aa20d815c
commit https://github.com/vim/vim/commit/2b529bb6260b52246e92429375d995b9b5ce76b6
Christian Brabandt <cb@256bit.org>
parents:
9931
diff
changeset
|
7585 { |
12084
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
7586 qi->qf_curlist = qf_idx; |
12048
ebd313aa5a6c
patch 8.0.0904: cannot set a location list from text
Christian Brabandt <cb@256bit.org>
parents:
11800
diff
changeset
|
7587 qf_new_list(qi, title); |
9982
e24aa20d815c
commit https://github.com/vim/vim/commit/2b529bb6260b52246e92429375d995b9b5ce76b6
Christian Brabandt <cb@256bit.org>
parents:
9931
diff
changeset
|
7588 qf_idx = qi->qf_curlist; |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7589 } |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7590 |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
7591 qfl = qf_get_list(qi, qf_idx); |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7592 if ((di = dict_find(what, (char_u *)"title", -1)) != NULL) |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7593 retval = qf_setprop_title(qi, qf_idx, what, di); |
11549
f5add45f9848
patch 8.0.0657: cannot get and set quickfix list items
Christian Brabandt <cb@256bit.org>
parents:
11521
diff
changeset
|
7594 if ((di = dict_find(what, (char_u *)"items", -1)) != NULL) |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7595 retval = qf_setprop_items(qi, qf_idx, di, action); |
12303
ec7a4fd21dd5
patch 8.0.1031: "text" argument for getqflist() is confusing
Christian Brabandt <cb@256bit.org>
parents:
12299
diff
changeset
|
7596 if ((di = dict_find(what, (char_u *)"lines", -1)) != NULL) |
13760
aef8ba129a4f
patch 8.0.1752: qf_set_properties() is to long
Christian Brabandt <cb@256bit.org>
parents:
13756
diff
changeset
|
7597 retval = qf_setprop_items_from_lines(qi, qf_idx, what, di, action); |
11412
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7598 if ((di = dict_find(what, (char_u *)"context", -1)) != NULL) |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7599 retval = qf_setprop_context(qfl, di); |
15424
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7600 if ((di = dict_find(what, (char_u *)"idx", -1)) != NULL) |
90c8ff9c19ee
patch 8.1.0720: cannot easily change the current quickfx list index
Bram Moolenaar <Bram@vim.org>
parents:
15225
diff
changeset
|
7601 retval = qf_setprop_curidx(qi, qfl, di); |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7602 if ((di = dict_find(what, (char_u *)"quickfixtextfunc", -1)) != NULL) |
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
7603 retval = qf_setprop_qftf(qi, qfl, di); |
11412
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7604 |
23045
450d6e4992e1
patch 8.2.2069: the quickfix window is not updated after setqflist()
Bram Moolenaar <Bram@vim.org>
parents:
22979
diff
changeset
|
7605 if (newlist || retval == OK) |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
7606 qf_list_changed(qfl); |
23045
450d6e4992e1
patch 8.2.2069: the quickfix window is not updated after setqflist()
Bram Moolenaar <Bram@vim.org>
parents:
22979
diff
changeset
|
7607 if (newlist) |
450d6e4992e1
patch 8.2.2069: the quickfix window is not updated after setqflist()
Bram Moolenaar <Bram@vim.org>
parents:
22979
diff
changeset
|
7608 qf_update_buffer(qi, NULL); |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
7609 |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7610 return retval; |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7611 } |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7612 |
11301
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7613 /* |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7614 * Free the entire quickfix/location list stack. |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7615 * If the quickfix/location list window is open, then clear it. |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7616 */ |
11263
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7617 static void |
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7618 qf_free_stack(win_T *wp, qf_info_T *qi) |
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7619 { |
11301
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7620 win_T *qfwin = qf_find_win(qi); |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7621 win_T *llwin = NULL; |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7622 |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7623 if (qfwin != NULL) |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7624 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7625 // If the quickfix/location list window is open, then clear it |
11301
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7626 if (qi->qf_curlist < qi->qf_listcount) |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
7627 qf_free(qf_get_curlist(qi)); |
11301
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7628 qf_update_buffer(qi, NULL); |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7629 } |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7630 |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7631 if (wp != NULL && IS_LL_WINDOW(wp)) |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7632 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7633 // If in the location list window, then use the non-location list |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7634 // window with this location list (if present) |
15740
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
7635 llwin = qf_find_win_with_loclist(qi); |
11301
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7636 if (llwin != NULL) |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7637 wp = llwin; |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7638 } |
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7639 |
11263
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7640 qf_free_all(wp); |
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7641 if (wp == NULL) |
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7642 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7643 // quickfix list |
11263
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7644 qi->qf_curlist = 0; |
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7645 qi->qf_listcount = 0; |
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7646 } |
15740
2fe4a503c5ad
patch 8.1.0877: new buffer used every time the quickfix window is opened
Bram Moolenaar <Bram@vim.org>
parents:
15703
diff
changeset
|
7647 else if (qfwin != NULL) |
11301
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7648 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7649 // If the location list window is open, then create a new empty |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7650 // location list |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
7651 qf_info_T *new_ll = qf_alloc_stack(QFLT_LOCATION); |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
7652 |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
7653 if (new_ll != NULL) |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
7654 { |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
7655 new_ll->qf_bufnr = qfwin->w_buffer->b_fnum; |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
7656 |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
7657 // first free the list reference in the location list window |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
7658 ll_free_all(&qfwin->w_llist_ref); |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
7659 |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
7660 qfwin->w_llist_ref = new_ll; |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
7661 if (wp != qfwin) |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
7662 win_set_loclist(wp, new_ll); |
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
7663 } |
11301
cc8ece2aa389
patch 8.0.0536: quickfix window not updated when freeing quickfix stack
Christian Brabandt <cb@256bit.org>
parents:
11263
diff
changeset
|
7664 } |
11263
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7665 } |
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7666 |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7667 /* |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7668 * Populate the quickfix list with the items supplied in the list |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7669 * of dictionaries. "title" will be copied to w:quickfix_title. |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7670 * "action" is 'a' for add, 'r' for replace. Otherwise create a new list. |
21102
ebacf460b1b3
patch 8.2.1102: Coverity gets confused by an unnecessary NULL check
Bram Moolenaar <Bram@vim.org>
parents:
21100
diff
changeset
|
7671 * When "what" is not NULL then only set some properties. |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7672 */ |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7673 int |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7674 set_errorlist( |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7675 win_T *wp, |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7676 list_T *list, |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7677 int action, |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7678 char_u *title, |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7679 dict_T *what) |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7680 { |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7681 qf_info_T *qi = &ql_info; |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7682 int retval = OK; |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7683 |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7684 if (wp != NULL) |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7685 { |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7686 qi = ll_get_or_alloc_list(wp); |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7687 if (qi == NULL) |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7688 return FAIL; |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7689 } |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7690 |
11263
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7691 if (action == 'f') |
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7692 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7693 // Free the entire quickfix or location list stack |
11263
ae5f9f26f81c
patch 8.0.0517: there is no way to remove quickfix lists
Christian Brabandt <cb@256bit.org>
parents:
11195
diff
changeset
|
7694 qf_free_stack(wp, qi); |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
7695 return OK; |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
7696 } |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
7697 |
21100
acfda84f5661
patch 8.2.1101: no error when using wrong arguments for setqflist()
Bram Moolenaar <Bram@vim.org>
parents:
20996
diff
changeset
|
7698 // A dict argument cannot be specified with a non-empty list argument |
21102
ebacf460b1b3
patch 8.2.1102: Coverity gets confused by an unnecessary NULL check
Bram Moolenaar <Bram@vim.org>
parents:
21100
diff
changeset
|
7699 if (list->lv_len != 0 && what != NULL) |
21100
acfda84f5661
patch 8.2.1101: no error when using wrong arguments for setqflist()
Bram Moolenaar <Bram@vim.org>
parents:
20996
diff
changeset
|
7700 { |
26865
bce848ec8b1b
patch 8.2.3961: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26771
diff
changeset
|
7701 semsg(_(e_invalid_argument_str), |
21100
acfda84f5661
patch 8.2.1101: no error when using wrong arguments for setqflist()
Bram Moolenaar <Bram@vim.org>
parents:
20996
diff
changeset
|
7702 _("cannot have both a list and a \"what\" argument")); |
acfda84f5661
patch 8.2.1101: no error when using wrong arguments for setqflist()
Bram Moolenaar <Bram@vim.org>
parents:
20996
diff
changeset
|
7703 return FAIL; |
acfda84f5661
patch 8.2.1101: no error when using wrong arguments for setqflist()
Bram Moolenaar <Bram@vim.org>
parents:
20996
diff
changeset
|
7704 } |
acfda84f5661
patch 8.2.1101: no error when using wrong arguments for setqflist()
Bram Moolenaar <Bram@vim.org>
parents:
20996
diff
changeset
|
7705 |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
7706 incr_quickfix_busy(); |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
7707 |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
7708 if (what != NULL) |
12048
ebd313aa5a6c
patch 8.0.0904: cannot set a location list from text
Christian Brabandt <cb@256bit.org>
parents:
11800
diff
changeset
|
7709 retval = qf_set_properties(qi, what, action, title); |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7710 else |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
7711 { |
11449
d2f00eb352b9
patch 8.0.0608: cannot manipulate other than the current quickfix list
Christian Brabandt <cb@256bit.org>
parents:
11447
diff
changeset
|
7712 retval = qf_add_entries(qi, qi->qf_curlist, list, title, action); |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
7713 if (retval == OK) |
16001
416e067411ab
patch 8.1.1006: repeated code in quickfix support
Bram Moolenaar <Bram@vim.org>
parents:
15965
diff
changeset
|
7714 qf_list_changed(qf_get_curlist(qi)); |
13062
6479dadcf214
patch 8.0.1406: difficult to track changes to a quickfix list
Christian Brabandt <cb@256bit.org>
parents:
13056
diff
changeset
|
7715 } |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7716 |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
7717 decr_quickfix_busy(); |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
7718 |
9850
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7719 return retval; |
67781bb0a61a
commit https://github.com/vim/vim/commit/d823fa910cca43fec3c31c030ee908a14c272640
Christian Brabandt <cb@256bit.org>
parents:
9738
diff
changeset
|
7720 } |
11412
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7721 |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
7722 /* |
26518
13ba00ef7687
patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents:
26464
diff
changeset
|
7723 * Mark the quickfix context and callback function as in use for all the lists |
13ba00ef7687
patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents:
26464
diff
changeset
|
7724 * in a quickfix stack. |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
7725 */ |
11412
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7726 static int |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7727 mark_quickfix_ctx(qf_info_T *qi, int copyID) |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7728 { |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7729 int i; |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7730 int abort = FALSE; |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7731 typval_T *ctx; |
26518
13ba00ef7687
patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents:
26464
diff
changeset
|
7732 callback_T *cb; |
11412
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7733 |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7734 for (i = 0; i < LISTCOUNT && !abort; ++i) |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7735 { |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7736 ctx = qi->qf_lists[i].qf_ctx; |
12084
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
7737 if (ctx != NULL && ctx->v_type != VAR_NUMBER |
69ce6b3f0834
patch 8.0.0922: quickfix list always added after current one
Christian Brabandt <cb@256bit.org>
parents:
12048
diff
changeset
|
7738 && ctx->v_type != VAR_STRING && ctx->v_type != VAR_FLOAT) |
26518
13ba00ef7687
patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents:
26464
diff
changeset
|
7739 abort = abort || set_ref_in_item(ctx, copyID, NULL, NULL); |
13ba00ef7687
patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents:
26464
diff
changeset
|
7740 |
28451
e015d650ea9f
patch 8.2.4750: small pieces of dead code
Bram Moolenaar <Bram@vim.org>
parents:
28315
diff
changeset
|
7741 cb = &qi->qf_lists[i].qf_qftf_cb; |
26518
13ba00ef7687
patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents:
26464
diff
changeset
|
7742 abort = abort || set_ref_in_callback(cb, copyID); |
11412
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7743 } |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7744 |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7745 return abort; |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7746 } |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7747 |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7748 /* |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7749 * Mark the context of the quickfix list and the location lists (if present) as |
13710
b33f04873475
patch 8.0.1727: qf_get_properties() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13660
diff
changeset
|
7750 * "in use". So that garbage collection doesn't free the context. |
11412
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7751 */ |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7752 int |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7753 set_ref_in_quickfix(int copyID) |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7754 { |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7755 int abort = FALSE; |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7756 tabpage_T *tp; |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7757 win_T *win; |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7758 |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7759 abort = mark_quickfix_ctx(&ql_info, copyID); |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7760 if (abort) |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7761 return abort; |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7762 |
26518
13ba00ef7687
patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents:
26464
diff
changeset
|
7763 abort = set_ref_in_callback(&qftf_cb, copyID); |
13ba00ef7687
patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents:
26464
diff
changeset
|
7764 if (abort) |
13ba00ef7687
patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents:
26464
diff
changeset
|
7765 return abort; |
13ba00ef7687
patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents:
26464
diff
changeset
|
7766 |
11412
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7767 FOR_ALL_TAB_WINDOWS(tp, win) |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7768 { |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7769 if (win->w_llist != NULL) |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7770 { |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7771 abort = mark_quickfix_ctx(win->w_llist, copyID); |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7772 if (abort) |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7773 return abort; |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7774 } |
13074
66c014c71dad
patch 8.0.1412: using free memory using setloclist()
Christian Brabandt <cb@256bit.org>
parents:
13066
diff
changeset
|
7775 if (IS_LL_WINDOW(win) && (win->w_llist_ref->qf_refcount == 1)) |
66c014c71dad
patch 8.0.1412: using free memory using setloclist()
Christian Brabandt <cb@256bit.org>
parents:
13066
diff
changeset
|
7776 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7777 // In a location list window and none of the other windows is |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7778 // referring to this location list. Mark the location list |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7779 // context as still in use. |
13074
66c014c71dad
patch 8.0.1412: using free memory using setloclist()
Christian Brabandt <cb@256bit.org>
parents:
13066
diff
changeset
|
7780 abort = mark_quickfix_ctx(win->w_llist_ref, copyID); |
66c014c71dad
patch 8.0.1412: using free memory using setloclist()
Christian Brabandt <cb@256bit.org>
parents:
13066
diff
changeset
|
7781 if (abort) |
66c014c71dad
patch 8.0.1412: using free memory using setloclist()
Christian Brabandt <cb@256bit.org>
parents:
13066
diff
changeset
|
7782 return abort; |
66c014c71dad
patch 8.0.1412: using free memory using setloclist()
Christian Brabandt <cb@256bit.org>
parents:
13066
diff
changeset
|
7783 } |
11412
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7784 } |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7785 |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7786 return abort; |
84baca75b7f2
patch 8.0.0590: cannot add a context to locations
Christian Brabandt <cb@256bit.org>
parents:
11398
diff
changeset
|
7787 } |
170 | 7788 #endif |
7789 | |
42 | 7790 /* |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7791 * Return the autocmd name for the :cbuffer Ex commands |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7792 */ |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7793 static char_u * |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7794 cbuffer_get_auname(cmdidx_T cmdidx) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7795 { |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7796 switch (cmdidx) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7797 { |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7798 case CMD_cbuffer: return (char_u *)"cbuffer"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7799 case CMD_cgetbuffer: return (char_u *)"cgetbuffer"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7800 case CMD_caddbuffer: return (char_u *)"caddbuffer"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7801 case CMD_lbuffer: return (char_u *)"lbuffer"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7802 case CMD_lgetbuffer: return (char_u *)"lgetbuffer"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7803 case CMD_laddbuffer: return (char_u *)"laddbuffer"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7804 default: return NULL; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7805 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7806 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7807 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7808 /* |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7809 * Process and validate the arguments passed to the :cbuffer, :caddbuffer, |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7810 * :cgetbuffer, :lbuffer, :laddbuffer, :lgetbuffer Ex commands. |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7811 */ |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7812 static int |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7813 cbuffer_process_args( |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7814 exarg_T *eap, |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7815 buf_T **bufp, |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7816 linenr_T *line1, |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7817 linenr_T *line2) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7818 { |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7819 buf_T *buf = NULL; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7820 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7821 if (*eap->arg == NUL) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7822 buf = curbuf; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7823 else if (*skipwhite(skipdigits(eap->arg)) == NUL) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7824 buf = buflist_findnr(atoi((char *)eap->arg)); |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7825 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7826 if (buf == NULL) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7827 { |
26865
bce848ec8b1b
patch 8.2.3961: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26771
diff
changeset
|
7828 emsg(_(e_invalid_argument)); |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7829 return FAIL; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7830 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7831 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7832 if (buf->b_ml.ml_mfp == NULL) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7833 { |
26952
b34ddbca305c
patch 8.2.4005: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26917
diff
changeset
|
7834 emsg(_(e_buffer_is_not_loaded)); |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7835 return FAIL; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7836 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7837 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7838 if (eap->addr_count == 0) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7839 { |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7840 eap->line1 = 1; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7841 eap->line2 = buf->b_ml.ml_line_count; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7842 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7843 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7844 if (eap->line1 < 1 || eap->line1 > buf->b_ml.ml_line_count |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7845 || eap->line2 < 1 || eap->line2 > buf->b_ml.ml_line_count) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7846 { |
25064
8f2262c72178
patch 8.2.3069: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
24964
diff
changeset
|
7847 emsg(_(e_invalid_range)); |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7848 return FAIL; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7849 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7850 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7851 *line1 = eap->line1; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7852 *line2 = eap->line2; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7853 *bufp = buf; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7854 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7855 return OK; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7856 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7857 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7858 /* |
41 | 7859 * ":[range]cbuffer [bufnr]" command. |
657 | 7860 * ":[range]caddbuffer [bufnr]" command. |
798 | 7861 * ":[range]cgetbuffer [bufnr]" command. |
644 | 7862 * ":[range]lbuffer [bufnr]" command. |
657 | 7863 * ":[range]laddbuffer [bufnr]" command. |
798 | 7864 * ":[range]lgetbuffer [bufnr]" command. |
41 | 7865 */ |
7866 void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
7867 ex_cbuffer(exarg_T *eap) |
41 | 7868 { |
7869 buf_T *buf = NULL; | |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
7870 qf_info_T *qi; |
10056
21f685af3fc1
commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
7871 char_u *au_name = NULL; |
12954
49e136457c66
patch 8.0.1353: QuickFixCmdPost is not used consistently
Christian Brabandt <cb@256bit.org>
parents:
12912
diff
changeset
|
7872 int res; |
14250
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
7873 int_u save_qfid; |
ca6ccee4823f
patch 8.1.0141: :cexpr no longer jumps to the first error
Christian Brabandt <cb@256bit.org>
parents:
14113
diff
changeset
|
7874 win_T *wp = NULL; |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7875 char_u *qf_title; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7876 linenr_T line1; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7877 linenr_T line2; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7878 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7879 au_name = cbuffer_get_auname(eap->cmdidx); |
10346
d52d97bf675e
commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41
Christian Brabandt <cb@256bit.org>
parents:
10281
diff
changeset
|
7880 if (au_name != NULL && apply_autocmds(EVENT_QUICKFIXCMDPRE, au_name, |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7881 curbuf->b_fname, TRUE, curbuf)) |
10056
21f685af3fc1
commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
7882 { |
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13252
diff
changeset
|
7883 #ifdef FEAT_EVAL |
10346
d52d97bf675e
commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41
Christian Brabandt <cb@256bit.org>
parents:
10281
diff
changeset
|
7884 if (aborting()) |
10056
21f685af3fc1
commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
7885 return; |
21f685af3fc1
commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
7886 #endif |
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13252
diff
changeset
|
7887 } |
10056
21f685af3fc1
commit https://github.com/vim/vim/commit/04c4ce650f9e533cd35b2aa6803f4d354d3ec7aa
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
7888 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
7889 // Must come after autocommands. |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
7890 qi = qf_cmd_get_or_alloc_stack(eap, &wp); |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
7891 if (qi == NULL) |
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
7892 return; |
13076
7c071a3f7f8e
patch 8.0.1413: accessing freed memory in :cbuffer
Christian Brabandt <cb@256bit.org>
parents:
13074
diff
changeset
|
7893 |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7894 if (cbuffer_process_args(eap, &buf, &line1, &line2) == FAIL) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7895 return; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7896 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7897 qf_title = qf_cmdtitle(*eap->cmdlinep); |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7898 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7899 if (buf->b_sfname) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7900 { |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7901 vim_snprintf((char *)IObuff, IOSIZE, "%s (%s)", |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7902 (char *)qf_title, (char *)buf->b_sfname); |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7903 qf_title = IObuff; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7904 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7905 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7906 incr_quickfix_busy(); |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7907 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7908 res = qf_init_ext(qi, qi->qf_curlist, NULL, buf, NULL, p_efm, |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7909 (eap->cmdidx != CMD_caddbuffer |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7910 && eap->cmdidx != CMD_laddbuffer), |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7911 line1, line2, |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7912 qf_title, NULL); |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7913 if (qf_stack_empty(qi)) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7914 { |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7915 decr_quickfix_busy(); |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7916 return; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7917 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7918 if (res >= 0) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7919 qf_list_changed(qf_get_curlist(qi)); |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7920 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7921 // Remember the current quickfix list identifier, so that we can |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7922 // check for autocommands changing the current quickfix list. |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7923 save_qfid = qf_get_curlist(qi)->qf_id; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7924 if (au_name != NULL) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7925 { |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7926 buf_T *curbuf_old = curbuf; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7927 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7928 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name, curbuf->b_fname, |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7929 TRUE, curbuf); |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7930 if (curbuf != curbuf_old) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7931 // Autocommands changed buffer, don't jump now, "qi" may |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7932 // be invalid. |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7933 res = 0; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7934 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7935 // Jump to the first error for a new list and if autocmds didn't |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7936 // free the list. |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7937 if (res > 0 && (eap->cmdidx == CMD_cbuffer || |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7938 eap->cmdidx == CMD_lbuffer) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7939 && qflist_valid(wp, save_qfid)) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7940 // display the first error |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7941 qf_jump_first(qi, save_qfid, eap->forceit); |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7942 |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7943 decr_quickfix_busy(); |
41 | 7944 } |
7945 | |
532 | 7946 #if defined(FEAT_EVAL) || defined(PROTO) |
41 | 7947 /* |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7948 * Return the autocmd name for the :cexpr Ex commands. |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7949 */ |
24590
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7950 char_u * |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7951 cexpr_get_auname(cmdidx_T cmdidx) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7952 { |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7953 switch (cmdidx) |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7954 { |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7955 case CMD_cexpr: return (char_u *)"cexpr"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7956 case CMD_cgetexpr: return (char_u *)"cgetexpr"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7957 case CMD_caddexpr: return (char_u *)"caddexpr"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7958 case CMD_lexpr: return (char_u *)"lexpr"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7959 case CMD_lgetexpr: return (char_u *)"lgetexpr"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7960 case CMD_laddexpr: return (char_u *)"laddexpr"; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7961 default: return NULL; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7962 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7963 } |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
7964 |
24590
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7965 int |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7966 trigger_cexpr_autocmd(int cmdidx) |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7967 { |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7968 char_u *au_name = cexpr_get_auname(cmdidx); |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7969 |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7970 if (au_name != NULL && apply_autocmds(EVENT_QUICKFIXCMDPRE, au_name, |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7971 curbuf->b_fname, TRUE, curbuf)) |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7972 { |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7973 if (aborting()) |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7974 return FAIL; |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7975 } |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7976 return OK; |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7977 } |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7978 |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7979 int |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7980 cexpr_core(exarg_T *eap, typval_T *tv) |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7981 { |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7982 qf_info_T *qi; |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7983 win_T *wp = NULL; |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7984 |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7985 qi = qf_cmd_get_or_alloc_stack(eap, &wp); |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7986 if (qi == NULL) |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7987 return FAIL; |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7988 |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7989 if ((tv->v_type == VAR_STRING && tv->vval.v_string != NULL) |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7990 || (tv->v_type == VAR_LIST && tv->vval.v_list != NULL)) |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7991 { |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7992 int res; |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7993 int_u save_qfid; |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7994 char_u *au_name = cexpr_get_auname(eap->cmdidx); |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7995 |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7996 incr_quickfix_busy(); |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7997 res = qf_init_ext(qi, qi->qf_curlist, NULL, NULL, tv, p_efm, |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7998 (eap->cmdidx != CMD_caddexpr |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
7999 && eap->cmdidx != CMD_laddexpr), |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8000 (linenr_T)0, (linenr_T)0, |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8001 qf_cmdtitle(*eap->cmdlinep), NULL); |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8002 if (qf_stack_empty(qi)) |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8003 { |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8004 decr_quickfix_busy(); |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8005 return FAIL; |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8006 } |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8007 if (res >= 0) |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8008 qf_list_changed(qf_get_curlist(qi)); |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8009 |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8010 // Remember the current quickfix list identifier, so that we can |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8011 // check for autocommands changing the current quickfix list. |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8012 save_qfid = qf_get_curlist(qi)->qf_id; |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8013 if (au_name != NULL) |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8014 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name, |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8015 curbuf->b_fname, TRUE, curbuf); |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8016 |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8017 // Jump to the first error for a new list and if autocmds didn't |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8018 // free the list. |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8019 if (res > 0 && (eap->cmdidx == CMD_cexpr || eap->cmdidx == CMD_lexpr) |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8020 && qflist_valid(wp, save_qfid)) |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8021 // display the first error |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8022 qf_jump_first(qi, save_qfid, eap->forceit); |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8023 decr_quickfix_busy(); |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8024 return OK; |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8025 } |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8026 |
26958
d92e0d85923f
patch 8.2.4008: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26952
diff
changeset
|
8027 emsg(_(e_string_or_list_expected)); |
24590
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8028 return FAIL; |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8029 } |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8030 |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
8031 /* |
798 | 8032 * ":cexpr {expr}", ":cgetexpr {expr}", ":caddexpr {expr}" command. |
8033 * ":lexpr {expr}", ":lgetexpr {expr}", ":laddexpr {expr}" command. | |
24590
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8034 * Also: ":caddexpr", ":cgetexpr", "laddexpr" and "laddexpr". |
446 | 8035 */ |
8036 void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
8037 ex_cexpr(exarg_T *eap) |
446 | 8038 { |
8039 typval_T *tv; | |
24590
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8040 |
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8041 if (trigger_cexpr_autocmd(eap->cmdidx) == FAIL) |
16215
4202f556aefe
patch 8.1.1112: duplicate code in quickfix file
Bram Moolenaar <Bram@vim.org>
parents:
16186
diff
changeset
|
8042 return; |
13090
a0c6910e7fa4
patch 8.0.1420: accessing freed memory in vimgrep
Christian Brabandt <cb@256bit.org>
parents:
13078
diff
changeset
|
8043 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8044 // Evaluate the expression. When the result is a string or a list we can |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8045 // use it to fill the errorlist. |
20996
3af71cbcfdbe
patch 8.2.1049: Vim9: leaking memory when using continuation line
Bram Moolenaar <Bram@vim.org>
parents:
20814
diff
changeset
|
8046 tv = eval_expr(eap->arg, eap); |
625 | 8047 if (tv != NULL) |
8048 { | |
24590
2818f846f099
patch 8.2.2834: Vim9: :cexpr does not work with local variables
Bram Moolenaar <Bram@vim.org>
parents:
24574
diff
changeset
|
8049 (void)cexpr_core(eap, tv); |
625 | 8050 free_tv(tv); |
8051 } | |
446 | 8052 } |
532 | 8053 #endif |
446 | 8054 |
8055 /* | |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8056 * Get the location list for ":lhelpgrep" |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8057 */ |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8058 static qf_info_T * |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8059 hgr_get_ll(int *new_ll) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8060 { |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8061 win_T *wp; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8062 qf_info_T *qi; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8063 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8064 // If the current window is a help window, then use it |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8065 if (bt_help(curwin->w_buffer)) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8066 wp = curwin; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8067 else |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8068 // Find an existing help window |
13882
f48fcaa196a9
patch 8.0.1812: the qf_jump_to_usable_window() function is too long
Christian Brabandt <cb@256bit.org>
parents:
13868
diff
changeset
|
8069 wp = qf_find_help_win(); |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8070 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8071 if (wp == NULL) // Help window not found |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8072 qi = NULL; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8073 else |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8074 qi = wp->w_llist; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8075 |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8076 if (qi == NULL) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8077 { |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8078 // Allocate a new location list for help text matches |
15042
e95e8b356a65
patch 8.1.0532: cannot distinguish between quickfix and location list
Bram Moolenaar <Bram@vim.org>
parents:
15024
diff
changeset
|
8079 if ((qi = qf_alloc_stack(QFLT_LOCATION)) == NULL) |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8080 return NULL; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8081 *new_ll = TRUE; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8082 } |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8083 |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8084 return qi; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8085 } |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8086 |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8087 /* |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8088 * Search for a pattern in a help file. |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8089 */ |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8090 static void |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8091 hgr_search_file( |
16062
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
8092 qf_list_T *qfl, |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8093 char_u *fname, |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8094 vimconv_T *p_vc, |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8095 regmatch_T *p_regmatch) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8096 { |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8097 FILE *fd; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8098 long lnum; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8099 |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8100 fd = mch_fopen((char *)fname, "r"); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8101 if (fd == NULL) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8102 return; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8103 |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8104 lnum = 1; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8105 while (!vim_fgets(IObuff, IOSIZE, fd) && !got_int) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8106 { |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8107 char_u *line = IObuff; |
15603
639b8318472c
patch 8.1.0809: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents:
15543
diff
changeset
|
8108 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8109 // Convert a line if 'encoding' is not utf-8 and |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8110 // the line contains a non-ASCII character. |
27974
495418c6cac8
patch 8.2.4512: the find_tags_in_file() function is much too long
Bram Moolenaar <Bram@vim.org>
parents:
27938
diff
changeset
|
8111 if (p_vc->vc_type != CONV_NONE && has_non_ascii(IObuff)) |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8112 { |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8113 line = string_convert(p_vc, IObuff, NULL); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8114 if (line == NULL) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8115 line = IObuff; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8116 } |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8117 |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8118 if (vim_regexec(p_regmatch, line, (colnr_T)0)) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8119 { |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8120 int l = (int)STRLEN(line); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8121 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8122 // remove trailing CR, LF, spaces, etc. |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8123 while (l > 0 && line[l - 1] <= ' ') |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8124 line[--l] = NUL; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8125 |
16062
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
8126 if (qf_add_entry(qfl, |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8127 NULL, // dir |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8128 fname, |
13821
98274127d675
patch 8.0.1782: no simple way to label quickfix entries
Christian Brabandt <cb@256bit.org>
parents:
13819
diff
changeset
|
8129 NULL, |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8130 0, |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8131 line, |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8132 lnum, |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
8133 0, |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8134 (int)(p_regmatch->startp[0] - line) |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8135 + 1, // col |
24964
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
8136 (int)(p_regmatch->endp[0] - line) |
f4aa891a5ab8
patch 8.2.3019: location list only has the start position.
Bram Moolenaar <Bram@vim.org>
parents:
24962
diff
changeset
|
8137 + 1, // end_col |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8138 FALSE, // vis_col |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8139 NULL, // search pattern |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8140 0, // nr |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8141 1, // type |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8142 TRUE // valid |
16186
e12336bb8ced
patch 8.1.1098: quickfix code duplication
Bram Moolenaar <Bram@vim.org>
parents:
16115
diff
changeset
|
8143 ) == QF_FAIL) |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8144 { |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8145 got_int = TRUE; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8146 if (line != IObuff) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8147 vim_free(line); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8148 break; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8149 } |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8150 } |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8151 if (line != IObuff) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8152 vim_free(line); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8153 ++lnum; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8154 line_breakcheck(); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8155 } |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8156 fclose(fd); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8157 } |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8158 |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8159 /* |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8160 * Search for a pattern in all the help files in the doc directory under |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8161 * the given directory. |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8162 */ |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8163 static void |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8164 hgr_search_files_in_dir( |
16062
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
8165 qf_list_T *qfl, |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8166 char_u *dirname, |
15603
639b8318472c
patch 8.1.0809: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents:
15543
diff
changeset
|
8167 regmatch_T *p_regmatch, |
639b8318472c
patch 8.1.0809: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents:
15543
diff
changeset
|
8168 vimconv_T *p_vc |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8169 #ifdef FEAT_MULTI_LANG |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8170 , char_u *lang |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8171 #endif |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8172 ) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8173 { |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8174 int fcount; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8175 char_u **fnames; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8176 int fi; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8177 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8178 // Find all "*.txt" and "*.??x" files in the "doc" directory. |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8179 add_pathsep(dirname); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8180 STRCAT(dirname, "doc/*.\\(txt\\|??x\\)"); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8181 if (gen_expand_wildcards(1, &dirname, &fcount, |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8182 &fnames, EW_FILE|EW_SILENT) == OK |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8183 && fcount > 0) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8184 { |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8185 for (fi = 0; fi < fcount && !got_int; ++fi) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8186 { |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8187 #ifdef FEAT_MULTI_LANG |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8188 // Skip files for a different language. |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8189 if (lang != NULL |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8190 && STRNICMP(lang, fnames[fi] |
13821
98274127d675
patch 8.0.1782: no simple way to label quickfix entries
Christian Brabandt <cb@256bit.org>
parents:
13819
diff
changeset
|
8191 + STRLEN(fnames[fi]) - 3, 2) != 0 |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8192 && !(STRNICMP(lang, "en", 2) == 0 |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8193 && STRNICMP("txt", fnames[fi] |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8194 + STRLEN(fnames[fi]) - 3, 3) == 0)) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8195 continue; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8196 #endif |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8197 |
16062
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
8198 hgr_search_file(qfl, fnames[fi], p_vc, p_regmatch); |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8199 } |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8200 FreeWild(fcount, fnames); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8201 } |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8202 } |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8203 |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8204 /* |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
8205 * Search for a pattern in all the help files in the 'runtimepath' |
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
8206 * and add the matches to a quickfix list. |
14603
d1b69129db99
patch 8.1.0315: helpgrep with language doesn't work properly
Christian Brabandt <cb@256bit.org>
parents:
14560
diff
changeset
|
8207 * 'lang' is the language specifier. If supplied, then only matches in the |
13868
1282a54c1f5a
patch 8.0.1805: qf_parse_line() is too long
Christian Brabandt <cb@256bit.org>
parents:
13821
diff
changeset
|
8208 * specified language are found. |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8209 */ |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8210 static void |
16062
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
8211 hgr_search_in_rtp(qf_list_T *qfl, regmatch_T *p_regmatch, char_u *lang) |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8212 { |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8213 char_u *p; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8214 |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8215 vimconv_T vc; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8216 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8217 // Help files are in utf-8 or latin1, convert lines when 'encoding' |
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8218 // differs. |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8219 vc.vc_type = CONV_NONE; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8220 if (!enc_utf8) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8221 convert_setup(&vc, (char_u *)"utf-8", p_enc); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8222 |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8223 // Go through all the directories in 'runtimepath' |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8224 p = p_rtp; |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8225 while (*p != NUL && !got_int) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8226 { |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8227 copy_option_part(&p, NameBuff, MAXPATHL, ","); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8228 |
16062
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
8229 hgr_search_files_in_dir(qfl, NameBuff, p_regmatch, &vc |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8230 #ifdef FEAT_MULTI_LANG |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8231 , lang |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8232 #endif |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8233 ); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8234 } |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8235 |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8236 if (vc.vc_type != CONV_NONE) |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8237 convert_setup(&vc, NULL, NULL); |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8238 } |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8239 |
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8240 /* |
7 | 8241 * ":helpgrep {pattern}" |
8242 */ | |
8243 void | |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
8244 ex_helpgrep(exarg_T *eap) |
7 | 8245 { |
8246 regmatch_T regmatch; | |
8247 char_u *save_cpo; | |
27855
44a552776007
patch 8.2.4453: :helpgrep may free an option that was not allocated
Bram Moolenaar <Bram@vim.org>
parents:
27752
diff
changeset
|
8248 int save_cpo_allocated; |
644 | 8249 qf_info_T *qi = &ql_info; |
659 | 8250 int new_qi = FALSE; |
3269 | 8251 char_u *au_name = NULL; |
14603
d1b69129db99
patch 8.1.0315: helpgrep with language doesn't work properly
Christian Brabandt <cb@256bit.org>
parents:
14560
diff
changeset
|
8252 char_u *lang = NULL; |
23493
f8382c4e6551
patch 8.2.2289: Vim9: 'cpo' can become empty
Bram Moolenaar <Bram@vim.org>
parents:
23278
diff
changeset
|
8253 int updated = FALSE; |
7 | 8254 |
3269 | 8255 switch (eap->cmdidx) |
8256 { | |
8257 case CMD_helpgrep: au_name = (char_u *)"helpgrep"; break; | |
8258 case CMD_lhelpgrep: au_name = (char_u *)"lhelpgrep"; break; | |
8259 default: break; | |
8260 } | |
10346
d52d97bf675e
commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41
Christian Brabandt <cb@256bit.org>
parents:
10281
diff
changeset
|
8261 if (au_name != NULL && apply_autocmds(EVENT_QUICKFIXCMDPRE, au_name, |
d52d97bf675e
commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41
Christian Brabandt <cb@256bit.org>
parents:
10281
diff
changeset
|
8262 curbuf->b_fname, TRUE, curbuf)) |
3269 | 8263 { |
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13252
diff
changeset
|
8264 #ifdef FEAT_EVAL |
10346
d52d97bf675e
commit https://github.com/vim/vim/commit/21662be2211675824df1771c7f169948ede40c41
Christian Brabandt <cb@256bit.org>
parents:
10281
diff
changeset
|
8265 if (aborting()) |
3269 | 8266 return; |
8267 #endif | |
13380
69517d67421f
patch 8.0.1564: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents:
13252
diff
changeset
|
8268 } |
3269 | 8269 |
14550
60b9b6196644
patch 8.1.0288: quickfix code uses cmdidx too often
Christian Brabandt <cb@256bit.org>
parents:
14507
diff
changeset
|
8270 if (is_loclist_cmd(eap->cmdidx)) |
659 | 8271 { |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8272 qi = hgr_get_ll(&new_qi); |
659 | 8273 if (qi == NULL) |
13764
7bba231fdddc
patch 8.0.1754: ex_helpgrep() is too long
Christian Brabandt <cb@256bit.org>
parents:
13760
diff
changeset
|
8274 return; |
659 | 8275 } |
8276 | |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
8277 // Make 'cpoptions' empty, the 'l' flag should not be used here. |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
8278 save_cpo = p_cpo; |
27855
44a552776007
patch 8.2.4453: :helpgrep may free an option that was not allocated
Bram Moolenaar <Bram@vim.org>
parents:
27752
diff
changeset
|
8279 save_cpo_allocated = is_option_allocated("cpo"); |
16115
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
8280 p_cpo = empty_option; |
91da8cd462ef
patch 8.1.1062: quickfix code is repeated
Bram Moolenaar <Bram@vim.org>
parents:
16062
diff
changeset
|
8281 |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
8282 incr_quickfix_busy(); |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
8283 |
14603
d1b69129db99
patch 8.1.0315: helpgrep with language doesn't work properly
Christian Brabandt <cb@256bit.org>
parents:
14560
diff
changeset
|
8284 #ifdef FEAT_MULTI_LANG |
d1b69129db99
patch 8.1.0315: helpgrep with language doesn't work properly
Christian Brabandt <cb@256bit.org>
parents:
14560
diff
changeset
|
8285 // Check for a specified language |
d1b69129db99
patch 8.1.0315: helpgrep with language doesn't work properly
Christian Brabandt <cb@256bit.org>
parents:
14560
diff
changeset
|
8286 lang = check_help_lang(eap->arg); |
d1b69129db99
patch 8.1.0315: helpgrep with language doesn't work properly
Christian Brabandt <cb@256bit.org>
parents:
14560
diff
changeset
|
8287 #endif |
7 | 8288 regmatch.regprog = vim_regcomp(eap->arg, RE_MAGIC + RE_STRING); |
8289 regmatch.rm_ic = FALSE; | |
8290 if (regmatch.regprog != NULL) | |
8291 { | |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
8292 qf_list_T *qfl; |
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
8293 |
14603
d1b69129db99
patch 8.1.0315: helpgrep with language doesn't work properly
Christian Brabandt <cb@256bit.org>
parents:
14560
diff
changeset
|
8294 // create a new quickfix list |
13921
3b6c29f8c1a2
patch 8.0.1831: sometimes the quickfix title is incorrectly prefixed with ':'
Christian Brabandt <cb@256bit.org>
parents:
13882
diff
changeset
|
8295 qf_new_list(qi, qf_cmdtitle(*eap->cmdlinep)); |
16062
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
8296 qfl = qf_get_curlist(qi); |
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
8297 |
d1efe0dbe6b0
patch 8.1.1036: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16050
diff
changeset
|
8298 hgr_search_in_rtp(qfl, ®match, lang); |
3257 | 8299 |
4805
66803af09906
updated for version 7.3.1149
Bram Moolenaar <bram@vim.org>
parents:
4371
diff
changeset
|
8300 vim_regfree(regmatch.regprog); |
7 | 8301 |
14915
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
8302 qfl->qf_nonevalid = FALSE; |
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
8303 qfl->qf_ptr = qfl->qf_start; |
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
8304 qfl->qf_index = 1; |
f508bb2fb808
patch 8.1.0469: too often indexing in qf_lists[]
Bram Moolenaar <Bram@vim.org>
parents:
14899
diff
changeset
|
8305 qf_list_changed(qfl); |
23493
f8382c4e6551
patch 8.2.2289: Vim9: 'cpo' can become empty
Bram Moolenaar <Bram@vim.org>
parents:
23278
diff
changeset
|
8306 updated = TRUE; |
7 | 8307 } |
8308 | |
1672 | 8309 if (p_cpo == empty_option) |
8310 p_cpo = save_cpo; | |
8311 else | |
23493
f8382c4e6551
patch 8.2.2289: Vim9: 'cpo' can become empty
Bram Moolenaar <Bram@vim.org>
parents:
23278
diff
changeset
|
8312 { |
f8382c4e6551
patch 8.2.2289: Vim9: 'cpo' can become empty
Bram Moolenaar <Bram@vim.org>
parents:
23278
diff
changeset
|
8313 // Darn, some plugin changed the value. If it's still empty it was |
f8382c4e6551
patch 8.2.2289: Vim9: 'cpo' can become empty
Bram Moolenaar <Bram@vim.org>
parents:
23278
diff
changeset
|
8314 // changed and restored, need to restore in the complicated way. |
f8382c4e6551
patch 8.2.2289: Vim9: 'cpo' can become empty
Bram Moolenaar <Bram@vim.org>
parents:
23278
diff
changeset
|
8315 if (*p_cpo == NUL) |
28457
4dcccb2673fe
patch 8.2.4753: error from setting an option is silently ignored
Bram Moolenaar <Bram@vim.org>
parents:
28451
diff
changeset
|
8316 set_option_value_give_err((char_u *)"cpo", 0L, save_cpo, 0); |
27855
44a552776007
patch 8.2.4453: :helpgrep may free an option that was not allocated
Bram Moolenaar <Bram@vim.org>
parents:
27752
diff
changeset
|
8317 if (save_cpo_allocated) |
44a552776007
patch 8.2.4453: :helpgrep may free an option that was not allocated
Bram Moolenaar <Bram@vim.org>
parents:
27752
diff
changeset
|
8318 free_string_option(save_cpo); |
23493
f8382c4e6551
patch 8.2.2289: Vim9: 'cpo' can become empty
Bram Moolenaar <Bram@vim.org>
parents:
23278
diff
changeset
|
8319 } |
f8382c4e6551
patch 8.2.2289: Vim9: 'cpo' can become empty
Bram Moolenaar <Bram@vim.org>
parents:
23278
diff
changeset
|
8320 |
f8382c4e6551
patch 8.2.2289: Vim9: 'cpo' can become empty
Bram Moolenaar <Bram@vim.org>
parents:
23278
diff
changeset
|
8321 if (updated) |
f8382c4e6551
patch 8.2.2289: Vim9: 'cpo' can become empty
Bram Moolenaar <Bram@vim.org>
parents:
23278
diff
changeset
|
8322 // This may open a window and source scripts, do this after 'cpo' was |
f8382c4e6551
patch 8.2.2289: Vim9: 'cpo' can become empty
Bram Moolenaar <Bram@vim.org>
parents:
23278
diff
changeset
|
8323 // restored. |
f8382c4e6551
patch 8.2.2289: Vim9: 'cpo' can become empty
Bram Moolenaar <Bram@vim.org>
parents:
23278
diff
changeset
|
8324 qf_update_buffer(qi, NULL); |
7 | 8325 |
3269 | 8326 if (au_name != NULL) |
8327 { | |
8328 apply_autocmds(EVENT_QUICKFIXCMDPOST, au_name, | |
8329 curbuf->b_fname, TRUE, curbuf); | |
20764
3c61d8ec36af
patch 8.2.0934: lhelpgrep twice in help window doesn't jump to the help topic
Bram Moolenaar <Bram@vim.org>
parents:
20762
diff
changeset
|
8330 // When adding a location list to an existing location list stack, |
3c61d8ec36af
patch 8.2.0934: lhelpgrep twice in help window doesn't jump to the help topic
Bram Moolenaar <Bram@vim.org>
parents:
20762
diff
changeset
|
8331 // if the autocmd made the stack invalid, then just return. |
3c61d8ec36af
patch 8.2.0934: lhelpgrep twice in help window doesn't jump to the help topic
Bram Moolenaar <Bram@vim.org>
parents:
20762
diff
changeset
|
8332 if (!new_qi && IS_LL_STACK(qi) && qf_find_win_with_loclist(qi) == NULL) |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
8333 { |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
8334 decr_quickfix_busy(); |
3269 | 8335 return; |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
8336 } |
3269 | 8337 } |
8338 | |
14899
e35d98651e56
patch 8.1.0461: quickfix code uses too many /* */ comments
Bram Moolenaar <Bram@vim.org>
parents:
14887
diff
changeset
|
8339 // Jump to first match. |
16050
c19853508d3e
patch 8.1.1030: quickfix function arguments are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
16019
diff
changeset
|
8340 if (!qf_list_empty(qf_get_curlist(qi))) |
659 | 8341 qf_jump(qi, 0, 0, FALSE); |
9 | 8342 else |
26877
06a137af96f8
patch 8.2.3967: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26865
diff
changeset
|
8343 semsg(_(e_no_match_str_2), eap->arg); |
659 | 8344 |
14954
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
8345 decr_quickfix_busy(); |
69d2749a6a2f
patch 8.1.0488: using freed memory in quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
14915
diff
changeset
|
8346 |
659 | 8347 if (eap->cmdidx == CMD_lhelpgrep) |
8348 { | |
14603
d1b69129db99
patch 8.1.0315: helpgrep with language doesn't work properly
Christian Brabandt <cb@256bit.org>
parents:
14560
diff
changeset
|
8349 // If the help window is not opened or if it already points to the |
d1b69129db99
patch 8.1.0315: helpgrep with language doesn't work properly
Christian Brabandt <cb@256bit.org>
parents:
14560
diff
changeset
|
8350 // correct location list, then free the new location list. |
11800
5ceaecedbad2
patch 8.0.0782: using freed memory in quickfix code
Christian Brabandt <cb@256bit.org>
parents:
11788
diff
changeset
|
8351 if (!bt_help(curwin->w_buffer) || curwin->w_llist == qi) |
659 | 8352 { |
8353 if (new_qi) | |
8354 ll_free_all(&qi); | |
8355 } | |
27873
d1af65b322d0
patch 8.2.4462: not enough testing for quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27855
diff
changeset
|
8356 else if (curwin->w_llist == NULL && new_qi) |
d1af65b322d0
patch 8.2.4462: not enough testing for quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27855
diff
changeset
|
8357 // current window didn't have a location list associated with it |
d1af65b322d0
patch 8.2.4462: not enough testing for quickfix code
Bram Moolenaar <Bram@vim.org>
parents:
27855
diff
changeset
|
8358 // before. Associate the new location list now. |
659 | 8359 curwin->w_llist = qi; |
8360 } | |
7 | 8361 } |
18812
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18697
diff
changeset
|
8362 #endif // FEAT_QUICKFIX |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8363 |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8364 #if defined(FEAT_EVAL) || defined(PROTO) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8365 # ifdef FEAT_QUICKFIX |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8366 static void |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8367 get_qf_loc_list(int is_qf, win_T *wp, typval_T *what_arg, typval_T *rettv) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8368 { |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8369 if (what_arg->v_type == VAR_UNKNOWN) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8370 { |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8371 if (rettv_list_alloc(rettv) == OK) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8372 if (is_qf || wp != NULL) |
20631
d6827bd31d1d
patch 8.2.0869: it is not possible to customize the quickfix window contents
Bram Moolenaar <Bram@vim.org>
parents:
20599
diff
changeset
|
8373 (void)get_errorlist(NULL, wp, -1, 0, rettv->vval.v_list); |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8374 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8375 else |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8376 { |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8377 if (rettv_dict_alloc(rettv) == OK) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8378 if (is_qf || (wp != NULL)) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8379 { |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8380 if (what_arg->v_type == VAR_DICT) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8381 { |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8382 dict_T *d = what_arg->vval.v_dict; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8383 |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8384 if (d != NULL) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8385 qf_get_properties(wp, d, rettv->vval.v_dict); |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8386 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8387 else |
26877
06a137af96f8
patch 8.2.3967: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26865
diff
changeset
|
8388 emsg(_(e_dictionary_required)); |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8389 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8390 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8391 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8392 # endif |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8393 |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8394 /* |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8395 * "getloclist()" function |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8396 */ |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8397 void |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8398 f_getloclist(typval_T *argvars UNUSED, typval_T *rettv UNUSED) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8399 { |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8400 # ifdef FEAT_QUICKFIX |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8401 win_T *wp; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8402 |
25384
e8e2c4d33b9b
patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents:
25320
diff
changeset
|
8403 if (in_vim9script() |
e8e2c4d33b9b
patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents:
25320
diff
changeset
|
8404 && (check_for_number_arg(argvars, 0) == FAIL |
e8e2c4d33b9b
patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents:
25320
diff
changeset
|
8405 || check_for_opt_dict_arg(argvars, 1) == FAIL)) |
e8e2c4d33b9b
patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents:
25320
diff
changeset
|
8406 return; |
e8e2c4d33b9b
patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents:
25320
diff
changeset
|
8407 |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8408 wp = find_win_by_nr_or_id(&argvars[0]); |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8409 get_qf_loc_list(FALSE, wp, &argvars[1], rettv); |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8410 # endif |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8411 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8412 |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8413 /* |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8414 * "getqflist()" function |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8415 */ |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8416 void |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8417 f_getqflist(typval_T *argvars UNUSED, typval_T *rettv UNUSED) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8418 { |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8419 # ifdef FEAT_QUICKFIX |
25384
e8e2c4d33b9b
patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents:
25320
diff
changeset
|
8420 if (in_vim9script() && check_for_opt_dict_arg(argvars, 0) == FAIL) |
e8e2c4d33b9b
patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents:
25320
diff
changeset
|
8421 return; |
e8e2c4d33b9b
patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents:
25320
diff
changeset
|
8422 |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8423 get_qf_loc_list(TRUE, NULL, &argvars[0], rettv); |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8424 # endif |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8425 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8426 |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8427 /* |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8428 * Used by "setqflist()" and "setloclist()" functions |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8429 */ |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8430 static void |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8431 set_qf_ll_list( |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8432 win_T *wp UNUSED, |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8433 typval_T *list_arg UNUSED, |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8434 typval_T *action_arg UNUSED, |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8435 typval_T *what_arg UNUSED, |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8436 typval_T *rettv) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8437 { |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8438 # ifdef FEAT_QUICKFIX |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8439 char_u *act; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8440 int action = 0; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8441 static int recursive = 0; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8442 # endif |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8443 |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8444 rettv->vval.v_number = -1; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8445 |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8446 # ifdef FEAT_QUICKFIX |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8447 if (list_arg->v_type != VAR_LIST) |
26877
06a137af96f8
patch 8.2.3967: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26865
diff
changeset
|
8448 emsg(_(e_list_required)); |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8449 else if (recursive != 0) |
26883
7f150a4936f2
patch 8.2.3970: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26877
diff
changeset
|
8450 emsg(_(e_autocommand_caused_recursive_behavior)); |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8451 else |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8452 { |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8453 list_T *l = list_arg->vval.v_list; |
21102
ebacf460b1b3
patch 8.2.1102: Coverity gets confused by an unnecessary NULL check
Bram Moolenaar <Bram@vim.org>
parents:
21100
diff
changeset
|
8454 dict_T *what = NULL; |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8455 int valid_dict = TRUE; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8456 |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8457 if (action_arg->v_type == VAR_STRING) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8458 { |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8459 act = tv_get_string_chk(action_arg); |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8460 if (act == NULL) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8461 return; // type error; errmsg already given |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8462 if ((*act == 'a' || *act == 'r' || *act == ' ' || *act == 'f') && |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8463 act[1] == NUL) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8464 action = *act; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8465 else |
26966
ac75c145f0a9
patch 8.2.4012: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26958
diff
changeset
|
8466 semsg(_(e_invalid_action_str_1), act); |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8467 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8468 else if (action_arg->v_type == VAR_UNKNOWN) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8469 action = ' '; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8470 else |
26877
06a137af96f8
patch 8.2.3967: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26865
diff
changeset
|
8471 emsg(_(e_string_required)); |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8472 |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8473 if (action_arg->v_type != VAR_UNKNOWN |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8474 && what_arg->v_type != VAR_UNKNOWN) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8475 { |
21102
ebacf460b1b3
patch 8.2.1102: Coverity gets confused by an unnecessary NULL check
Bram Moolenaar <Bram@vim.org>
parents:
21100
diff
changeset
|
8476 if (what_arg->v_type == VAR_DICT && what_arg->vval.v_dict != NULL) |
ebacf460b1b3
patch 8.2.1102: Coverity gets confused by an unnecessary NULL check
Bram Moolenaar <Bram@vim.org>
parents:
21100
diff
changeset
|
8477 what = what_arg->vval.v_dict; |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8478 else |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8479 { |
26877
06a137af96f8
patch 8.2.3967: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26865
diff
changeset
|
8480 emsg(_(e_dictionary_required)); |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8481 valid_dict = FALSE; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8482 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8483 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8484 |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8485 ++recursive; |
21102
ebacf460b1b3
patch 8.2.1102: Coverity gets confused by an unnecessary NULL check
Bram Moolenaar <Bram@vim.org>
parents:
21100
diff
changeset
|
8486 if (l != NULL && action && valid_dict |
ebacf460b1b3
patch 8.2.1102: Coverity gets confused by an unnecessary NULL check
Bram Moolenaar <Bram@vim.org>
parents:
21100
diff
changeset
|
8487 && set_errorlist(wp, l, action, |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8488 (char_u *)(wp == NULL ? ":setqflist()" : ":setloclist()"), |
21102
ebacf460b1b3
patch 8.2.1102: Coverity gets confused by an unnecessary NULL check
Bram Moolenaar <Bram@vim.org>
parents:
21100
diff
changeset
|
8489 what) == OK) |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8490 rettv->vval.v_number = 0; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8491 --recursive; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8492 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8493 # endif |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8494 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8495 |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8496 /* |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8497 * "setloclist()" function |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8498 */ |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8499 void |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8500 f_setloclist(typval_T *argvars, typval_T *rettv) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8501 { |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8502 win_T *win; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8503 |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8504 rettv->vval.v_number = -1; |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8505 |
25302
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8506 if (in_vim9script() |
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8507 && (check_for_number_arg(argvars, 0) == FAIL |
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8508 || check_for_list_arg(argvars, 1) == FAIL |
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8509 || check_for_opt_string_arg(argvars, 2) == FAIL |
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8510 || (argvars[2].v_type != VAR_UNKNOWN |
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8511 && check_for_opt_dict_arg(argvars, 3) == FAIL))) |
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8512 return; |
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8513 |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8514 win = find_win_by_nr_or_id(&argvars[0]); |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8515 if (win != NULL) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8516 set_qf_ll_list(win, &argvars[1], &argvars[2], &argvars[3], rettv); |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8517 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8518 |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8519 /* |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8520 * "setqflist()" function |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8521 */ |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8522 void |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8523 f_setqflist(typval_T *argvars, typval_T *rettv) |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8524 { |
25302
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8525 if (in_vim9script() |
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8526 && (check_for_list_arg(argvars, 0) == FAIL |
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8527 || check_for_opt_string_arg(argvars, 1) == FAIL |
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8528 || (argvars[1].v_type != VAR_UNKNOWN |
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8529 && check_for_opt_dict_arg(argvars, 2) == FAIL))) |
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8530 return; |
4d3c68196d05
patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents:
25254
diff
changeset
|
8531 |
17940
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8532 set_qf_ll_list(NULL, &argvars[0], &argvars[1], &argvars[2], rettv); |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8533 } |
079e10a49ea1
patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents:
17789
diff
changeset
|
8534 #endif |