annotate src/macros.h @ 24911:fd37be6dc258

Update runtime files Commit: https://github.com/vim/vim/commit/2346a6378483c9871016f9fc821ec5cbea638f13 Author: Bram Moolenaar <Bram@vim.org> Date: Sun Jun 13 19:02:49 2021 +0200 Update runtime files
author Bram Moolenaar <Bram@vim.org>
date Sun, 13 Jun 2021 19:15:03 +0200
parents 7334bf933510
children a8f526c9b172
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
10042
4aead6a9b7a9 commit https://github.com/vim/vim/commit/edf3f97ae2af024708ebb4ac614227327033ca47
Christian Brabandt <cb@256bit.org>
parents: 9925
diff changeset
1 /* vi:set ts=8 sts=4 sw=4 noet:
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3 * VIM - Vi IMproved by Bram Moolenaar
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5 * Do ":help uganda" in Vim to read copying and usage conditions.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6 * Do ":help credits" in Vim to see a list of people who contributed.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
7 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
8
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
9 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
10 * macros.h: macro definitions for often used code
11127
506f5d8b7d8b patch 8.0.0451: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 11121
diff changeset
11 *
506f5d8b7d8b patch 8.0.0451: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 11121
diff changeset
12 * Macros should be ALL_CAPS. An exception is for where a function is
506f5d8b7d8b patch 8.0.0451: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 11121
diff changeset
13 * replaced and an argument is not used more than once.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
14 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
15
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
16 /*
14216
12bdbf9f7e20 patch 8.1.0125: virtual edit replace with multi-byte fails at end of line
Christian Brabandt <cb@256bit.org>
parents: 13632
diff changeset
17 * PBYTE(lp, c) - put byte 'c' at position 'lp'
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
18 */
14216
12bdbf9f7e20 patch 8.1.0125: virtual edit replace with multi-byte fails at end of line
Christian Brabandt <cb@256bit.org>
parents: 13632
diff changeset
19 #define PBYTE(lp, c) (*(ml_get_buf(curbuf, (lp).lnum, TRUE) + (lp).col) = (c))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
20
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
21 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
22 * Position comparisons
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
23 */
15636
6f1c7e9a6393 patch 8.1.0826: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15605
diff changeset
24 #define LT_POS(a, b) (((a).lnum != (b).lnum) \
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
25 ? (a).lnum < (b).lnum \
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
26 : (a).col != (b).col \
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
27 ? (a).col < (b).col \
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
28 : (a).coladd < (b).coladd)
15636
6f1c7e9a6393 patch 8.1.0826: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15605
diff changeset
29 #define LT_POSP(a, b) (((a)->lnum != (b)->lnum) \
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
30 ? (a)->lnum < (b)->lnum \
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
31 : (a)->col != (b)->col \
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
32 ? (a)->col < (b)->col \
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
33 : (a)->coladd < (b)->coladd)
15636
6f1c7e9a6393 patch 8.1.0826: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15605
diff changeset
34 #define EQUAL_POS(a, b) (((a).lnum == (b).lnum) && ((a).col == (b).col) && ((a).coladd == (b).coladd))
16162
cd5c83115ec6 patch 8.1.1086: too many curly braces
Bram Moolenaar <Bram@vim.org>
parents: 16066
diff changeset
35 #define CLEAR_POS(a) do {(a)->lnum = 0; (a)->col = 0; (a)->coladd = 0;} while (0)
20647
8a2b86a39ef4 patch 8.2.0877: cannot get the search statistics
Bram Moolenaar <Bram@vim.org>
parents: 20392
diff changeset
36 #define EMPTY_POS(a) ((a).lnum == 0 && (a).col == 0 && (a).coladd == 0)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
37
11121
778c10516955 patch 8.0.0448: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 10344
diff changeset
38 #define LTOREQ_POS(a, b) (LT_POS(a, b) || EQUAL_POS(a, b))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
39
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
40 /*
20013
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines
Bram Moolenaar <Bram@vim.org>
parents: 19629
diff changeset
41 * VIM_ISWHITE() differs from isspace() because it doesn't include <CR> and
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines
Bram Moolenaar <Bram@vim.org>
parents: 19629
diff changeset
42 * <LF> and the like.
11129
f4ea50924c6d patch 8.0.0452: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 11127
diff changeset
43 */
20013
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines
Bram Moolenaar <Bram@vim.org>
parents: 19629
diff changeset
44 #define VIM_ISWHITE(x) ((x) == ' ' || (x) == '\t')
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines
Bram Moolenaar <Bram@vim.org>
parents: 19629
diff changeset
45 #define IS_WHITE_OR_NUL(x) ((x) == ' ' || (x) == '\t' || (x) == NUL)
11129
f4ea50924c6d patch 8.0.0452: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 11127
diff changeset
46
f4ea50924c6d patch 8.0.0452: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 11127
diff changeset
47 /*
11121
778c10516955 patch 8.0.0448: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 10344
diff changeset
48 * LINEEMPTY() - return TRUE if the line is empty
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
49 */
11121
778c10516955 patch 8.0.0448: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 10344
diff changeset
50 #define LINEEMPTY(p) (*ml_get(p) == NUL)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
51
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
52 /*
11121
778c10516955 patch 8.0.0448: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 10344
diff changeset
53 * BUFEMPTY() - return TRUE if the current buffer is empty
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
54 */
11121
778c10516955 patch 8.0.0448: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 10344
diff changeset
55 #define BUFEMPTY() (curbuf->b_ml.ml_line_count == 1 && *ml_get((linenr_T)1) == NUL)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
56
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
57 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
58 * toupper() and tolower() that use the current locale.
1365
79a23c19108a updated for version 7.1-079
vimboss
parents: 1199
diff changeset
59 * On some systems toupper()/tolower() only work on lower/uppercase
79a23c19108a updated for version 7.1-079
vimboss
parents: 1199
diff changeset
60 * characters, first use islower() or isupper() then.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
61 * Careful: Only call TOUPPER_LOC() and TOLOWER_LOC() with a character in the
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
62 * range 0 - 255. toupper()/tolower() on some systems can't handle others.
1365
79a23c19108a updated for version 7.1-079
vimboss
parents: 1199
diff changeset
63 * Note: It is often better to use MB_TOLOWER() and MB_TOUPPER(), because many
79a23c19108a updated for version 7.1-079
vimboss
parents: 1199
diff changeset
64 * toupper() and tolower() implementations only work for ASCII.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
65 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
66 #ifdef MSWIN
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
67 # define TOUPPER_LOC(c) toupper_tab[(c) & 255]
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
68 # define TOLOWER_LOC(c) tolower_tab[(c) & 255]
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
69 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
70 # ifdef BROKEN_TOUPPER
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
71 # define TOUPPER_LOC(c) (islower(c) ? toupper(c) : (c))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
72 # define TOLOWER_LOC(c) (isupper(c) ? tolower(c) : (c))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
73 # else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
74 # define TOUPPER_LOC toupper
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
75 # define TOLOWER_LOC tolower
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
76 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
77 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
78
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
79 // toupper() and tolower() for ASCII only and ignore the current locale.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
80 #ifdef EBCDIC
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
81 # define TOUPPER_ASC(c) (islower(c) ? toupper(c) : (c))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
82 # define TOLOWER_ASC(c) (isupper(c) ? tolower(c) : (c))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
83 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
84 # define TOUPPER_ASC(c) (((c) < 'a' || (c) > 'z') ? (c) : (c) - ('a' - 'A'))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
85 # define TOLOWER_ASC(c) (((c) < 'A' || (c) > 'Z') ? (c) : (c) + ('a' - 'A'))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
86 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
87
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
88 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
89 * MB_ISLOWER() and MB_ISUPPER() are to be used on multi-byte characters. But
492
81c06952fb1d updated for version 7.0135
vimboss
parents: 474
diff changeset
90 * don't use them for negative values!
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
91 */
15605
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15034
diff changeset
92 #define MB_ISLOWER(c) vim_islower(c)
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15034
diff changeset
93 #define MB_ISUPPER(c) vim_isupper(c)
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15034
diff changeset
94 #define MB_TOLOWER(c) vim_tolower(c)
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15034
diff changeset
95 #define MB_TOUPPER(c) vim_toupper(c)
20772
097f5b5c907b patch 8.2.0938: NFA regexp uses tolower ()to compare ignore-case
Bram Moolenaar <Bram@vim.org>
parents: 20647
diff changeset
96 #define MB_CASEFOLD(c) (enc_utf8 ? utf_fold(c) : MB_TOLOWER(c))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
97
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
98 // Use our own isdigit() replacement, because on MS-Windows isdigit() returns
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
99 // non-zero for superscript 1. Also avoids that isdigit() crashes for numbers
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
100 // below 0 and above 255.
4857
84a8d1ba81c3 updated for version 7.3.1175
Bram Moolenaar <bram@vim.org>
parents: 4849
diff changeset
101 #define VIM_ISDIGIT(c) ((unsigned)(c) - '0' < 10)
84a8d1ba81c3 updated for version 7.3.1175
Bram Moolenaar <bram@vim.org>
parents: 4849
diff changeset
102
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
103 // Like isalpha() but reject non-ASCII characters. Can't be used with a
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
104 // special key (negative value).
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
105 #ifdef EBCDIC
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
106 # define ASCII_ISALPHA(c) isalpha(c)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
107 # define ASCII_ISALNUM(c) isalnum(c)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
108 # define ASCII_ISLOWER(c) islower(c)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
109 # define ASCII_ISUPPER(c) isupper(c)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
110 #else
4849
fc7f985df537 updated for version 7.3.1171
Bram Moolenaar <bram@vim.org>
parents: 4805
diff changeset
111 # define ASCII_ISLOWER(c) ((unsigned)(c) - 'a' < 26)
fc7f985df537 updated for version 7.3.1171
Bram Moolenaar <bram@vim.org>
parents: 4805
diff changeset
112 # define ASCII_ISUPPER(c) ((unsigned)(c) - 'A' < 26)
4857
84a8d1ba81c3 updated for version 7.3.1175
Bram Moolenaar <bram@vim.org>
parents: 4849
diff changeset
113 # define ASCII_ISALPHA(c) (ASCII_ISUPPER(c) || ASCII_ISLOWER(c))
84a8d1ba81c3 updated for version 7.3.1175
Bram Moolenaar <bram@vim.org>
parents: 4849
diff changeset
114 # define ASCII_ISALNUM(c) (ASCII_ISALPHA(c) || VIM_ISDIGIT(c))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
115 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
116
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
117 // Returns empty string if it is NULL.
8247
6ee794dc950e commit https://github.com/vim/vim/commit/669cac0a805333e69b9e1176425083914eada659
Christian Brabandt <cb@256bit.org>
parents: 8212
diff changeset
118 #define EMPTY_IF_NULL(x) ((x) ? (x) : (char_u *)"")
6909
676906c33768 patch 7.4.774
Bram Moolenaar <bram@vim.org>
parents: 6339
diff changeset
119
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
120 #ifdef FEAT_LANGMAP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
121 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
122 * Adjust chars in a language according to 'langmap' option.
1811
d88bdbabfbc6 updated for version 7.2-109
vimboss
parents: 1365
diff changeset
123 * NOTE that there is no noticeable overhead if 'langmap' is not set.
d88bdbabfbc6 updated for version 7.2-109
vimboss
parents: 1365
diff changeset
124 * When set the overhead for characters < 256 is small.
6339
7b28dc1d756e updated for version 7.4.502
Bram Moolenaar <bram@vim.org>
parents: 5905
diff changeset
125 * Don't apply 'langmap' if the character comes from the Stuff buffer or from
7b28dc1d756e updated for version 7.4.502
Bram Moolenaar <bram@vim.org>
parents: 5905
diff changeset
126 * a mapping and the langnoremap option was set.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
127 * The do-while is just to ignore a ';' after the macro.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
128 */
15605
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15034
diff changeset
129 # define LANGMAP_ADJUST(c, condition) \
1811
d88bdbabfbc6 updated for version 7.2-109
vimboss
parents: 1365
diff changeset
130 do { \
6339
7b28dc1d756e updated for version 7.4.502
Bram Moolenaar <bram@vim.org>
parents: 5905
diff changeset
131 if (*p_langmap \
7b28dc1d756e updated for version 7.4.502
Bram Moolenaar <bram@vim.org>
parents: 5905
diff changeset
132 && (condition) \
9925
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb
Christian Brabandt <cb@256bit.org>
parents: 9898
diff changeset
133 && (p_lrm || (!p_lrm && KeyTyped)) \
6339
7b28dc1d756e updated for version 7.4.502
Bram Moolenaar <bram@vim.org>
parents: 5905
diff changeset
134 && !KeyStuffed \
7b28dc1d756e updated for version 7.4.502
Bram Moolenaar <bram@vim.org>
parents: 5905
diff changeset
135 && (c) >= 0) \
1811
d88bdbabfbc6 updated for version 7.2-109
vimboss
parents: 1365
diff changeset
136 { \
d88bdbabfbc6 updated for version 7.2-109
vimboss
parents: 1365
diff changeset
137 if ((c) < 256) \
d88bdbabfbc6 updated for version 7.2-109
vimboss
parents: 1365
diff changeset
138 c = langmap_mapchar[c]; \
d88bdbabfbc6 updated for version 7.2-109
vimboss
parents: 1365
diff changeset
139 else \
d88bdbabfbc6 updated for version 7.2-109
vimboss
parents: 1365
diff changeset
140 c = langmap_adjust_mb(c); \
d88bdbabfbc6 updated for version 7.2-109
vimboss
parents: 1365
diff changeset
141 } \
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
142 } while (0)
1811
d88bdbabfbc6 updated for version 7.2-109
vimboss
parents: 1365
diff changeset
143 #else
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
144 # define LANGMAP_ADJUST(c, condition) // nop
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
145 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
146
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
147 /*
11127
506f5d8b7d8b patch 8.0.0451: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 11121
diff changeset
148 * VIM_ISBREAK() is used very often if 'linebreak' is set, use a macro to make
506f5d8b7d8b patch 8.0.0451: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 11121
diff changeset
149 * it work fast. Only works for single byte characters!
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
150 */
11127
506f5d8b7d8b patch 8.0.0451: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 11121
diff changeset
151 #define VIM_ISBREAK(c) ((c) < 256 && breakat_flags[(char_u)(c)])
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
152
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
153 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
154 * On VMS file names are different and require a translation.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
155 * On the Mac open() has only two arguments.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
156 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
157 #ifdef VMS
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
158 # define mch_access(n, p) access(vms_fixfilename(n), (p))
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
159 // see mch_open() comment
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
160 # define mch_fopen(n, p) fopen(vms_fixfilename(n), (p))
23408
bdda90ed5f6c patch 8.2.2247: VMS: various smaller problems
Bram Moolenaar <Bram@vim.org>
parents: 21640
diff changeset
161 # define mch_fstat(n, p) fstat((n), (p))
bdda90ed5f6c patch 8.2.2247: VMS: various smaller problems
Bram Moolenaar <Bram@vim.org>
parents: 21640
diff changeset
162 # undef HAVE_LSTAT // VMS does not have lstat()
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
163 # define mch_stat(n, p) stat(vms_fixfilename(n), (p))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
164 #else
15868
7fad90423bd2 patch 8.1.0941: macros for MS-Windows are inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
165 # ifndef MSWIN
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
166 # define mch_access(n, p) access((n), (p))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
167 # endif
21640
e7801d132dcb patch 8.2.1370: MS-Windows: warning for using fstat() with stat_T
Bram Moolenaar <Bram@vim.org>
parents: 20772
diff changeset
168
e7801d132dcb patch 8.2.1370: MS-Windows: warning for using fstat() with stat_T
Bram Moolenaar <Bram@vim.org>
parents: 20772
diff changeset
169 // Use 64-bit fstat function if available.
e7801d132dcb patch 8.2.1370: MS-Windows: warning for using fstat() with stat_T
Bram Moolenaar <Bram@vim.org>
parents: 20772
diff changeset
170 // NOTE: This condition is the same as for the stat_T type.
e7801d132dcb patch 8.2.1370: MS-Windows: warning for using fstat() with stat_T
Bram Moolenaar <Bram@vim.org>
parents: 20772
diff changeset
171 # if (defined(_MSC_VER) && (_MSC_VER >= 1300)) || defined(__MINGW32__)
e7801d132dcb patch 8.2.1370: MS-Windows: warning for using fstat() with stat_T
Bram Moolenaar <Bram@vim.org>
parents: 20772
diff changeset
172 # define mch_fstat(n, p) _fstat64((n), (p))
e7801d132dcb patch 8.2.1370: MS-Windows: warning for using fstat() with stat_T
Bram Moolenaar <Bram@vim.org>
parents: 20772
diff changeset
173 # else
e7801d132dcb patch 8.2.1370: MS-Windows: warning for using fstat() with stat_T
Bram Moolenaar <Bram@vim.org>
parents: 20772
diff changeset
174 # define mch_fstat(n, p) fstat((n), (p))
e7801d132dcb patch 8.2.1370: MS-Windows: warning for using fstat() with stat_T
Bram Moolenaar <Bram@vim.org>
parents: 20772
diff changeset
175 # endif
e7801d132dcb patch 8.2.1370: MS-Windows: warning for using fstat() with stat_T
Bram Moolenaar <Bram@vim.org>
parents: 20772
diff changeset
176
15868
7fad90423bd2 patch 8.1.0941: macros for MS-Windows are inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
177 # ifdef MSWIN // has its own mch_stat() function
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
178 # define mch_stat(n, p) vim_stat((n), (p))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
179 # else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
180 # ifdef STAT_IGNORES_SLASH
11127
506f5d8b7d8b patch 8.0.0451: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 11121
diff changeset
181 # define mch_stat(n, p) vim_stat((n), (p))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
182 # else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
183 # define mch_stat(n, p) stat((n), (p))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
184 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
185 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
186 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
187
21
db5102f7e29f updated for version 7.0013
vimboss
parents: 13
diff changeset
188 #ifdef HAVE_LSTAT
db5102f7e29f updated for version 7.0013
vimboss
parents: 13
diff changeset
189 # define mch_lstat(n, p) lstat((n), (p))
db5102f7e29f updated for version 7.0013
vimboss
parents: 13
diff changeset
190 #else
db5102f7e29f updated for version 7.0013
vimboss
parents: 13
diff changeset
191 # define mch_lstat(n, p) mch_stat((n), (p))
db5102f7e29f updated for version 7.0013
vimboss
parents: 13
diff changeset
192 #endif
db5102f7e29f updated for version 7.0013
vimboss
parents: 13
diff changeset
193
12716
351cf7c67bbe patch 8.0.1236: Mac features are confusing
Christian Brabandt <cb@256bit.org>
parents: 11921
diff changeset
194 #ifdef VMS
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
195 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
196 * It is possible to force some record format with:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
197 * # define mch_open(n, m, p) open(vms_fixfilename(n), (m), (p)), "rat=cr", "rfm=stmlf", "mrs=0")
1199
3acf7c922a04 updated for version 7.1b
vimboss
parents: 961
diff changeset
198 * but it is not recommended, because it can destroy indexes etc.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
199 */
12716
351cf7c67bbe patch 8.0.1236: Mac features are confusing
Christian Brabandt <cb@256bit.org>
parents: 11921
diff changeset
200 # define mch_open(n, m, p) open(vms_fixfilename(n), (m), (p))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
201 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
202
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
203 // mch_open_rw(): invoke mch_open() with third argument for user R/W.
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
204 #if defined(UNIX) || defined(VMS) // open in rw------- mode
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
205 # define mch_open_rw(n, f) mch_open((n), (f), (mode_t)0600)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
206 #else
15868
7fad90423bd2 patch 8.1.0941: macros for MS-Windows are inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
207 # if defined(MSWIN) // open read/write
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
208 # define mch_open_rw(n, f) mch_open((n), (f), S_IREAD | S_IWRITE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
209 # else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
210 # define mch_open_rw(n, f) mch_open((n), (f), 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
211 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
212 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
213
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
214 #ifdef STARTUPTIME
13632
cec5137d5332 patch 8.0.1688: some macros are used without a semicolon
Christian Brabandt <cb@256bit.org>
parents: 13384
diff changeset
215 # define TIME_MSG(s) do { if (time_fd != NULL) time_msg(s, NULL); } while (0)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
216 #else
13632
cec5137d5332 patch 8.0.1688: some macros are used without a semicolon
Christian Brabandt <cb@256bit.org>
parents: 13384
diff changeset
217 # define TIME_MSG(s) do { /**/ } while (0)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
218 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
219
14424
0a69e6e708f9 patch 8.1.0226: too many #ifdefs
Christian Brabandt <cb@256bit.org>
parents: 14216
diff changeset
220 #define REPLACE_NORMAL(s) (((s) & REPLACE_FLAG) && !((s) & VREPLACE_FLAG))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
221
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
222 #ifdef FEAT_ARABIC
16066
473fbdb2717c patch 8.1.1038: Arabic support excludes Farsi
Bram Moolenaar <Bram@vim.org>
parents: 15868
diff changeset
223 # define ARABIC_CHAR(ch) (((ch) & 0xFF00) == 0x0600)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
224 # define UTF_COMPOSINGLIKE(p1, p2) utf_composinglike((p1), (p2))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
225 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
226 # define UTF_COMPOSINGLIKE(p1, p2) utf_iscomposing(utf_ptr2char(p2))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
227 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
228
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
229 #ifdef FEAT_RIGHTLEFT
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
230 // Whether to draw the vertical bar on the right side of the cell.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
231 # define CURSOR_BAR_RIGHT (curwin->w_p_rl && (!(State & CMDLINE) || cmdmsg_rl))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
232 #endif
13
24d5189d3956 updated for version 7.0005
vimboss
parents: 7
diff changeset
233
39
410fa1a31baf updated for version 7.0023
vimboss
parents: 21
diff changeset
234 /*
11127
506f5d8b7d8b patch 8.0.0451: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 11121
diff changeset
235 * MB_PTR_ADV(): advance a pointer to the next character, taking care of
39
410fa1a31baf updated for version 7.0023
vimboss
parents: 21
diff changeset
236 * multi-byte characters if needed.
11127
506f5d8b7d8b patch 8.0.0451: some macros are in lower case
Christian Brabandt <cb@256bit.org>
parents: 11121
diff changeset
237 * MB_PTR_BACK(): backup a pointer to the previous character, taking care of
39
410fa1a31baf updated for version 7.0023
vimboss
parents: 21
diff changeset
238 * multi-byte characters if needed.
98
98435a8ddb09 updated for version 7.0038
vimboss
parents: 39
diff changeset
239 * MB_COPY_CHAR(f, t): copy one char from "f" to "t" and advance the pointers.
456
c4d200412ae9 updated for version 7.0121
vimboss
parents: 377
diff changeset
240 * PTR2CHAR(): get character from pointer.
39
410fa1a31baf updated for version 7.0023
vimboss
parents: 21
diff changeset
241 */
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
242 // Advance multi-byte pointer, skip over composing chars.
18251
c8a53c0daeed patch 8.1.2120: some MB_ macros are more complicated than necessary
Bram Moolenaar <Bram@vim.org>
parents: 18249
diff changeset
243 #define MB_PTR_ADV(p) p += (*mb_ptr2len)(p)
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
244 // Advance multi-byte pointer, do not skip over composing chars.
18251
c8a53c0daeed patch 8.1.2120: some MB_ macros are more complicated than necessary
Bram Moolenaar <Bram@vim.org>
parents: 18249
diff changeset
245 #define MB_CPTR_ADV(p) p += enc_utf8 ? utf_ptr2len(p) : (*mb_ptr2len)(p)
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
246 // Backup multi-byte pointer. Only use with "p" > "s" !
15605
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15034
diff changeset
247 #define MB_PTR_BACK(s, p) p -= has_mbyte ? ((*mb_head_off)(s, p - 1) + 1) : 1
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
248 // get length of multi-byte char, not including composing chars
15605
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15034
diff changeset
249 #define MB_CPTR2LEN(p) (enc_utf8 ? utf_ptr2len(p) : (*mb_ptr2len)(p))
474
a5fcf36ef512 updated for version 7.0127
vimboss
parents: 456
diff changeset
250
16162
cd5c83115ec6 patch 8.1.1086: too many curly braces
Bram Moolenaar <Bram@vim.org>
parents: 16066
diff changeset
251 #define MB_COPY_CHAR(f, t) do { if (has_mbyte) mb_copy_char(&f, &t); else *t++ = *f++; } while (0)
15605
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15034
diff changeset
252 #define MB_CHARLEN(p) (has_mbyte ? mb_charlen(p) : (int)STRLEN(p))
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15034
diff changeset
253 #define MB_CHAR2LEN(c) (has_mbyte ? mb_char2len(c) : 1)
62b3805506b3 patch 8.1.0810: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15034
diff changeset
254 #define PTR2CHAR(p) (has_mbyte ? mb_ptr2char(p) : (int)*(p))
24055
90d1636a8fcb patch 8.2.2569: 'fillchars' "stl" and "stlnc" items must be single byte
Bram Moolenaar <Bram@vim.org>
parents: 24043
diff changeset
255 #define MB_CHAR2BYTES(c, b) do { if (has_mbyte) (b) += (*mb_char2bytes)((c), (b)); else *(b)++ = (c); } while(0)
961
c06c658691e2 updated for version 7.0-087
vimboss
parents: 698
diff changeset
256
c06c658691e2 updated for version 7.0-087
vimboss
parents: 698
diff changeset
257 #ifdef FEAT_AUTOCHDIR
13632
cec5137d5332 patch 8.0.1688: some macros are used without a semicolon
Christian Brabandt <cb@256bit.org>
parents: 13384
diff changeset
258 # define DO_AUTOCHDIR do { if (p_acd) do_autochdir(); } while (0)
961
c06c658691e2 updated for version 7.0-087
vimboss
parents: 698
diff changeset
259 #else
13632
cec5137d5332 patch 8.0.1688: some macros are used without a semicolon
Christian Brabandt <cb@256bit.org>
parents: 13384
diff changeset
260 # define DO_AUTOCHDIR do { /**/ } while (0)
961
c06c658691e2 updated for version 7.0-087
vimboss
parents: 698
diff changeset
261 #endif
2583
7c2e6ba1d702 updated for version 7.3.008
Bram Moolenaar <bram@vim.org>
parents: 2330
diff changeset
262
16162
cd5c83115ec6 patch 8.1.1086: too many curly braces
Bram Moolenaar <Bram@vim.org>
parents: 16066
diff changeset
263 #define RESET_BINDING(wp) do { (wp)->w_p_scb = FALSE; (wp)->w_p_crb = FALSE; \
cd5c83115ec6 patch 8.1.1086: too many curly braces
Bram Moolenaar <Bram@vim.org>
parents: 16066
diff changeset
264 } while (0)
7103
84d318257a45 commit https://github.com/vim/vim/commit/43335ea394fe247132b9701c55cccf51e6c36425
Christian Brabandt <cb@256bit.org>
parents: 6909
diff changeset
265
84d318257a45 commit https://github.com/vim/vim/commit/43335ea394fe247132b9701c55cccf51e6c36425
Christian Brabandt <cb@256bit.org>
parents: 6909
diff changeset
266 #ifdef FEAT_DIFF
84d318257a45 commit https://github.com/vim/vim/commit/43335ea394fe247132b9701c55cccf51e6c36425
Christian Brabandt <cb@256bit.org>
parents: 6909
diff changeset
267 # define PLINES_NOFILL(x) plines_nofill(x)
84d318257a45 commit https://github.com/vim/vim/commit/43335ea394fe247132b9701c55cccf51e6c36425
Christian Brabandt <cb@256bit.org>
parents: 6909
diff changeset
268 #else
84d318257a45 commit https://github.com/vim/vim/commit/43335ea394fe247132b9701c55cccf51e6c36425
Christian Brabandt <cb@256bit.org>
parents: 6909
diff changeset
269 # define PLINES_NOFILL(x) plines(x)
84d318257a45 commit https://github.com/vim/vim/commit/43335ea394fe247132b9701c55cccf51e6c36425
Christian Brabandt <cb@256bit.org>
parents: 6909
diff changeset
270 #endif
7109
fa95595fbc52 commit https://github.com/vim/vim/commit/93c88e0f6a4a8f7634ed84721daf4af46fc0d5db
Christian Brabandt <cb@256bit.org>
parents: 7103
diff changeset
271
8493
caed4b2d305f commit https://github.com/vim/vim/commit/509ce2a558e7e0c03242e32e844255af52f1c821
Christian Brabandt <cb@256bit.org>
parents: 8395
diff changeset
272 #if defined(FEAT_JOB_CHANNEL) || defined(FEAT_CLIENTSERVER)
7109
fa95595fbc52 commit https://github.com/vim/vim/commit/93c88e0f6a4a8f7634ed84721daf4af46fc0d5db
Christian Brabandt <cb@256bit.org>
parents: 7103
diff changeset
273 # define MESSAGE_QUEUE
fa95595fbc52 commit https://github.com/vim/vim/commit/93c88e0f6a4a8f7634ed84721daf4af46fc0d5db
Christian Brabandt <cb@256bit.org>
parents: 7103
diff changeset
274 #endif
8289
6ae3fb4fe7c1 commit https://github.com/vim/vim/commit/136f29a91dbafce424e31a4af133155f997e8f78
Christian Brabandt <cb@256bit.org>
parents: 8247
diff changeset
275
6ae3fb4fe7c1 commit https://github.com/vim/vim/commit/136f29a91dbafce424e31a4af133155f997e8f78
Christian Brabandt <cb@256bit.org>
parents: 8247
diff changeset
276 #if defined(FEAT_EVAL) && defined(FEAT_FLOAT)
6ae3fb4fe7c1 commit https://github.com/vim/vim/commit/136f29a91dbafce424e31a4af133155f997e8f78
Christian Brabandt <cb@256bit.org>
parents: 8247
diff changeset
277 # include <float.h>
6ae3fb4fe7c1 commit https://github.com/vim/vim/commit/136f29a91dbafce424e31a4af133155f997e8f78
Christian Brabandt <cb@256bit.org>
parents: 8247
diff changeset
278 # if defined(HAVE_MATH_H)
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
279 // for isnan() and isinf()
8289
6ae3fb4fe7c1 commit https://github.com/vim/vim/commit/136f29a91dbafce424e31a4af133155f997e8f78
Christian Brabandt <cb@256bit.org>
parents: 8247
diff changeset
280 # include <math.h>
6ae3fb4fe7c1 commit https://github.com/vim/vim/commit/136f29a91dbafce424e31a4af133155f997e8f78
Christian Brabandt <cb@256bit.org>
parents: 8247
diff changeset
281 # endif
8295
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
282 # ifdef USING_FLOAT_STUFF
15868
7fad90423bd2 patch 8.1.0941: macros for MS-Windows are inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 15636
diff changeset
283 # ifdef MSWIN
8295
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
284 # ifndef isnan
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
285 # define isnan(x) _isnan(x)
8395
8137d5b642f3 commit https://github.com/vim/vim/commit/0c171716c0430458741fbf18a6fd4baea4c0390b
Christian Brabandt <cb@256bit.org>
parents: 8390
diff changeset
286 static __inline int isinf(double x) { return !_finite(x) && !_isnan(x); }
8295
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
287 # endif
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
288 # else
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
289 # ifndef HAVE_ISNAN
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
290 static inline int isnan(double x) { return x != x; }
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
291 # endif
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
292 # ifndef HAVE_ISINF
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
293 static inline int isinf(double x) { return !isnan(x) && isnan(x - x); }
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
294 # endif
8289
6ae3fb4fe7c1 commit https://github.com/vim/vim/commit/136f29a91dbafce424e31a4af133155f997e8f78
Christian Brabandt <cb@256bit.org>
parents: 8247
diff changeset
295 # endif
8295
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
296 # if !defined(INFINITY)
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
297 # if defined(DBL_MAX)
10344
e70ff5756201 commit https://github.com/vim/vim/commit/98500fdc6119eb5f02d7a52ab6ffcac3085181be
Christian Brabandt <cb@256bit.org>
parents: 10328
diff changeset
298 # ifdef VMS
e70ff5756201 commit https://github.com/vim/vim/commit/98500fdc6119eb5f02d7a52ab6ffcac3085181be
Christian Brabandt <cb@256bit.org>
parents: 10328
diff changeset
299 # define INFINITY DBL_MAX
e70ff5756201 commit https://github.com/vim/vim/commit/98500fdc6119eb5f02d7a52ab6ffcac3085181be
Christian Brabandt <cb@256bit.org>
parents: 10328
diff changeset
300 # else
e70ff5756201 commit https://github.com/vim/vim/commit/98500fdc6119eb5f02d7a52ab6ffcac3085181be
Christian Brabandt <cb@256bit.org>
parents: 10328
diff changeset
301 # define INFINITY (DBL_MAX+DBL_MAX)
e70ff5756201 commit https://github.com/vim/vim/commit/98500fdc6119eb5f02d7a52ab6ffcac3085181be
Christian Brabandt <cb@256bit.org>
parents: 10328
diff changeset
302 # endif
8295
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
303 # else
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
304 # define INFINITY (1.0 / 0.0)
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
305 # endif
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
306 # endif
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
307 # if !defined(NAN)
18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8
Christian Brabandt <cb@256bit.org>
parents: 8289
diff changeset
308 # define NAN (INFINITY-INFINITY)
8289
6ae3fb4fe7c1 commit https://github.com/vim/vim/commit/136f29a91dbafce424e31a4af133155f997e8f78
Christian Brabandt <cb@256bit.org>
parents: 8247
diff changeset
309 # endif
11461
5be73ebf6a15 patch 8.0.0614: float2nr() is not exactly right
Christian Brabandt <cb@256bit.org>
parents: 11129
diff changeset
310 # if !defined(DBL_EPSILON)
5be73ebf6a15 patch 8.0.0614: float2nr() is not exactly right
Christian Brabandt <cb@256bit.org>
parents: 11129
diff changeset
311 # define DBL_EPSILON 2.2204460492503131e-16
5be73ebf6a15 patch 8.0.0614: float2nr() is not exactly right
Christian Brabandt <cb@256bit.org>
parents: 11129
diff changeset
312 # endif
8289
6ae3fb4fe7c1 commit https://github.com/vim/vim/commit/136f29a91dbafce424e31a4af133155f997e8f78
Christian Brabandt <cb@256bit.org>
parents: 8247
diff changeset
313 # endif
6ae3fb4fe7c1 commit https://github.com/vim/vim/commit/136f29a91dbafce424e31a4af133155f997e8f78
Christian Brabandt <cb@256bit.org>
parents: 8247
diff changeset
314 #endif
9570
695186e11daa commit https://github.com/vim/vim/commit/840268400dc8fda62a14f8a084e8b1ea46619454
Christian Brabandt <cb@256bit.org>
parents: 8493
diff changeset
315
19181
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
316 #ifdef FEAT_EVAL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
317 # define FUNCARG(fp, j) ((char_u **)(fp->uf_args.ga_data))[j]
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
318 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
319
9570
695186e11daa commit https://github.com/vim/vim/commit/840268400dc8fda62a14f8a084e8b1ea46619454
Christian Brabandt <cb@256bit.org>
parents: 8493
diff changeset
320 /*
695186e11daa commit https://github.com/vim/vim/commit/840268400dc8fda62a14f8a084e8b1ea46619454
Christian Brabandt <cb@256bit.org>
parents: 8493
diff changeset
321 * In a hashtab item "hi_key" points to "di_key" in a dictitem.
695186e11daa commit https://github.com/vim/vim/commit/840268400dc8fda62a14f8a084e8b1ea46619454
Christian Brabandt <cb@256bit.org>
parents: 8493
diff changeset
322 * This avoids adding a pointer to the hashtab item.
695186e11daa commit https://github.com/vim/vim/commit/840268400dc8fda62a14f8a084e8b1ea46619454
Christian Brabandt <cb@256bit.org>
parents: 8493
diff changeset
323 * DI2HIKEY() converts a dictitem pointer to a hashitem key pointer.
695186e11daa commit https://github.com/vim/vim/commit/840268400dc8fda62a14f8a084e8b1ea46619454
Christian Brabandt <cb@256bit.org>
parents: 8493
diff changeset
324 * HIKEY2DI() converts a hashitem key pointer to a dictitem pointer.
695186e11daa commit https://github.com/vim/vim/commit/840268400dc8fda62a14f8a084e8b1ea46619454
Christian Brabandt <cb@256bit.org>
parents: 8493
diff changeset
325 * HI2DI() converts a hashitem pointer to a dictitem pointer.
695186e11daa commit https://github.com/vim/vim/commit/840268400dc8fda62a14f8a084e8b1ea46619454
Christian Brabandt <cb@256bit.org>
parents: 8493
diff changeset
326 */
13150
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
327 #define DI2HIKEY(di) ((di)->di_key)
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
328 #define HIKEY2DI(p) ((dictitem_T *)(p - offsetof(dictitem_T, di_key)))
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
329 #define HI2DI(hi) HIKEY2DI((hi)->hi_key)
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
330
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
331 /*
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
332 * Flush control functions.
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
333 */
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
334 #ifdef FEAT_GUI
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
335 # define mch_enable_flush() gui_enable_flush()
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
336 # define mch_disable_flush() gui_disable_flush()
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
337 #else
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
338 # define mch_enable_flush()
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
339 # define mch_disable_flush()
808625d4b71b patch 8.0.1449: slow redrawing with DirectX
Christian Brabandt <cb@256bit.org>
parents: 12716
diff changeset
340 #endif
13244
ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents: 13150
diff changeset
341
ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents: 13150
diff changeset
342 /*
ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents: 13150
diff changeset
343 * Like vim_free(), and also set the pointer to NULL.
ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents: 13150
diff changeset
344 */
ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents: 13150
diff changeset
345 #define VIM_CLEAR(p) \
ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents: 13150
diff changeset
346 do { \
ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents: 13150
diff changeset
347 if ((p) != NULL) { \
ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents: 13150
diff changeset
348 vim_free(p); \
ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents: 13150
diff changeset
349 (p) = NULL; \
ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents: 13150
diff changeset
350 } \
ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents: 13150
diff changeset
351 } while (0)
16411
5b5c5daf57de patch 8.1.1210: support for user commands is spread out
Bram Moolenaar <Bram@vim.org>
parents: 16162
diff changeset
352
18753
6e3dc2d630c2 patch 8.1.2366: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
353 // Whether a command index indicates a user command.
16411
5b5c5daf57de patch 8.1.1210: support for user commands is spread out
Bram Moolenaar <Bram@vim.org>
parents: 16162
diff changeset
354 #define IS_USER_CMDIDX(idx) ((int)(idx) < 0)
16874
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 16411
diff changeset
355
17111
af861fccc309 patch 8.1.1555: NOT_IN_POPUP_WINDOW is confusing
Bram Moolenaar <Bram@vim.org>
parents: 16874
diff changeset
356 // Give an error in curwin is a popup window and evaluate to TRUE.
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18753
diff changeset
357 #ifdef FEAT_PROP_POPUP
19542
9e428147e4ee patch 8.2.0328: no redraw when leaving term-normal mode in popup terminal
Bram Moolenaar <Bram@vim.org>
parents: 19271
diff changeset
358 # define WIN_IS_POPUP(wp) ((wp)->w_popup_flags != 0)
19271
ebeeb4b4a1fa patch 8.2.0194: some commands can cause problems in terminal popup
Bram Moolenaar <Bram@vim.org>
parents: 19269
diff changeset
359 # define ERROR_IF_POPUP_WINDOW error_if_popup_window(FALSE)
ebeeb4b4a1fa patch 8.2.0194: some commands can cause problems in terminal popup
Bram Moolenaar <Bram@vim.org>
parents: 19269
diff changeset
360 # define ERROR_IF_ANY_POPUP_WINDOW error_if_popup_window(TRUE)
19269
a8a915898b35 patch 8.2.0193: still build failure without +terminal feature
Bram Moolenaar <Bram@vim.org>
parents: 19265
diff changeset
361 #else
19542
9e428147e4ee patch 8.2.0328: no redraw when leaving term-normal mode in popup terminal
Bram Moolenaar <Bram@vim.org>
parents: 19271
diff changeset
362 # define WIN_IS_POPUP(wp) 0
19269
a8a915898b35 patch 8.2.0193: still build failure without +terminal feature
Bram Moolenaar <Bram@vim.org>
parents: 19265
diff changeset
363 # define ERROR_IF_POPUP_WINDOW 0
19271
ebeeb4b4a1fa patch 8.2.0194: some commands can cause problems in terminal popup
Bram Moolenaar <Bram@vim.org>
parents: 19269
diff changeset
364 # define ERROR_IF_ANY_POPUP_WINDOW 0
19269
a8a915898b35 patch 8.2.0193: still build failure without +terminal feature
Bram Moolenaar <Bram@vim.org>
parents: 19265
diff changeset
365 #endif
a8a915898b35 patch 8.2.0193: still build failure without +terminal feature
Bram Moolenaar <Bram@vim.org>
parents: 19265
diff changeset
366 #if defined(FEAT_PROP_POPUP) && defined(FEAT_TERMINAL)
19265
ce8c47ed54e5 patch 8.2.0191: cannot put a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19181
diff changeset
367 # define ERROR_IF_TERM_POPUP_WINDOW error_if_term_popup_window()
16874
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 16411
diff changeset
368 #else
19265
ce8c47ed54e5 patch 8.2.0191: cannot put a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19181
diff changeset
369 # define ERROR_IF_TERM_POPUP_WINDOW 0
16874
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 16411
diff changeset
370 #endif
19075
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
371
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
372
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
373 #ifdef ABORT_ON_INTERNAL_ERROR
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
374 # define ESTACK_CHECK_DECLARATION int estack_len_before;
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
375 # define ESTACK_CHECK_SETUP estack_len_before = exestack.ga_len;
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
376 # define ESTACK_CHECK_NOW if (estack_len_before != exestack.ga_len) \
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
377 siemsg("Exestack length expected: %d, actual: %d", estack_len_before, exestack.ga_len);
19629
804322d6c6ba patch 8.2.0371: crash with combination of terminal popup and autocmd
Bram Moolenaar <Bram@vim.org>
parents: 19542
diff changeset
378 # define CHECK_CURBUF if (curwin != NULL && curwin->w_buffer != curbuf) \
804322d6c6ba patch 8.2.0371: crash with combination of terminal popup and autocmd
Bram Moolenaar <Bram@vim.org>
parents: 19542
diff changeset
379 iemsg("curbuf != curwin->w_buffer")
19075
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
380 #else
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
381 # define ESTACK_CHECK_DECLARATION
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
382 # define ESTACK_CHECK_SETUP
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
383 # define ESTACK_CHECK_NOW
19629
804322d6c6ba patch 8.2.0371: crash with combination of terminal popup and autocmd
Bram Moolenaar <Bram@vim.org>
parents: 19542
diff changeset
384 # define CHECK_CURBUF
19075
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
385 #endif
20392
4c317d8c1051 patch 8.2.0751: Vim9: performance can be improved
Bram Moolenaar <Bram@vim.org>
parents: 20013
diff changeset
386
4c317d8c1051 patch 8.2.0751: Vim9: performance can be improved
Bram Moolenaar <Bram@vim.org>
parents: 20013
diff changeset
387 // Inline the condition for performance.
4c317d8c1051 patch 8.2.0751: Vim9: performance can be improved
Bram Moolenaar <Bram@vim.org>
parents: 20013
diff changeset
388 #define CHECK_LIST_MATERIALIZE(l) if ((l)->lv_first == &range_list_item) range_list_materialize(l)
4c317d8c1051 patch 8.2.0751: Vim9: performance can be improved
Bram Moolenaar <Bram@vim.org>
parents: 20013
diff changeset
389
4c317d8c1051 patch 8.2.0751: Vim9: performance can be improved
Bram Moolenaar <Bram@vim.org>
parents: 20013
diff changeset
390 // Inlined version of ga_grow(). Especially useful if "n" is a constant.
4c317d8c1051 patch 8.2.0751: Vim9: performance can be improved
Bram Moolenaar <Bram@vim.org>
parents: 20013
diff changeset
391 #define GA_GROW(gap, n) (((gap)->ga_maxlen - (gap)->ga_len < n) ? ga_grow_inner((gap), (n)) : OK)
24043
15408ab5fed7 patch 8.2.2563: cannot use multibyte characters for folding in 'fillchars'
Bram Moolenaar <Bram@vim.org>
parents: 23503
diff changeset
392
15408ab5fed7 patch 8.2.2563: cannot use multibyte characters for folding in 'fillchars'
Bram Moolenaar <Bram@vim.org>
parents: 23503
diff changeset
393 #ifndef MIN
15408ab5fed7 patch 8.2.2563: cannot use multibyte characters for folding in 'fillchars'
Bram Moolenaar <Bram@vim.org>
parents: 23503
diff changeset
394 # define MIN(a, b) ((a) < (b) ? (a) : (b))
15408ab5fed7 patch 8.2.2563: cannot use multibyte characters for folding in 'fillchars'
Bram Moolenaar <Bram@vim.org>
parents: 23503
diff changeset
395 #endif
15408ab5fed7 patch 8.2.2563: cannot use multibyte characters for folding in 'fillchars'
Bram Moolenaar <Bram@vim.org>
parents: 23503
diff changeset
396 #ifndef MAX
15408ab5fed7 patch 8.2.2563: cannot use multibyte characters for folding in 'fillchars'
Bram Moolenaar <Bram@vim.org>
parents: 23503
diff changeset
397 # define MAX(a, b) ((a) > (b) ? (a) : (b))
15408ab5fed7 patch 8.2.2563: cannot use multibyte characters for folding in 'fillchars'
Bram Moolenaar <Bram@vim.org>
parents: 23503
diff changeset
398 #endif
24768
7334bf933510 patch 8.2.2922: computing array length is done in various ways
Bram Moolenaar <Bram@vim.org>
parents: 24055
diff changeset
399
7334bf933510 patch 8.2.2922: computing array length is done in various ways
Bram Moolenaar <Bram@vim.org>
parents: 24055
diff changeset
400 // Length of the array.
7334bf933510 patch 8.2.2922: computing array length is done in various ways
Bram Moolenaar <Bram@vim.org>
parents: 24055
diff changeset
401 #define ARRAY_LENGTH(a) (sizeof(a) / sizeof((a)[0]))