vim: src/eval.c annotate

annotate src/eval.c @ 26480:cf986610be6a v8.2.3770

patch 8.2.3770: new compiler warnings from clang-12 and clang-13 Commit: https://github.com/vim/vim/commit/dee78e1ce857985c06ff18e20daeadfe1622b8ae Author: ichizok <gclient.gaap@gmail.com> Date: Thu Dec 9 21:08:01 2021 +0000 patch 8.2.3770: new compiler warnings from clang-12 and clang-13 Problem: New compiler warnings from clang-12 and clang-13. Solution: Adjust CI and suppress some warnings. (Ozaki Kiichi, closes https://github.com/vim/vim/issues/9314)

author	Bram Moolenaar <Bram@vim.org>
date	Thu, 09 Dec 2021 22:15:03 +0100
parents	9c84f7c6082d
children	4a1d2abc2016

rev	line source
10042 4aead6a9b7a9 commit https://github.com/vim/vim/commit/edf3f97ae2af024708ebb4ac614227327033ca47 Christian Brabandt <cb@256bit.org> parents: 10000 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 * See README.txt for an overview of the Vim source code.
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 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	11 * eval.c: Expression evaluation.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	12 */
8295 18fd94bd4eb8 commit https://github.com/vim/vim/commit/fefecb0fbe14c44d46f91036d76bbb6c28162da8 Christian Brabandt <cb@256bit.org> parents: 8291 diff changeset	13 #define USING_FLOAT_STUFF
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	14
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	15 #include "vim.h"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	16
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	17 #if defined(FEAT_EVAL) \|\| defined(PROTO)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	18
2529 2aaa88366cbb Fix for float values on VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2513 diff changeset	19 #ifdef VMS
2aaa88366cbb Fix for float values on VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2513 diff changeset	20 # include <float.h>
2aaa88366cbb Fix for float values on VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2513 diff changeset	21 #endif
2aaa88366cbb Fix for float values on VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2513 diff changeset	22
7611 9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	23 #define NAMESPACE_CHAR (char_u *)"abglstvw"
9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	24
142 0ef5b70c3eaf updated for version 7.0045 vimboss parents: 137 diff changeset	25 /*
364 5332dd13733c updated for version 7.0094 vimboss parents: 359 diff changeset	26 * When recursively copying lists and dicts we need to remember which ones we
5332dd13733c updated for version 7.0094 vimboss parents: 359 diff changeset	27 * have done to avoid endless recursiveness. This unique ID is used for that.
1891 7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	28 * The last bit is used for previous_funccal, ignored when comparing.
364 5332dd13733c updated for version 7.0094 vimboss parents: 359 diff changeset	29 */
5332dd13733c updated for version 7.0094 vimboss parents: 359 diff changeset	30 static int current_copyID = 0;
5973 99d8f2d72dcd updated for version 7.4.327 Bram Moolenaar <bram@vim.org> parents: 5964 diff changeset	31
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	32 /*
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	33 * Info used by a ":for" loop.
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	34 */
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	35 typedef struct
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	36 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	37 int fi_semicolon; // TRUE if ending in '; var]'
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	38 int fi_varcount; // nr of variables in the list
21058 111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	39 int fi_break_count; // nr of line breaks encountered
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	40 listwatch_T fi_lw; // keep an eye on the item used.
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	41 list_T *fi_list; // list being used
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	42 int fi_bi; // index of blob
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	43 blob_T *fi_blob; // blob being used
24234 7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	44 char_u *fi_string; // copy of string being used
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	45 int fi_byte_idx; // byte index in fi_string
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	46 } forinfo_T;
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	47
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	48 static int eval2(char_u *arg, typval_T rettv, evalarg_T *evalarg);
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	49 static int eval3(char_u *arg, typval_T rettv, evalarg_T *evalarg);
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	50 static int eval4(char_u *arg, typval_T rettv, evalarg_T *evalarg);
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	51 static int eval5(char_u *arg, typval_T rettv, evalarg_T *evalarg);
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	52 static int eval6(char_u *arg, typval_T rettv, evalarg_T *evalarg, int want_string);
24518 cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	53 static int eval7t(char_u *arg, typval_T rettv, evalarg_T *evalarg, int want_string);
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	54 static int eval7(char_u *arg, typval_T rettv, evalarg_T *evalarg, int want_string);
21032 f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	55 static int eval7_leader(typval_T rettv, int numeric_only, char_u start_leader, char_u **end_leaderp);
7720 7c52f11e6df3 commit https://github.com/vim/vim/commit/48e697e4b6b6b490c58ec9393da9b2d2ea47c6d8 Christian Brabandt <cb@256bit.org> parents: 7718 diff changeset	56
7c52f11e6df3 commit https://github.com/vim/vim/commit/48e697e4b6b6b490c58ec9393da9b2d2ea47c6d8 Christian Brabandt <cb@256bit.org> parents: 7718 diff changeset	57 static int free_unref_items(int copyID);
17789 0f7ae8010787 patch 8.1.1891: functions used in one file are global Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	58 static char_u make_expanded_name(char_u in_start, char_u expr_start, char_u expr_end, char_u *in_end);
25206 dc66d0284518 patch 8.2.3139: functions for string manipulation are spread out Bram Moolenaar <Bram@vim.org> parents: 25186 diff changeset	59 static char_u eval_next_line(evalarg_T evalarg);
2247 c40cd9aad546 Add patch to improve support of z/OS (OS/390). (Ralf Schandl) Bram Moolenaar <bram@vim.org> parents: 2236 diff changeset	60
15969 9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	61 /*
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	62 * Return "n1" divided by "n2", taking care of dividing by zero.
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	63 * If "failed" is not NULL set it to TRUE when dividing by zero fails.
15969 9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	64 */
17873 d50a5faa75bd patch 8.1.1933: the eval.c file is too big Bram Moolenaar <Bram@vim.org> parents: 17833 diff changeset	65 varnumber_T
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	66 num_divide(varnumber_T n1, varnumber_T n2, int *failed)
15969 9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	67 {
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	68 varnumber_T result;
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	69
23673 6d35bc0f161e patch 8.2.2378: Vim9: no error message for dividing by zero Bram Moolenaar <Bram@vim.org> parents: 23628 diff changeset	70 if (n2 == 0)
15969 9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	71 {
23673 6d35bc0f161e patch 8.2.2378: Vim9: no error message for dividing by zero Bram Moolenaar <Bram@vim.org> parents: 23628 diff changeset	72 if (in_vim9script())
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	73 {
23673 6d35bc0f161e patch 8.2.2378: Vim9: no error message for dividing by zero Bram Moolenaar <Bram@vim.org> parents: 23628 diff changeset	74 emsg(_(e_divide_by_zero));
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	75 if (failed != NULL)
e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	76 *failed = TRUE;
e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	77 }
15969 9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	78 if (n1 == 0)
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	79 result = VARNUM_MIN; // similar to NaN
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	80 else if (n1 < 0)
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	81 result = -VARNUM_MAX;
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	82 else
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	83 result = VARNUM_MAX;
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	84 }
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	85 else
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	86 result = n1 / n2;
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	87
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	88 return result;
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	89 }
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	90
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	91 /*
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	92 * Return "n1" modulus "n2", taking care of dividing by zero.
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	93 * If "failed" is not NULL set it to TRUE when dividing by zero fails.
15969 9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	94 */
17873 d50a5faa75bd patch 8.1.1933: the eval.c file is too big Bram Moolenaar <Bram@vim.org> parents: 17833 diff changeset	95 varnumber_T
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	96 num_modulus(varnumber_T n1, varnumber_T n2, int *failed)
15969 9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	97 {
23673 6d35bc0f161e patch 8.2.2378: Vim9: no error message for dividing by zero Bram Moolenaar <Bram@vim.org> parents: 23628 diff changeset	98 if (n2 == 0 && in_vim9script())
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	99 {
23673 6d35bc0f161e patch 8.2.2378: Vim9: no error message for dividing by zero Bram Moolenaar <Bram@vim.org> parents: 23628 diff changeset	100 emsg(_(e_divide_by_zero));
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	101 if (failed != NULL)
e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	102 *failed = TRUE;
e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	103 }
15969 9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	104 return (n2 == 0) ? 0 : (n1 % n2);
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	105 }
9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	106
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	107 /*
3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	108 * Initialize the global and v: variables.
3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	109 */
3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	110 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	111 eval_init(void)
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	112 {
17885 5e2d8840da11 patch 8.1.1939: code for handling v: variables in generic eval file Bram Moolenaar <Bram@vim.org> parents: 17873 diff changeset	113 evalvars_init();
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	114 func_init();
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	115
2247 c40cd9aad546 Add patch to improve support of z/OS (OS/390). (Ralf Schandl) Bram Moolenaar <bram@vim.org> parents: 2236 diff changeset	116 #ifdef EBCDIC
c40cd9aad546 Add patch to improve support of z/OS (OS/390). (Ralf Schandl) Bram Moolenaar <bram@vim.org> parents: 2236 diff changeset	117 /*
3178 b7f0f23bf906 updated for version 7.3.359 Bram Moolenaar <bram@vim.org> parents: 3160 diff changeset	118 * Sort the function table, to enable binary search.
2247 c40cd9aad546 Add patch to improve support of z/OS (OS/390). (Ralf Schandl) Bram Moolenaar <bram@vim.org> parents: 2236 diff changeset	119 */
c40cd9aad546 Add patch to improve support of z/OS (OS/390). (Ralf Schandl) Bram Moolenaar <bram@vim.org> parents: 2236 diff changeset	120 sortFunctions();
c40cd9aad546 Add patch to improve support of z/OS (OS/390). (Ralf Schandl) Bram Moolenaar <bram@vim.org> parents: 2236 diff changeset	121 #endif
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	122 }
3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	123
357 25dd5036f2b0 updated for version 7.0092 vimboss parents: 344 diff changeset	124 #if defined(EXITFREE) \|\| defined(PROTO)
25dd5036f2b0 updated for version 7.0092 vimboss parents: 344 diff changeset	125 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	126 eval_clear(void)
357 25dd5036f2b0 updated for version 7.0092 vimboss parents: 344 diff changeset	127 {
17885 5e2d8840da11 patch 8.1.1939: code for handling v: variables in generic eval file Bram Moolenaar <Bram@vim.org> parents: 17873 diff changeset	128 evalvars_clear();
19108 44c6498535c9 patch 8.2.0114: info about sourced scripts is scattered Bram Moolenaar <Bram@vim.org> parents: 19102 diff changeset	129 free_scriptnames(); // must come after evalvars_clear().
2849 b0190e93e601 updated for version 7.3.198 Bram Moolenaar <bram@vim.org> parents: 2845 diff changeset	130 free_locales();
357 25dd5036f2b0 updated for version 7.0092 vimboss parents: 344 diff changeset	131
17922 4d63d47d87ef patch 8.1.1957: more code can be moved to evalvars.c Bram Moolenaar <Bram@vim.org> parents: 17893 diff changeset	132 // autoloaded script names
4d63d47d87ef patch 8.1.1957: more code can be moved to evalvars.c Bram Moolenaar <Bram@vim.org> parents: 17893 diff changeset	133 free_autoload_scriptnames();
855 d2a4f08396fe updated for version 7.0f05 vimboss parents: 846 diff changeset	134
16967 586d625e21b4 patch 8.1.1484: some tests are slow Bram Moolenaar <Bram@vim.org> parents: 16872 diff changeset	135 // unreferenced lists and dicts
8881 ed0b39dd7fd6 commit https://github.com/vim/vim/commit/ebf7dfa6f121c82f97d2adca3d45fbaba9ad8f7e Christian Brabandt <cb@256bit.org> parents: 8877 diff changeset	136 (void)garbage_collect(FALSE);
16969 8c794a694d66 patch 8.1.1485: double free when garbage_collect() is used in autocommand Bram Moolenaar <Bram@vim.org> parents: 16967 diff changeset	137
8c794a694d66 patch 8.1.1485: double free when garbage_collect() is used in autocommand Bram Moolenaar <Bram@vim.org> parents: 16967 diff changeset	138 // functions not garbage collected
8c794a694d66 patch 8.1.1485: double free when garbage_collect() is used in autocommand Bram Moolenaar <Bram@vim.org> parents: 16967 diff changeset	139 free_all_functions();
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	140 }
86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	141 #endif
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	142
21118 b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	143 void
21096 74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	144 fill_evalarg_from_eap(evalarg_T evalarg, exarg_T eap, int skip)
74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	145 {
26053 e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	146 init_evalarg(evalarg);
21096 74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	147 evalarg->eval_flags = skip ? 0 : EVAL_EVALUATE;
25358 f03271631eb5 patch 8.2.3216: Vim9: crash when using variable in a loop at script level Bram Moolenaar <Bram@vim.org> parents: 25328 diff changeset	148 if (eap != NULL)
21096 74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	149 {
25358 f03271631eb5 patch 8.2.3216: Vim9: crash when using variable in a loop at script level Bram Moolenaar <Bram@vim.org> parents: 25328 diff changeset	150 evalarg->eval_cstack = eap->cstack;
f03271631eb5 patch 8.2.3216: Vim9: crash when using variable in a loop at script level Bram Moolenaar <Bram@vim.org> parents: 25328 diff changeset	151 if (getline_equal(eap->getline, eap->cookie, getsourceline))
f03271631eb5 patch 8.2.3216: Vim9: crash when using variable in a loop at script level Bram Moolenaar <Bram@vim.org> parents: 25328 diff changeset	152 {
f03271631eb5 patch 8.2.3216: Vim9: crash when using variable in a loop at script level Bram Moolenaar <Bram@vim.org> parents: 25328 diff changeset	153 evalarg->eval_getline = eap->getline;
f03271631eb5 patch 8.2.3216: Vim9: crash when using variable in a loop at script level Bram Moolenaar <Bram@vim.org> parents: 25328 diff changeset	154 evalarg->eval_cookie = eap->cookie;
f03271631eb5 patch 8.2.3216: Vim9: crash when using variable in a loop at script level Bram Moolenaar <Bram@vim.org> parents: 25328 diff changeset	155 }
21096 74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	156 }
74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	157 }
74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	158
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	159 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	160 * Top level evaluation function, returning a boolean.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	161 * Sets "error" to TRUE if there was an error.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	162 * Return TRUE or FALSE.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	163 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	164 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	165 eval_to_bool(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	166 char_u *arg,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	167 int *error,
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	168 exarg_T *eap,
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	169 int skip) // only parse, don't execute
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	170 {
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	171 typval_T tv;
9389 32e34e574716 commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12 Christian Brabandt <cb@256bit.org> parents: 9387 diff changeset	172 varnumber_T retval = FALSE;
21050 7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	173 evalarg_T evalarg;
7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	174
21096 74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	175 fill_evalarg_from_eap(&evalarg, eap, skip);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	176
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	177 if (skip)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	178 ++emsg_skip;
21050 7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	179 if (eval0(arg, &tv, eap, &evalarg) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	180 *error = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	181 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	182 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	183 *error = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	184 if (!skip)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	185 {
21733 1bb5adfe5966 patch 8.2.1416: Vim9: boolean evaluation does not work as intended Bram Moolenaar <Bram@vim.org> parents: 21725 diff changeset	186 if (in_vim9script())
22500 ef8a3177edc1 patch 8.2.1798: Vim9: trinary operator condition is too permissive Bram Moolenaar <Bram@vim.org> parents: 22494 diff changeset	187 retval = tv_get_bool_chk(&tv, error);
21733 1bb5adfe5966 patch 8.2.1416: Vim9: boolean evaluation does not work as intended Bram Moolenaar <Bram@vim.org> parents: 21725 diff changeset	188 else
1bb5adfe5966 patch 8.2.1416: Vim9: boolean evaluation does not work as intended Bram Moolenaar <Bram@vim.org> parents: 21725 diff changeset	189 retval = (tv_get_number_chk(&tv, error) != 0);
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	190 clear_tv(&tv);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	191 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	192 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	193 if (skip)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	194 --emsg_skip;
21050 7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	195 clear_evalarg(&evalarg, eap);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	196
9389 32e34e574716 commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12 Christian Brabandt <cb@256bit.org> parents: 9387 diff changeset	197 return (int)retval;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	198 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	199
15478 051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	200 /*
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	201 * Call eval1() and give an error message if not done at a lower level.
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	202 */
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	203 static int
21098 e88b0daa2fcb patch 8.2.1100: Vim9: cannot use line break in :execute argument Bram Moolenaar <Bram@vim.org> parents: 21096 diff changeset	204 eval1_emsg(char_u *arg, typval_T rettv, exarg_T *eap)
15478 051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	205 {
15482 18dd04f7c4a1 patch 8.1.0749: error message contains garbage Bram Moolenaar <Bram@vim.org> parents: 15478 diff changeset	206 char_u start = arg;
15478 051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	207 int ret;
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	208 int did_emsg_before = did_emsg;
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	209 int called_emsg_before = called_emsg;
21098 e88b0daa2fcb patch 8.2.1100: Vim9: cannot use line break in :execute argument Bram Moolenaar <Bram@vim.org> parents: 21096 diff changeset	210 evalarg_T evalarg;
e88b0daa2fcb patch 8.2.1100: Vim9: cannot use line break in :execute argument Bram Moolenaar <Bram@vim.org> parents: 21096 diff changeset	211
e88b0daa2fcb patch 8.2.1100: Vim9: cannot use line break in :execute argument Bram Moolenaar <Bram@vim.org> parents: 21096 diff changeset	212 fill_evalarg_from_eap(&evalarg, eap, eap != NULL && eap->skip);
e88b0daa2fcb patch 8.2.1100: Vim9: cannot use line break in :execute argument Bram Moolenaar <Bram@vim.org> parents: 21096 diff changeset	213
e88b0daa2fcb patch 8.2.1100: Vim9: cannot use line break in :execute argument Bram Moolenaar <Bram@vim.org> parents: 21096 diff changeset	214 ret = eval1(arg, rettv, &evalarg);
15478 051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	215 if (ret == FAIL)
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	216 {
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	217 // Report the invalid expression unless the expression evaluation has
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	218 // been cancelled due to an aborting error, an interrupt, or an
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	219 // exception, or we already gave a more specific error.
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	220 // Also check called_emsg for when using assert_fails().
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	221 if (!aborting() && did_emsg == did_emsg_before
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	222 && called_emsg == called_emsg_before)
25064 8f2262c72178 patch 8.2.3069: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25054 diff changeset	223 semsg(_(e_invalid_expression_str), start);
15478 051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	224 }
21098 e88b0daa2fcb patch 8.2.1100: Vim9: cannot use line break in :execute argument Bram Moolenaar <Bram@vim.org> parents: 21096 diff changeset	225 clear_evalarg(&evalarg, eap);
15478 051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	226 return ret;
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	227 }
051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	228
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	229 /*
20731 ab27db64f1fb patch 8.2.0918: duplicate code for evaluating expression argument Bram Moolenaar <Bram@vim.org> parents: 20587 diff changeset	230 * Return whether a typval is a valid expression to pass to eval_expr_typval()
ab27db64f1fb patch 8.2.0918: duplicate code for evaluating expression argument Bram Moolenaar <Bram@vim.org> parents: 20587 diff changeset	231 * or eval_expr_to_bool(). An empty string returns FALSE;
ab27db64f1fb patch 8.2.0918: duplicate code for evaluating expression argument Bram Moolenaar <Bram@vim.org> parents: 20587 diff changeset	232 */
ab27db64f1fb patch 8.2.0918: duplicate code for evaluating expression argument Bram Moolenaar <Bram@vim.org> parents: 20587 diff changeset	233 int
ab27db64f1fb patch 8.2.0918: duplicate code for evaluating expression argument Bram Moolenaar <Bram@vim.org> parents: 20587 diff changeset	234 eval_expr_valid_arg(typval_T *tv)
ab27db64f1fb patch 8.2.0918: duplicate code for evaluating expression argument Bram Moolenaar <Bram@vim.org> parents: 20587 diff changeset	235 {
ab27db64f1fb patch 8.2.0918: duplicate code for evaluating expression argument Bram Moolenaar <Bram@vim.org> parents: 20587 diff changeset	236 return tv->v_type != VAR_UNKNOWN
ab27db64f1fb patch 8.2.0918: duplicate code for evaluating expression argument Bram Moolenaar <Bram@vim.org> parents: 20587 diff changeset	237 && (tv->v_type != VAR_STRING
ab27db64f1fb patch 8.2.0918: duplicate code for evaluating expression argument Bram Moolenaar <Bram@vim.org> parents: 20587 diff changeset	238 \|\| (tv->vval.v_string != NULL && *tv->vval.v_string != NUL));
ab27db64f1fb patch 8.2.0918: duplicate code for evaluating expression argument Bram Moolenaar <Bram@vim.org> parents: 20587 diff changeset	239 }
ab27db64f1fb patch 8.2.0918: duplicate code for evaluating expression argument Bram Moolenaar <Bram@vim.org> parents: 20587 diff changeset	240
ab27db64f1fb patch 8.2.0918: duplicate code for evaluating expression argument Bram Moolenaar <Bram@vim.org> parents: 20587 diff changeset	241 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	242 * Evaluate an expression, which can be a function, partial or string.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	243 * Pass arguments "argv[argc]".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	244 * Return the result in "rettv" and OK or FAIL.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	245 */
16231 0761a4c111a7 patch 8.1.1120: cannot easily get directory entry matches Bram Moolenaar <Bram@vim.org> parents: 16223 diff changeset	246 int
12722 7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	247 eval_expr_typval(typval_T expr, typval_T argv, int argc, typval_T *rettv)
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	248 {
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	249 char_u *s;
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	250 char_u buf[NUMBUFLEN];
17606 ff097edaae89 patch 8.1.1800: function call functions have too many arguments Bram Moolenaar <Bram@vim.org> parents: 17536 diff changeset	251 funcexe_T funcexe;
12722 7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	252
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	253 if (expr->v_type == VAR_FUNC)
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	254 {
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	255 s = expr->vval.v_string;
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	256 if (s == NULL \|\| *s == NUL)
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	257 return FAIL;
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 19922 diff changeset	258 CLEAR_FIELD(funcexe);
17606 ff097edaae89 patch 8.1.1800: function call functions have too many arguments Bram Moolenaar <Bram@vim.org> parents: 17536 diff changeset	259 funcexe.evaluate = TRUE;
ff097edaae89 patch 8.1.1800: function call functions have too many arguments Bram Moolenaar <Bram@vim.org> parents: 17536 diff changeset	260 if (call_func(s, -1, rettv, argc, argv, &funcexe) == FAIL)
12722 7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	261 return FAIL;
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	262 }
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	263 else if (expr->v_type == VAR_PARTIAL)
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	264 {
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	265 partial_T *partial = expr->vval.v_partial;
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	266
20156 49694eceaa55 patch 8.2.0633: crash when using null partial in filter() Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	267 if (partial == NULL)
49694eceaa55 patch 8.2.0633: crash when using null partial in filter() Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	268 return FAIL;
49694eceaa55 patch 8.2.0633: crash when using null partial in filter() Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	269
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20526 diff changeset	270 if (partial->pt_func != NULL
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	271 && partial->pt_func->uf_def_status != UF_NOT_COMPILED)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	272 {
20433 5950284a517f patch 8.2.0771: Vim9: cannot call a compiled closure from not compiled code Bram Moolenaar <Bram@vim.org> parents: 20401 diff changeset	273 if (call_def_function(partial->pt_func, argc, argv,
5950284a517f patch 8.2.0771: Vim9: cannot call a compiled closure from not compiled code Bram Moolenaar <Bram@vim.org> parents: 20401 diff changeset	274 partial, rettv) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	275 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	276 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	277 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	278 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	279 s = partial_name(partial);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	280 if (s == NULL \|\| *s == NUL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	281 return FAIL;
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 19922 diff changeset	282 CLEAR_FIELD(funcexe);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	283 funcexe.evaluate = TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	284 funcexe.partial = partial;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	285 if (call_func(s, -1, rettv, argc, argv, &funcexe) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	286 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	287 }
12722 7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	288 }
24606 a4fda40e0bb9 patch 8.2.2842: Vim9: skip argument to searchpair() is not compiled Bram Moolenaar <Bram@vim.org> parents: 24553 diff changeset	289 else if (expr->v_type == VAR_INSTR)
a4fda40e0bb9 patch 8.2.2842: Vim9: skip argument to searchpair() is not compiled Bram Moolenaar <Bram@vim.org> parents: 24553 diff changeset	290 {
a4fda40e0bb9 patch 8.2.2842: Vim9: skip argument to searchpair() is not compiled Bram Moolenaar <Bram@vim.org> parents: 24553 diff changeset	291 return exe_typval_instr(expr, rettv);
a4fda40e0bb9 patch 8.2.2842: Vim9: skip argument to searchpair() is not compiled Bram Moolenaar <Bram@vim.org> parents: 24553 diff changeset	292 }
12722 7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	293 else
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	294 {
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	295 s = tv_get_string_buf_chk(expr, buf);
12722 7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	296 if (s == NULL)
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	297 return FAIL;
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	298 s = skipwhite(s);
21098 e88b0daa2fcb patch 8.2.1100: Vim9: cannot use line break in :execute argument Bram Moolenaar <Bram@vim.org> parents: 21096 diff changeset	299 if (eval1_emsg(&s, rettv, NULL) == FAIL)
12722 7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	300 return FAIL;
21620 46956b6811a1 patch 8.2.1360: stray error for white space after expression Bram Moolenaar <Bram@vim.org> parents: 21552 diff changeset	301 if (*skipwhite(s) != NUL) // check for trailing chars after expr
12722 7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	302 {
14331 f8280e1bfc84 patch 8.1.0181: memory leak with trailing characters in skip expression Christian Brabandt <cb@256bit.org> parents: 14071 diff changeset	303 clear_tv(rettv);
25064 8f2262c72178 patch 8.2.3069: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25054 diff changeset	304 semsg(_(e_invalid_expression_str), s);
12722 7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	305 return FAIL;
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	306 }
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	307 }
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	308 return OK;
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	309 }
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	310
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	311 /*
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	312 * Like eval_to_bool() but using a typval_T instead of a string.
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	313 * Works for string, funcref and partial.
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	314 */
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	315 int
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	316 eval_expr_to_bool(typval_T expr, int error)
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	317 {
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	318 typval_T rettv;
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	319 int res;
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	320
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	321 if (eval_expr_typval(expr, NULL, 0, &rettv) == FAIL)
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	322 {
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	323 *error = TRUE;
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	324 return FALSE;
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	325 }
21861 cd8dafe937ba patch 8.2.1480: Vim9: skip expression in search() gives error Bram Moolenaar <Bram@vim.org> parents: 21847 diff changeset	326 res = (tv_get_bool_chk(&rettv, error) != 0);
12722 7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	327 clear_tv(&rettv);
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	328 return res;
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	329 }
7749260f261c patch 8.0.1239: cannot use a lambda for the skip argument to searchpair() Christian Brabandt <cb@256bit.org> parents: 12674 diff changeset	330
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	331 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	332 * Top level evaluation function, returning a string. If "skip" is TRUE,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	333 * only parsing to "nextcmd" is done, without reporting errors. Return
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	334 * pointer to allocated memory, or NULL for failure or when "skip" is TRUE.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	335 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	336 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	337 eval_to_string_skip(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	338 char_u *arg,
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	339 exarg_T *eap,
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	340 int skip) // only parse, don't execute
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	341 {
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	342 typval_T tv;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	343 char_u *retval;
21094 376b520312d6 patch 8.2.1098: Vim9: cannot use line break in :throw argument Bram Moolenaar <Bram@vim.org> parents: 21077 diff changeset	344 evalarg_T evalarg;
376b520312d6 patch 8.2.1098: Vim9: cannot use line break in :throw argument Bram Moolenaar <Bram@vim.org> parents: 21077 diff changeset	345
21096 74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	346 fill_evalarg_from_eap(&evalarg, eap, skip);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	347 if (skip)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	348 ++emsg_skip;
21094 376b520312d6 patch 8.2.1098: Vim9: cannot use line break in :throw argument Bram Moolenaar <Bram@vim.org> parents: 21077 diff changeset	349 if (eval0(arg, &tv, eap, &evalarg) == FAIL \|\| skip)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	350 retval = NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	351 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	352 {
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	353 retval = vim_strsave(tv_get_string(&tv));
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	354 clear_tv(&tv);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	355 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	356 if (skip)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	357 --emsg_skip;
21094 376b520312d6 patch 8.2.1098: Vim9: cannot use line break in :throw argument Bram Moolenaar <Bram@vim.org> parents: 21077 diff changeset	358 clear_evalarg(&evalarg, eap);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	359
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	360 return retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	361 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	362
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	363 /*
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	364 * Skip over an expression at "*pp".
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	365 * Return FAIL for an error, OK otherwise.
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	366 */
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	367 int
22685 80b4e604d1d5 patch 8.2.1891: Vim9: skipping over expression doesn't handle line breaks Bram Moolenaar <Bram@vim.org> parents: 22683 diff changeset	368 skip_expr(char_u *pp, evalarg_T evalarg)
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	369 {
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	370 typval_T rettv;
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	371
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	372 pp = skipwhite(pp);
22685 80b4e604d1d5 patch 8.2.1891: Vim9: skipping over expression doesn't handle line breaks Bram Moolenaar <Bram@vim.org> parents: 22683 diff changeset	373 return eval1(pp, &rettv, evalarg);
9 4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	374 }
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	375
4102fb4ea781 updated for version 7.0002 vimboss parents: 7 diff changeset	376 /*
24553 cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	377 * Skip over an expression at "*arg".
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	378 * If in Vim9 script and line breaks are encountered, the lines are
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	379 * concatenated. "evalarg->eval_tofree" will be set accordingly.
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	380 * "arg" is advanced to just after the expression.
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	381 * "start" is set to the start of the expression, "end" to just after the end.
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	382 * Also when the expression is copied to allocated memory.
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	383 * Return FAIL for an error, OK otherwise.
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	384 */
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	385 int
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	386 skip_expr_concatenate(
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	387 char_u **arg,
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	388 char_u **start,
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	389 char_u **end,
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	390 evalarg_T *evalarg)
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	391 {
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	392 typval_T rettv;
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	393 int res;
21279 8d1d11afd8c8 patch 8.2.1190: Vim9: checking for Vim9 syntax is spread out Bram Moolenaar <Bram@vim.org> parents: 21277 diff changeset	394 int vim9script = in_vim9script();
22021 514d622473af patch 8.2.1560: using NULL pointers in some code Bram Moolenaar <Bram@vim.org> parents: 22004 diff changeset	395 garray_T *gap = evalarg == NULL ? NULL : &evalarg->eval_ga;
24655 3876d9629ebd patch 8.2.2866: Vim9: memory leak when using inline function Bram Moolenaar <Bram@vim.org> parents: 24632 diff changeset	396 garray_T *freegap = evalarg == NULL ? NULL : &evalarg->eval_freega;
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	397 int save_flags = evalarg == NULL ? 0 : evalarg->eval_flags;
21865 c16af87df654 patch 8.2.1482: Vim9: crash when using a nested lambda Bram Moolenaar <Bram@vim.org> parents: 21861 diff changeset	398 int evaluate = evalarg == NULL
c16af87df654 patch 8.2.1482: Vim9: crash when using a nested lambda Bram Moolenaar <Bram@vim.org> parents: 21861 diff changeset	399 ? FALSE : (evalarg->eval_flags & EVAL_EVALUATE);
c16af87df654 patch 8.2.1482: Vim9: crash when using a nested lambda Bram Moolenaar <Bram@vim.org> parents: 21861 diff changeset	400
c16af87df654 patch 8.2.1482: Vim9: crash when using a nested lambda Bram Moolenaar <Bram@vim.org> parents: 21861 diff changeset	401 if (vim9script && evaluate
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	402 && (evalarg->eval_cookie != NULL \|\| evalarg->eval_cctx != NULL))
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	403 {
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	404 ga_init2(gap, sizeof(char_u *), 10);
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	405 // leave room for "start"
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	406 if (ga_grow(gap, 1) == OK)
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	407 ++gap->ga_len;
24655 3876d9629ebd patch 8.2.2866: Vim9: memory leak when using inline function Bram Moolenaar <Bram@vim.org> parents: 24632 diff changeset	408 ga_init2(freegap, sizeof(char_u *), 10);
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	409 }
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	410 start = arg;
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	411
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	412 // Don't evaluate the expression.
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	413 if (evalarg != NULL)
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	414 evalarg->eval_flags &= ~EVAL_EVALUATE;
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	415 arg = skipwhite(arg);
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	416 res = eval1(arg, &rettv, evalarg);
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	417 end = arg;
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	418 if (evalarg != NULL)
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	419 evalarg->eval_flags = save_flags;
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	420
21865 c16af87df654 patch 8.2.1482: Vim9: crash when using a nested lambda Bram Moolenaar <Bram@vim.org> parents: 21861 diff changeset	421 if (vim9script && evaluate
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	422 && (evalarg->eval_cookie != NULL \|\| evalarg->eval_cctx != NULL))
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	423 {
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	424 if (evalarg->eval_ga.ga_len == 1)
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	425 {
24655 3876d9629ebd patch 8.2.2866: Vim9: memory leak when using inline function Bram Moolenaar <Bram@vim.org> parents: 24632 diff changeset	426 // just the one line, no need to concatenate
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	427 ga_clear(gap);
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	428 gap->ga_itemsize = 0;
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	429 }
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	430 else
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	431 {
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	432 char_u *p;
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	433 size_t endoff = STRLEN(*arg);
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	434
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	435 // Line breaks encountered, concatenate all the lines.
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	436 ((char_u )gap->ga_data) = start;
24553 cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	437 p = ga_concat_strings(gap, " ");
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	438
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	439 // free the lines only when using getsourceline()
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	440 if (evalarg->eval_cookie != NULL)
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	441 {
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	442 // Do not free the first line, the caller can still use it.
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	443 ((char_u *)gap->ga_data) = NULL;
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	444 // Do not free the last line, "arg" points into it, free it
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	445 // later.
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	446 vim_free(evalarg->eval_tofree);
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	447 evalarg->eval_tofree =
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	448 ((char_u **)gap->ga_data)[gap->ga_len - 1];
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	449 ((char_u **)gap->ga_data)[gap->ga_len - 1] = NULL;
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	450 ga_clear_strings(gap);
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	451 }
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	452 else
24655 3876d9629ebd patch 8.2.2866: Vim9: memory leak when using inline function Bram Moolenaar <Bram@vim.org> parents: 24632 diff changeset	453 {
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	454 ga_clear(gap);
24655 3876d9629ebd patch 8.2.2866: Vim9: memory leak when using inline function Bram Moolenaar <Bram@vim.org> parents: 24632 diff changeset	455
3876d9629ebd patch 8.2.2866: Vim9: memory leak when using inline function Bram Moolenaar <Bram@vim.org> parents: 24632 diff changeset	456 // free lines that were explicitly marked for freeing
3876d9629ebd patch 8.2.2866: Vim9: memory leak when using inline function Bram Moolenaar <Bram@vim.org> parents: 24632 diff changeset	457 ga_clear_strings(freegap);
3876d9629ebd patch 8.2.2866: Vim9: memory leak when using inline function Bram Moolenaar <Bram@vim.org> parents: 24632 diff changeset	458 }
3876d9629ebd patch 8.2.2866: Vim9: memory leak when using inline function Bram Moolenaar <Bram@vim.org> parents: 24632 diff changeset	459
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	460 gap->ga_itemsize = 0;
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	461 if (p == NULL)
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	462 return FAIL;
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	463 *start = p;
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	464 vim_free(evalarg->eval_tofree_lambda);
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	465 evalarg->eval_tofree_lambda = p;
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	466 // Compute "end" relative to the end.
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	467 end = start + STRLEN(*start) - endoff;
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	468 }
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	469 }
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	470
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	471 return res;
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	472 }
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	473
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	474 /*
23628 b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	475 * Convert "tv" to a string.
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	476 * When "convert" is TRUE convert a List into a sequence of lines and convert
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	477 * a Float to a String.
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	478 * Returns an allocated string (NULL when out of memory).
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	479 */
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	480 char_u *
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	481 typval2string(typval_T *tv, int convert)
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	482 {
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	483 garray_T ga;
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	484 char_u *retval;
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	485 #ifdef FEAT_FLOAT
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	486 char_u numbuf[NUMBUFLEN];
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	487 #endif
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	488
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	489 if (convert && tv->v_type == VAR_LIST)
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	490 {
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	491 ga_init2(&ga, (int)sizeof(char), 80);
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	492 if (tv->vval.v_list != NULL)
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	493 {
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	494 list_join(&ga, tv->vval.v_list, (char_u *)"\n", TRUE, FALSE, 0);
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	495 if (tv->vval.v_list->lv_len > 0)
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	496 ga_append(&ga, NL);
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	497 }
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	498 ga_append(&ga, NUL);
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	499 retval = (char_u *)ga.ga_data;
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	500 }
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	501 #ifdef FEAT_FLOAT
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	502 else if (convert && tv->v_type == VAR_FLOAT)
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	503 {
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	504 vim_snprintf((char *)numbuf, NUMBUFLEN, "%g", tv->vval.v_float);
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	505 retval = vim_strsave(numbuf);
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	506 }
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	507 #endif
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	508 else
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	509 retval = vim_strsave(tv_get_string(tv));
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	510 return retval;
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	511 }
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	512
b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	513 /*
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	514 * Top level evaluation function, returning a string. Does not handle line
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	515 * breaks.
1713 7781fcd2b74f updated for version 7.2-011 vimboss parents: 1707 diff changeset	516 * When "convert" is TRUE convert a List into a sequence of lines and convert
7781fcd2b74f updated for version 7.2-011 vimboss parents: 1707 diff changeset	517 * a Float to a String.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	518 * Return pointer to allocated memory, or NULL for failure.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	519 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	520 char_u *
22732 4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	521 eval_to_string_eap(
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	522 char_u *arg,
22732 4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	523 int convert,
4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	524 exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	525 {
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	526 typval_T tv;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	527 char_u *retval;
22732 4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	528 evalarg_T evalarg;
4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	529
4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	530 fill_evalarg_from_eap(&evalarg, eap, eap != NULL && eap->skip);
4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	531 if (eval0(arg, &tv, NULL, &evalarg) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	532 retval = NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	533 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	534 {
23628 b26bbc03126a patch 8.2.2356: Vim9: ":put =expr" does not handle a list properly Bram Moolenaar <Bram@vim.org> parents: 23604 diff changeset	535 retval = typval2string(&tv, convert);
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	536 clear_tv(&tv);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	537 }
22732 4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	538 clear_evalarg(&evalarg, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	539
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	540 return retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	541 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	542
22732 4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	543 char_u *
4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	544 eval_to_string(
4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	545 char_u *arg,
4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	546 int convert)
4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	547 {
4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	548 return eval_to_string_eap(arg, convert, NULL);
4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	549 }
4c21a3a47707 patch 8.2.1914: Vim9: cannot put line break in expression for '=' register Bram Moolenaar <Bram@vim.org> parents: 22685 diff changeset	550
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	551 /*
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	552 * Call eval_to_string() without using current local variables and using
20229 06a1dd50463e patch 8.2.0670: cannot change window when evaluating 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 20158 diff changeset	553 * textwinlock. When "use_sandbox" is TRUE use the sandbox.
21775 6922d78b4d52 patch 8.2.1437: Vim9: 'statusline' is evaluated using Vim9 script syntax Bram Moolenaar <Bram@vim.org> parents: 21771 diff changeset	554 * Use legacy Vim script syntax.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	555 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	556 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	557 eval_to_string_safe(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	558 char_u *arg,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	559 int use_sandbox)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	560 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	561 char_u *retval;
14927 162d79d273e6 patch 8.1.0475: memory not freed on exit when quit in autocmd Bram Moolenaar <Bram@vim.org> parents: 14897 diff changeset	562 funccal_entry_T funccal_entry;
21775 6922d78b4d52 patch 8.2.1437: Vim9: 'statusline' is evaluated using Vim9 script syntax Bram Moolenaar <Bram@vim.org> parents: 21771 diff changeset	563 int save_sc_version = current_sctx.sc_version;
25765 d62bf68986df patch 8.2.3418: garbage collection while evaluating may cause trouble Bram Moolenaar <Bram@vim.org> parents: 25668 diff changeset	564 int save_garbage = may_garbage_collect;
21775 6922d78b4d52 patch 8.2.1437: Vim9: 'statusline' is evaluated using Vim9 script syntax Bram Moolenaar <Bram@vim.org> parents: 21771 diff changeset	565
6922d78b4d52 patch 8.2.1437: Vim9: 'statusline' is evaluated using Vim9 script syntax Bram Moolenaar <Bram@vim.org> parents: 21771 diff changeset	566 current_sctx.sc_version = 1;
14927 162d79d273e6 patch 8.1.0475: memory not freed on exit when quit in autocmd Bram Moolenaar <Bram@vim.org> parents: 14897 diff changeset	567 save_funccal(&funccal_entry);
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	568 if (use_sandbox)
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	569 ++sandbox;
20229 06a1dd50463e patch 8.2.0670: cannot change window when evaluating 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 20158 diff changeset	570 ++textwinlock;
25765 d62bf68986df patch 8.2.3418: garbage collection while evaluating may cause trouble Bram Moolenaar <Bram@vim.org> parents: 25668 diff changeset	571 may_garbage_collect = FALSE;
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	572 retval = eval_to_string(arg, FALSE);
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	573 if (use_sandbox)
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	574 --sandbox;
20229 06a1dd50463e patch 8.2.0670: cannot change window when evaluating 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 20158 diff changeset	575 --textwinlock;
25765 d62bf68986df patch 8.2.3418: garbage collection while evaluating may cause trouble Bram Moolenaar <Bram@vim.org> parents: 25668 diff changeset	576 may_garbage_collect = save_garbage;
14927 162d79d273e6 patch 8.1.0475: memory not freed on exit when quit in autocmd Bram Moolenaar <Bram@vim.org> parents: 14897 diff changeset	577 restore_funccal();
21775 6922d78b4d52 patch 8.2.1437: Vim9: 'statusline' is evaluated using Vim9 script syntax Bram Moolenaar <Bram@vim.org> parents: 21771 diff changeset	578 current_sctx.sc_version = save_sc_version;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	579 return retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	580 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	581
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	582 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	583 * Top level evaluation function, returning a number.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	584 * Evaluates "expr" silently.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	585 * Returns -1 for an error.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	586 */
9389 32e34e574716 commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12 Christian Brabandt <cb@256bit.org> parents: 9387 diff changeset	587 varnumber_T
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	588 eval_to_number(char_u *expr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	589 {
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	590 typval_T rettv;
9389 32e34e574716 commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12 Christian Brabandt <cb@256bit.org> parents: 9387 diff changeset	591 varnumber_T retval;
97 d4f3db33d782 updated for version 7.0037 vimboss parents: 92 diff changeset	592 char_u *p = skipwhite(expr);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	593
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	594 ++emsg_off;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	595
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	596 if (eval1(&p, &rettv, &EVALARG_EVALUATE) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	597 retval = -1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	598 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	599 {
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	600 retval = tv_get_number_chk(&rettv, NULL);
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	601 clear_tv(&rettv);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	602 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	603 --emsg_off;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	604
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	605 return retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	606 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	607
446 7472c565592a updated for version 7.0117 vimboss parents: 445 diff changeset	608 /*
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 615 diff changeset	609 * Top level evaluation function.
81fe2ccc1207 updated for version 7.0179 vimboss parents: 615 diff changeset	610 * Returns an allocated typval_T with the result.
81fe2ccc1207 updated for version 7.0179 vimboss parents: 615 diff changeset	611 * Returns NULL when there is an error.
446 7472c565592a updated for version 7.0117 vimboss parents: 445 diff changeset	612 */
7472c565592a updated for version 7.0117 vimboss parents: 445 diff changeset	613 typval_T *
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	614 eval_expr(char_u arg, exarg_T eap)
446 7472c565592a updated for version 7.0117 vimboss parents: 445 diff changeset	615 {
7472c565592a updated for version 7.0117 vimboss parents: 445 diff changeset	616 typval_T *tv;
21096 74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	617 evalarg_T evalarg;
74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	618
74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	619 fill_evalarg_from_eap(&evalarg, eap, eap != NULL && eap->skip);
446 7472c565592a updated for version 7.0117 vimboss parents: 445 diff changeset	620
16825 ce04ebdf26b8 patch 8.1.1414: alloc() returning "char_u " causes a lot of type casts Bram Moolenaar <Bram@vim.org>* parents: 16796 diff changeset	621 tv = ALLOC_ONE(typval_T);
21096 74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	622 if (tv != NULL && eval0(arg, tv, eap, &evalarg) == FAIL)
13244 ac42c4b11dbc patch 8.0.1496: clearing a pointer takes two lines Christian Brabandt <cb@256bit.org> parents: 13037 diff changeset	623 VIM_CLEAR(tv);
21096 74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	624
74e5e212e550 patch 8.2.1099: Vim9: cannot use line break in :cexpr argument Bram Moolenaar <Bram@vim.org> parents: 21094 diff changeset	625 clear_evalarg(&evalarg, eap);
446 7472c565592a updated for version 7.0117 vimboss parents: 445 diff changeset	626 return tv;
7472c565592a updated for version 7.0117 vimboss parents: 445 diff changeset	627 }
7472c565592a updated for version 7.0117 vimboss parents: 445 diff changeset	628
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	629 /*
10942 e05695e59f6d patch 8.0.0360: sometimes VimL is used instead of "Vim script" Christian Brabandt <cb@256bit.org> parents: 10926 diff changeset	630 * Call some Vim script function and return the result in "*rettv".
14071 c1fcfafa8d1a patch 8.1.0053: first argument of 'completefunc' has inconsistent type Christian Brabandt <cb@256bit.org> parents: 13923 diff changeset	631 * Uses argv[0] to argv[argc - 1] for the function arguments. argv[argc]
c1fcfafa8d1a patch 8.1.0053: first argument of 'completefunc' has inconsistent type Christian Brabandt <cb@256bit.org> parents: 13923 diff changeset	632 * should have type VAR_UNKNOWN.
408 06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	633 * Returns OK or FAIL.
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	634 */
3078 2cbde6bcc623 updated for version 7.3.311 Bram Moolenaar <bram@vim.org> parents: 3066 diff changeset	635 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	636 call_vim_function(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	637 char_u *func,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	638 int argc,
14071 c1fcfafa8d1a patch 8.1.0053: first argument of 'completefunc' has inconsistent type Christian Brabandt <cb@256bit.org> parents: 13923 diff changeset	639 typval_T *argv,
14439 e4c553e9132b patch 8.1.0233: "safe" argument of call_vim_function() is always FALSE Christian Brabandt <cb@256bit.org> parents: 14393 diff changeset	640 typval_T *rettv)
14071 c1fcfafa8d1a patch 8.1.0053: first argument of 'completefunc' has inconsistent type Christian Brabandt <cb@256bit.org> parents: 13923 diff changeset	641 {
408 06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	642 int ret;
17606 ff097edaae89 patch 8.1.1800: function call functions have too many arguments Bram Moolenaar <Bram@vim.org> parents: 17536 diff changeset	643 funcexe_T funcexe;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	644
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	645 rettv->v_type = VAR_UNKNOWN; // clear_tv() uses this
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 19922 diff changeset	646 CLEAR_FIELD(funcexe);
17606 ff097edaae89 patch 8.1.1800: function call functions have too many arguments Bram Moolenaar <Bram@vim.org> parents: 17536 diff changeset	647 funcexe.firstline = curwin->w_cursor.lnum;
ff097edaae89 patch 8.1.1800: function call functions have too many arguments Bram Moolenaar <Bram@vim.org> parents: 17536 diff changeset	648 funcexe.lastline = curwin->w_cursor.lnum;
ff097edaae89 patch 8.1.1800: function call functions have too many arguments Bram Moolenaar <Bram@vim.org> parents: 17536 diff changeset	649 funcexe.evaluate = TRUE;
ff097edaae89 patch 8.1.1800: function call functions have too many arguments Bram Moolenaar <Bram@vim.org> parents: 17536 diff changeset	650 ret = call_func(func, -1, rettv, argc, argv, &funcexe);
408 06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	651 if (ret == FAIL)
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	652 clear_tv(rettv);
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	653
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	654 return ret;
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	655 }
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	656
4133 36fd800b8c6c updated for version 7.3.819 Bram Moolenaar <bram@vim.org> parents: 4126 diff changeset	657 /*
10942 e05695e59f6d patch 8.0.0360: sometimes VimL is used instead of "Vim script" Christian Brabandt <cb@256bit.org> parents: 10926 diff changeset	658 * Call Vim script function "func" and return the result as a number.
4133 36fd800b8c6c updated for version 7.3.819 Bram Moolenaar <bram@vim.org> parents: 4126 diff changeset	659 * Returns -1 when calling the function fails.
14071 c1fcfafa8d1a patch 8.1.0053: first argument of 'completefunc' has inconsistent type Christian Brabandt <cb@256bit.org> parents: 13923 diff changeset	660 * Uses argv[0] to argv[argc - 1] for the function arguments. argv[argc] should
c1fcfafa8d1a patch 8.1.0053: first argument of 'completefunc' has inconsistent type Christian Brabandt <cb@256bit.org> parents: 13923 diff changeset	661 * have type VAR_UNKNOWN.
4133 36fd800b8c6c updated for version 7.3.819 Bram Moolenaar <bram@vim.org> parents: 4126 diff changeset	662 */
9389 32e34e574716 commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12 Christian Brabandt <cb@256bit.org> parents: 9387 diff changeset	663 varnumber_T
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	664 call_func_retnr(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	665 char_u *func,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	666 int argc,
14439 e4c553e9132b patch 8.1.0233: "safe" argument of call_vim_function() is always FALSE Christian Brabandt <cb@256bit.org> parents: 14393 diff changeset	667 typval_T *argv)
4133 36fd800b8c6c updated for version 7.3.819 Bram Moolenaar <bram@vim.org> parents: 4126 diff changeset	668 {
36fd800b8c6c updated for version 7.3.819 Bram Moolenaar <bram@vim.org> parents: 4126 diff changeset	669 typval_T rettv;
9389 32e34e574716 commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12 Christian Brabandt <cb@256bit.org> parents: 9387 diff changeset	670 varnumber_T retval;
4133 36fd800b8c6c updated for version 7.3.819 Bram Moolenaar <bram@vim.org> parents: 4126 diff changeset	671
14439 e4c553e9132b patch 8.1.0233: "safe" argument of call_vim_function() is always FALSE Christian Brabandt <cb@256bit.org> parents: 14393 diff changeset	672 if (call_vim_function(func, argc, argv, &rettv) == FAIL)
4133 36fd800b8c6c updated for version 7.3.819 Bram Moolenaar <bram@vim.org> parents: 4126 diff changeset	673 return -1;
36fd800b8c6c updated for version 7.3.819 Bram Moolenaar <bram@vim.org> parents: 4126 diff changeset	674
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	675 retval = tv_get_number_chk(&rettv, NULL);
4133 36fd800b8c6c updated for version 7.3.819 Bram Moolenaar <bram@vim.org> parents: 4126 diff changeset	676 clear_tv(&rettv);
36fd800b8c6c updated for version 7.3.819 Bram Moolenaar <bram@vim.org> parents: 4126 diff changeset	677 return retval;
36fd800b8c6c updated for version 7.3.819 Bram Moolenaar <bram@vim.org> parents: 4126 diff changeset	678 }
36fd800b8c6c updated for version 7.3.819 Bram Moolenaar <bram@vim.org> parents: 4126 diff changeset	679
408 06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	680 /*
23281 5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	681 * Call Vim script function like call_func_retnr() and drop the result.
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	682 * Returns FAIL when calling the function fails.
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	683 */
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	684 int
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	685 call_func_noret(
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	686 char_u *func,
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	687 int argc,
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	688 typval_T *argv)
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	689 {
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	690 typval_T rettv;
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	691
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	692 if (call_vim_function(func, argc, argv, &rettv) == FAIL)
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	693 return FAIL;
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	694 clear_tv(&rettv);
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	695 return OK;
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	696 }
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	697
5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	698 /*
10942 e05695e59f6d patch 8.0.0360: sometimes VimL is used instead of "Vim script" Christian Brabandt <cb@256bit.org> parents: 10926 diff changeset	699 * Call Vim script function "func" and return the result as a string.
23281 5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	700 * Uses "argv" and "argc" as call_func_retnr().
453 3ffdc64af1e5 updated for version 7.0120 vimboss parents: 449 diff changeset	701 * Returns NULL when calling the function fails.
408 06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	702 */
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	703 void *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	704 call_func_retstr(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	705 char_u *func,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	706 int argc,
14439 e4c553e9132b patch 8.1.0233: "safe" argument of call_vim_function() is always FALSE Christian Brabandt <cb@256bit.org> parents: 14393 diff changeset	707 typval_T *argv)
408 06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	708 {
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	709 typval_T rettv;
453 3ffdc64af1e5 updated for version 7.0120 vimboss parents: 449 diff changeset	710 char_u *retval;
408 06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	711
14439 e4c553e9132b patch 8.1.0233: "safe" argument of call_vim_function() is always FALSE Christian Brabandt <cb@256bit.org> parents: 14393 diff changeset	712 if (call_vim_function(func, argc, argv, &rettv) == FAIL)
408 06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	713 return NULL;
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	714
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	715 retval = vim_strsave(tv_get_string(&rettv));
408 06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	716 clear_tv(&rettv);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	717 return retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	718 }
1322 4ce0a7e4c6b3 updated for version 7.1-036 vimboss parents: 1320 diff changeset	719
453 3ffdc64af1e5 updated for version 7.0120 vimboss parents: 449 diff changeset	720 /*
10942 e05695e59f6d patch 8.0.0360: sometimes VimL is used instead of "Vim script" Christian Brabandt <cb@256bit.org> parents: 10926 diff changeset	721 * Call Vim script function "func" and return the result as a List.
23281 5b4db8035d1d patch 8.2.2186: Vim9: error when using 'opfunc' Bram Moolenaar <Bram@vim.org> parents: 23239 diff changeset	722 * Uses "argv" and "argc" as call_func_retnr().
1690 c6b06a4a8f92 updated for version 7.2b-023 vimboss parents: 1683 diff changeset	723 * Returns NULL when there is something wrong.
408 06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	724 */
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	725 void *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	726 call_func_retlist(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	727 char_u *func,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	728 int argc,
14439 e4c553e9132b patch 8.1.0233: "safe" argument of call_vim_function() is always FALSE Christian Brabandt <cb@256bit.org> parents: 14393 diff changeset	729 typval_T *argv)
408 06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	730 {
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	731 typval_T rettv;
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	732
14439 e4c553e9132b patch 8.1.0233: "safe" argument of call_vim_function() is always FALSE Christian Brabandt <cb@256bit.org> parents: 14393 diff changeset	733 if (call_vim_function(func, argc, argv, &rettv) == FAIL)
408 06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	734 return NULL;
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	735
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	736 if (rettv.v_type != VAR_LIST)
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	737 {
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	738 clear_tv(&rettv);
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	739 return NULL;
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	740 }
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	741
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	742 return rettv.vval.v_list;
06234af3a8b7 updated for version 7.0106 vimboss parents: 388 diff changeset	743 }
1322 4ce0a7e4c6b3 updated for version 7.1-036 vimboss parents: 1320 diff changeset	744
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	745 #ifdef FEAT_FOLDING
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	746 /*
23527 27ca5534a408 patch 8.2.2306: Vim9: when using function reference type is not checked Bram Moolenaar <Bram@vim.org> parents: 23525 diff changeset	747 * Evaluate "arg", which is 'foldexpr'.
27ca5534a408 patch 8.2.2306: Vim9: when using function reference type is not checked Bram Moolenaar <Bram@vim.org> parents: 23525 diff changeset	748 * Note: caller must set "curwin" to match "arg".
27ca5534a408 patch 8.2.2306: Vim9: when using function reference type is not checked Bram Moolenaar <Bram@vim.org> parents: 23525 diff changeset	749 * Returns the foldlevel, and any character preceding it in "*cp". Doesn't
27ca5534a408 patch 8.2.2306: Vim9: when using function reference type is not checked Bram Moolenaar <Bram@vim.org> parents: 23525 diff changeset	750 * give error messages.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	751 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	752 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	753 eval_foldexpr(char_u arg, int cp)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	754 {
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	755 typval_T tv;
9389 32e34e574716 commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12 Christian Brabandt <cb@256bit.org> parents: 9387 diff changeset	756 varnumber_T retval;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	757 char_u *s;
681 9364d114ed8d updated for version 7.0204 vimboss parents: 680 diff changeset	758 int use_sandbox = was_set_insecurely((char_u *)"foldexpr",
9364d114ed8d updated for version 7.0204 vimboss parents: 680 diff changeset	759 OPT_LOCAL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	760
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	761 ++emsg_off;
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	762 if (use_sandbox)
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	763 ++sandbox;
20229 06a1dd50463e patch 8.2.0670: cannot change window when evaluating 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 20158 diff changeset	764 ++textwinlock;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	765 *cp = NUL;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	766 if (eval0(arg, &tv, NULL, &EVALARG_EVALUATE) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	767 retval = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	768 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	769 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	770 // If the result is a number, just return the number.
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	771 if (tv.v_type == VAR_NUMBER)
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	772 retval = tv.vval.v_number;
156 c5b05f6de1ad updated for version 7.0047 vimboss parents: 151 diff changeset	773 else if (tv.v_type != VAR_STRING \|\| tv.vval.v_string == NULL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	774 retval = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	775 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	776 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	777 // If the result is a string, check if there is a non-digit before
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	778 // the number.
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	779 s = tv.vval.v_string;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	780 if (!VIM_ISDIGIT(s) && s != '-')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	781 cp = s++;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	782 retval = atol((char *)s);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	783 }
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	784 clear_tv(&tv);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	785 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	786 --emsg_off;
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	787 if (use_sandbox)
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	788 --sandbox;
20229 06a1dd50463e patch 8.2.0670: cannot change window when evaluating 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 20158 diff changeset	789 --textwinlock;
21058 111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	790 clear_evalarg(&EVALARG_EVALUATE, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	791
9389 32e34e574716 commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12 Christian Brabandt <cb@256bit.org> parents: 9387 diff changeset	792 return (int)retval;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	793 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	794 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	795
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	796 /*
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	797 * Get an lval: variable, Dict item or List item that can be assigned a value
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	798 * to: "name", "na{me}", "name[expr]", "name[expr:expr]", "name[expr][expr]",
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	799 * "name.key", "name.key[expr]" etc.
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	800 * Indexing only works if "name" is an existing List or Dictionary.
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	801 * "name" points to the start of the name.
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	802 * If "rettv" is not NULL it points to the value to be assigned.
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	803 * "unlet" is TRUE for ":unlet": slightly different behavior when something is
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	804 * wrong; must end in space or cmd separator.
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	805 *
5604 b43363a7b4c7 updated for version 7.4.149 Bram Moolenaar <bram@vim.org> parents: 5571 diff changeset	806 * flags:
b43363a7b4c7 updated for version 7.4.149 Bram Moolenaar <bram@vim.org> parents: 5571 diff changeset	807 * GLV_QUIET: do not give error messages
10912 fd1760f8c215 patch 8.0.0345: islocked('d.changedtick') does not work Christian Brabandt <cb@256bit.org> parents: 10910 diff changeset	808 * GLV_READ_ONLY: will not change the variable
5604 b43363a7b4c7 updated for version 7.4.149 Bram Moolenaar <bram@vim.org> parents: 5571 diff changeset	809 * GLV_NO_AUTOLOAD: do not use script autoloading
b43363a7b4c7 updated for version 7.4.149 Bram Moolenaar <bram@vim.org> parents: 5571 diff changeset	810 *
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	811 * Returns a pointer to just after the name, including indexes.
124 f455396f3c3f updated for version 7.0043 vimboss parents: 121 diff changeset	812 * When an evaluation error occurs "lp->ll_name" is NULL;
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	813 * Returns NULL for a parsing error. Still need to free items in "lp"!
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	814 */
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	815 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	816 get_lval(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	817 char_u *name,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	818 typval_T *rettv,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	819 lval_T *lp,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	820 int unlet,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	821 int skip,
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	822 int flags, // GLV_ values
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	823 int fne_flags) // flags for find_name_end()
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	824 {
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	825 char_u *p;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	826 char_u expr_start, expr_end;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	827 int cc;
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	828 dictitem_T *v;
3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	829 typval_T var1;
3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	830 typval_T var2;
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	831 int empty1 = FALSE;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	832 char_u *key = NULL;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	833 int len;
22963 317462da618a patch 8.2.2028: Coverity warns for using an uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 22866 diff changeset	834 hashtab_T *ht = NULL;
5604 b43363a7b4c7 updated for version 7.4.149 Bram Moolenaar <bram@vim.org> parents: 5571 diff changeset	835 int quiet = flags & GLV_QUIET;
23527 27ca5534a408 patch 8.2.2306: Vim9: when using function reference type is not checked Bram Moolenaar <Bram@vim.org> parents: 23525 diff changeset	836 int writing;
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	837
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	838 // Clear everything in "lp".
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 19922 diff changeset	839 CLEAR_POINTER(lp);
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	840
23495 1f85acfb23cd patch 8.2.2290: Vim9: unlet of global variable cannot be compiled Bram Moolenaar <Bram@vim.org> parents: 23493 diff changeset	841 if (skip \|\| (flags & GLV_COMPILING))
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	842 {
23495 1f85acfb23cd patch 8.2.2290: Vim9: unlet of global variable cannot be compiled Bram Moolenaar <Bram@vim.org> parents: 23493 diff changeset	843 // When skipping or compiling just find the end of the name.
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	844 lp->ll_name = name;
21077 794bf2be08be patch 8.2.1090: may use NULL pointer when skipping over name Bram Moolenaar <Bram@vim.org> parents: 21058 diff changeset	845 lp->ll_name_end = find_name_end(name, NULL, NULL,
794bf2be08be patch 8.2.1090: may use NULL pointer when skipping over name Bram Moolenaar <Bram@vim.org> parents: 21058 diff changeset	846 FNE_INCL_BR \| fne_flags);
794bf2be08be patch 8.2.1090: may use NULL pointer when skipping over name Bram Moolenaar <Bram@vim.org> parents: 21058 diff changeset	847 return lp->ll_name_end;
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	848 }
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	849
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	850 // Find the end of the name.
271 8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	851 p = find_name_end(name, &expr_start, &expr_end, fne_flags);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	852 lp->ll_name_end = p;
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	853 if (expr_start != NULL)
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	854 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	855 // Don't expand the name when we already know there is an error.
11129 f4ea50924c6d patch 8.0.0452: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11127 diff changeset	856 if (unlet && !VIM_ISWHITE(p) && !ends_excmd(p)
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	857 && p != '[' && p != '.')
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	858 {
21461 4dfd00f481fb patch 8.2.1281: the "trailing characters" error can be hard to understand Bram Moolenaar <Bram@vim.org> parents: 21447 diff changeset	859 semsg(_(e_trailing_arg), p);
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	860 return NULL;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	861 }
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	862
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	863 lp->ll_exp_name = make_expanded_name(name, expr_start, expr_end, p);
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	864 if (lp->ll_exp_name == NULL)
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	865 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	866 // Report an invalid expression in braces, unless the
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	867 // expression evaluation has been cancelled due to an
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	868 // aborting error, an interrupt, or an exception.
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	869 if (!aborting() && !quiet)
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	870 {
121 86d71ae0c85a updated for version 7.0042 vimboss parents: 117 diff changeset	871 emsg_severe = TRUE;
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	872 semsg(_(e_invarg2), name);
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	873 return NULL;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	874 }
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	875 }
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	876 lp->ll_name = lp->ll_exp_name;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	877 }
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	878 else
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	879 {
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	880 lp->ll_name = name;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	881
21674 f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	882 if (in_vim9script())
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	883 {
21674 f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	884 // "a: type" is declaring variable "a" with a type, not "a:".
f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	885 if (p == name + 2 && p[-1] == ':')
f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	886 {
f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	887 --p;
f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	888 lp->ll_name_end = p;
f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	889 }
f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	890 if (*p == ':')
f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	891 {
f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	892 scriptitem_T *si = SCRIPT_ITEM(current_sctx.sc_sid);
25668 ba4e6e74c89f patch 8.2.3370: Vim9: no check for white space before type in declaration Bram Moolenaar <Bram@vim.org> parents: 25622 diff changeset	893 char_u *tp = skipwhite(p + 1);
ba4e6e74c89f patch 8.2.3370: Vim9: no check for white space before type in declaration Bram Moolenaar <Bram@vim.org> parents: 25622 diff changeset	894
ba4e6e74c89f patch 8.2.3370: Vim9: no check for white space before type in declaration Bram Moolenaar <Bram@vim.org> parents: 25622 diff changeset	895 if (tp == p + 1 && !quiet)
ba4e6e74c89f patch 8.2.3370: Vim9: no check for white space before type in declaration Bram Moolenaar <Bram@vim.org> parents: 25622 diff changeset	896 {
ba4e6e74c89f patch 8.2.3370: Vim9: no check for white space before type in declaration Bram Moolenaar <Bram@vim.org> parents: 25622 diff changeset	897 semsg(_(e_white_space_required_after_str_str), ":", p);
ba4e6e74c89f patch 8.2.3370: Vim9: no check for white space before type in declaration Bram Moolenaar <Bram@vim.org> parents: 25622 diff changeset	898 return NULL;
ba4e6e74c89f patch 8.2.3370: Vim9: no check for white space before type in declaration Bram Moolenaar <Bram@vim.org> parents: 25622 diff changeset	899 }
21674 f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	900
f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	901 // parse the type after the name
23332 cdb706d5c43d patch 8.2.2209: Vim9: return type of => lambda not parsed Bram Moolenaar <Bram@vim.org> parents: 23322 diff changeset	902 lp->ll_type = parse_type(&tp, &si->sn_type_list, !quiet);
cdb706d5c43d patch 8.2.2209: Vim9: return type of => lambda not parsed Bram Moolenaar <Bram@vim.org> parents: 23322 diff changeset	903 if (lp->ll_type == NULL && !quiet)
cdb706d5c43d patch 8.2.2209: Vim9: return type of => lambda not parsed Bram Moolenaar <Bram@vim.org> parents: 23322 diff changeset	904 return NULL;
21674 f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	905 lp->ll_name_end = tp;
f303d6a01a3e patch 8.2.1387: Vim9: cannot assign to single letter variable with type Bram Moolenaar <Bram@vim.org> parents: 21656 diff changeset	906 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	907 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	908 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	909
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	910 // Without [idx] or .key we are done.
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	911 if ((p != '[' && p != '.') \|\| lp->ll_name == NULL)
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	912 return p;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	913
25605 6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	914 if (in_vim9script() && lval_root != NULL)
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	915 {
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	916 // using local variable
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	917 lp->ll_tv = lval_root;
25607 54fef15ed370 patch 8.2.3340: accessing uninitialized pointer Bram Moolenaar <Bram@vim.org> parents: 25605 diff changeset	918 v = NULL;
25605 6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	919 }
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	920 else
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	921 {
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	922 cc = *p;
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	923 *p = NUL;
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	924 // When we would write to the variable pass &ht and prevent autoload.
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	925 writing = !(flags & GLV_READ_ONLY);
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	926 v = find_var(lp->ll_name, writing ? &ht : NULL,
23527 27ca5534a408 patch 8.2.2306: Vim9: when using function reference type is not checked Bram Moolenaar <Bram@vim.org> parents: 23525 diff changeset	927 (flags & GLV_NO_AUTOLOAD) \|\| writing);
25605 6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	928 if (v == NULL && !quiet)
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	929 semsg(_(e_undefined_variable_str), lp->ll_name);
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	930 *p = cc;
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	931 if (v == NULL)
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	932 return NULL;
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	933 lp->ll_tv = &v->di_tv;
6f13d9ea0d04 patch 8.2.3339: Vim9: cannot lock a member in a local dict Bram Moolenaar <Bram@vim.org> parents: 25591 diff changeset	934 }
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	935
23239 a789a688e37d patch 8.2.2165: Vim9: assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 23233 diff changeset	936 if (in_vim9script() && (flags & GLV_NO_DECL) == 0)
a789a688e37d patch 8.2.2165: Vim9: assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 23233 diff changeset	937 {
a789a688e37d patch 8.2.2165: Vim9: assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 23233 diff changeset	938 if (!quiet)
a789a688e37d patch 8.2.2165: Vim9: assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 23233 diff changeset	939 semsg(_(e_variable_already_declared), lp->ll_name);
a789a688e37d patch 8.2.2165: Vim9: assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 23233 diff changeset	940 return NULL;
a789a688e37d patch 8.2.2165: Vim9: assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 23233 diff changeset	941 }
a789a688e37d patch 8.2.2165: Vim9: assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 23233 diff changeset	942
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	943 /*
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	944 * Loop until no more [idx] or .key is following.
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	945 */
10926 7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	946 var1.v_type = VAR_UNKNOWN;
7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	947 var2.v_type = VAR_UNKNOWN;
25036 3b8d3b383fd6 patch 8.2.3055: strange error for assigning to "x.key" on non-dictionary Bram Moolenaar <Bram@vim.org> parents: 24958 diff changeset	948 while (p == '[' \|\| (p == '.' && p[1] != '=' && p[1] != '.'))
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	949 {
25036 3b8d3b383fd6 patch 8.2.3055: strange error for assigning to "x.key" on non-dictionary Bram Moolenaar <Bram@vim.org> parents: 24958 diff changeset	950 if (*p == '.' && lp->ll_tv->v_type != VAR_DICT)
3b8d3b383fd6 patch 8.2.3055: strange error for assigning to "x.key" on non-dictionary Bram Moolenaar <Bram@vim.org> parents: 24958 diff changeset	951 {
3b8d3b383fd6 patch 8.2.3055: strange error for assigning to "x.key" on non-dictionary Bram Moolenaar <Bram@vim.org> parents: 24958 diff changeset	952 if (!quiet)
3b8d3b383fd6 patch 8.2.3055: strange error for assigning to "x.key" on non-dictionary Bram Moolenaar <Bram@vim.org> parents: 24958 diff changeset	953 semsg(_(e_dot_can_only_be_used_on_dictionary_str), name);
3b8d3b383fd6 patch 8.2.3055: strange error for assigning to "x.key" on non-dictionary Bram Moolenaar <Bram@vim.org> parents: 24958 diff changeset	954 return NULL;
3b8d3b383fd6 patch 8.2.3055: strange error for assigning to "x.key" on non-dictionary Bram Moolenaar <Bram@vim.org> parents: 24958 diff changeset	955 }
25054 64bef59f11ef patch 8.2.3064: Vim9: in script cannot set item in uninitialized list Bram Moolenaar <Bram@vim.org> parents: 25036 diff changeset	956 if (lp->ll_tv->v_type != VAR_LIST
64bef59f11ef patch 8.2.3064: Vim9: in script cannot set item in uninitialized list Bram Moolenaar <Bram@vim.org> parents: 25036 diff changeset	957 && lp->ll_tv->v_type != VAR_DICT
64bef59f11ef patch 8.2.3064: Vim9: in script cannot set item in uninitialized list Bram Moolenaar <Bram@vim.org> parents: 25036 diff changeset	958 && lp->ll_tv->v_type != VAR_BLOB)
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	959 {
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	960 if (!quiet)
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	961 emsg(_("E689: Can only index a List, Dictionary or Blob"));
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	962 return NULL;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	963 }
25054 64bef59f11ef patch 8.2.3064: Vim9: in script cannot set item in uninitialized list Bram Moolenaar <Bram@vim.org> parents: 25036 diff changeset	964
64bef59f11ef patch 8.2.3064: Vim9: in script cannot set item in uninitialized list Bram Moolenaar <Bram@vim.org> parents: 25036 diff changeset	965 // a NULL list/blob works like an empty list/blob, allocate one now.
64bef59f11ef patch 8.2.3064: Vim9: in script cannot set item in uninitialized list Bram Moolenaar <Bram@vim.org> parents: 25036 diff changeset	966 if (lp->ll_tv->v_type == VAR_LIST && lp->ll_tv->vval.v_list == NULL)
64bef59f11ef patch 8.2.3064: Vim9: in script cannot set item in uninitialized list Bram Moolenaar <Bram@vim.org> parents: 25036 diff changeset	967 rettv_list_alloc(lp->ll_tv);
64bef59f11ef patch 8.2.3064: Vim9: in script cannot set item in uninitialized list Bram Moolenaar <Bram@vim.org> parents: 25036 diff changeset	968 else if (lp->ll_tv->v_type == VAR_BLOB
64bef59f11ef patch 8.2.3064: Vim9: in script cannot set item in uninitialized list Bram Moolenaar <Bram@vim.org> parents: 25036 diff changeset	969 && lp->ll_tv->vval.v_blob == NULL)
64bef59f11ef patch 8.2.3064: Vim9: in script cannot set item in uninitialized list Bram Moolenaar <Bram@vim.org> parents: 25036 diff changeset	970 rettv_blob_alloc(lp->ll_tv);
64bef59f11ef patch 8.2.3064: Vim9: in script cannot set item in uninitialized list Bram Moolenaar <Bram@vim.org> parents: 25036 diff changeset	971
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	972 if (lp->ll_range)
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	973 {
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	974 if (!quiet)
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	975 emsg(_("E708: [:] must come last"));
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	976 return NULL;
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	977 }
88 2b4debdc8d2c updated for version 7.0035 vimboss parents: 86 diff changeset	978
22529 35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	979 if (in_vim9script() && lp->ll_valtype == NULL
25607 54fef15ed370 patch 8.2.3340: accessing uninitialized pointer Bram Moolenaar <Bram@vim.org> parents: 25605 diff changeset	980 && v != NULL
22529 35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	981 && lp->ll_tv == &v->di_tv
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	982 && ht != NULL && ht == get_script_local_ht())
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	983 {
25186 0a3b1c66d3f2 patch 8.2.3129: Vim9: imported uninitialized list does not get type checked Bram Moolenaar <Bram@vim.org> parents: 25184 diff changeset	984 svar_T *sv = find_typval_in_script(lp->ll_tv);
22529 35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	985
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	986 // Vim9 script local variable: get the type
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	987 if (sv != NULL)
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	988 lp->ll_valtype = sv->sv_type;
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	989 }
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	990
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	991 len = -1;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	992 if (*p == '.')
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	993 {
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	994 key = p + 1;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	995 for (len = 0; ASCII_ISALNUM(key[len]) \|\| key[len] == '_'; ++len)
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	996 ;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	997 if (len == 0)
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	998 {
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	999 if (!quiet)
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	1000 emsg(_(e_emptykey));
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1001 return NULL;
88 2b4debdc8d2c updated for version 7.0035 vimboss parents: 86 diff changeset	1002 }
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1003 p = key + len;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1004 }
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1005 else
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1006 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1007 // Get the index [expr] or the first index [expr: ].
88 2b4debdc8d2c updated for version 7.0035 vimboss parents: 86 diff changeset	1008 p = skipwhite(p + 1);
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1009 if (*p == ':')
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1010 empty1 = TRUE;
88 2b4debdc8d2c updated for version 7.0035 vimboss parents: 86 diff changeset	1011 else
2b4debdc8d2c updated for version 7.0035 vimboss parents: 86 diff changeset	1012 {
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1013 empty1 = FALSE;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	1014 if (eval1(&p, &var1, &EVALARG_EVALUATE) == FAIL) // recursive!
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1015 return NULL;
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	1016 if (tv_get_string_chk(&var1) == NULL)
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	1017 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1018 // not a number or string
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	1019 clear_tv(&var1);
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	1020 return NULL;
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	1021 }
21622 1f2066e3975a patch 8.2.1361: error for white space after expression in assignment Bram Moolenaar <Bram@vim.org> parents: 21620 diff changeset	1022 p = skipwhite(p);
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1023 }
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1024
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1025 // Optionally get the second index [ :expr].
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1026 if (*p == ':')
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1027 {
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1028 if (lp->ll_tv->v_type == VAR_DICT)
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1029 {
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1030 if (!quiet)
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	1031 emsg(_(e_cannot_slice_dictionary));
10926 7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	1032 clear_tv(&var1);
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1033 return NULL;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1034 }
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1035 if (rettv != NULL
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1036 && !(rettv->v_type == VAR_LIST
15456 f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	1037 && rettv->vval.v_list != NULL)
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1038 && !(rettv->v_type == VAR_BLOB
15456 f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	1039 && rettv->vval.v_blob != NULL))
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1040 {
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1041 if (!quiet)
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	1042 emsg(_("E709: [:] requires a List or Blob value"));
10926 7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	1043 clear_tv(&var1);
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1044 return NULL;
88 2b4debdc8d2c updated for version 7.0035 vimboss parents: 86 diff changeset	1045 }
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1046 p = skipwhite(p + 1);
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1047 if (*p == ']')
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1048 lp->ll_empty2 = TRUE;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1049 else
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1050 {
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1051 lp->ll_empty2 = FALSE;
20397 c225be44692a patch 8.2.0753: Vim9: expressions are evaluated in the discovery phase Bram Moolenaar <Bram@vim.org> parents: 20392 diff changeset	1052 // recursive!
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	1053 if (eval1(&p, &var2, &EVALARG_EVALUATE) == FAIL)
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1054 {
10926 7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	1055 clear_tv(&var1);
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1056 return NULL;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1057 }
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	1058 if (tv_get_string_chk(&var2) == NULL)
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	1059 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1060 // not a number or string
10926 7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	1061 clear_tv(&var1);
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	1062 clear_tv(&var2);
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	1063 return NULL;
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	1064 }
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1065 }
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1066 lp->ll_range = TRUE;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1067 }
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1068 else
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1069 lp->ll_range = FALSE;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1070
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1071 if (*p != ']')
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1072 {
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1073 if (!quiet)
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	1074 emsg(_(e_missbrac));
10926 7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	1075 clear_tv(&var1);
7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	1076 clear_tv(&var2);
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1077 return NULL;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1078 }
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1079
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1080 // Skip to past ']'.
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1081 ++p;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1082 }
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1083
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1084 if (lp->ll_tv->v_type == VAR_DICT)
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1085 {
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1086 if (len == -1)
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1087 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1088 // "[key]": get key from "var1"
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1089 key = tv_get_string_chk(&var1); // is number or string
8839 9fa567d13551 commit https://github.com/vim/vim/commit/0921ecff1c5a74541bad6c073e8ade32247403d8 Christian Brabandt <cb@256bit.org> parents: 8831 diff changeset	1090 if (key == NULL)
9fa567d13551 commit https://github.com/vim/vim/commit/0921ecff1c5a74541bad6c073e8ade32247403d8 Christian Brabandt <cb@256bit.org> parents: 8831 diff changeset	1091 {
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1092 clear_tv(&var1);
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1093 return NULL;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1094 }
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1095 }
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1096 lp->ll_list = NULL;
22365 a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1097
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1098 // a NULL dict is equivalent with an empty dict
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1099 if (lp->ll_tv->vval.v_dict == NULL)
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1100 {
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1101 lp->ll_tv->vval.v_dict = dict_alloc();
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1102 if (lp->ll_tv->vval.v_dict == NULL)
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1103 {
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1104 clear_tv(&var1);
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1105 return NULL;
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1106 }
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1107 ++lp->ll_tv->vval.v_dict->dv_refcount;
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1108 }
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1109 lp->ll_dict = lp->ll_tv->vval.v_dict;
22365 a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1110
121 86d71ae0c85a updated for version 7.0042 vimboss parents: 117 diff changeset	1111 lp->ll_di = dict_find(lp->ll_dict, key, len);
2739 2bd574a2ef1c updated for version 7.3.146 Bram Moolenaar <bram@vim.org> parents: 2690 diff changeset	1112
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1113 // When assigning to a scope dictionary check that a function and
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1114 // variable name is valid (only variable name unless it is l: or
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1115 // g: dictionary). Disallow overwriting a builtin function.
3687 085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1116 if (rettv != NULL && lp->ll_dict->dv_scope != 0)
085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1117 {
085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1118 int prevval;
085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1119 int wrong;
085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1120
085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1121 if (len != -1)
085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1122 {
085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1123 prevval = key[len];
085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1124 key[len] = NUL;
085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1125 }
4819 8c4324e6f477 updated for version 7.3.1156 Bram Moolenaar <bram@vim.org> parents: 4805 diff changeset	1126 else
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1127 prevval = 0; // avoid compiler warning
3687 085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1128 wrong = (lp->ll_dict->dv_scope == VAR_DEF_SCOPE
085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1129 && rettv->v_type == VAR_FUNC
21691 f41c646cb8b9 patch 8.2.1395: Vim9: no error if declaring a funcref with lower case letter Bram Moolenaar <Bram@vim.org> parents: 21674 diff changeset	1130 && var_wrong_func_name(key, lp->ll_di == NULL))
26238 14b4c778b61e patch 8.2.3650: Vim9: for loop variable can be a list member Bram Moolenaar <Bram@vim.org> parents: 26053 diff changeset	1131 \|\| !valid_varname(key, -1, TRUE);
3687 085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1132 if (len != -1)
085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1133 key[len] = prevval;
085f14642fe8 updated for version 7.3.603 Bram Moolenaar <bram@vim.org> parents: 3666 diff changeset	1134 if (wrong)
20128 0b35a7ffceb2 patch 8.2.0619: null dict is not handled like an empty dict Bram Moolenaar <Bram@vim.org> parents: 20126 diff changeset	1135 {
0b35a7ffceb2 patch 8.2.0619: null dict is not handled like an empty dict Bram Moolenaar <Bram@vim.org> parents: 20126 diff changeset	1136 clear_tv(&var1);
2739 2bd574a2ef1c updated for version 7.3.146 Bram Moolenaar <bram@vim.org> parents: 2690 diff changeset	1137 return NULL;
20128 0b35a7ffceb2 patch 8.2.0619: null dict is not handled like an empty dict Bram Moolenaar <Bram@vim.org> parents: 20126 diff changeset	1138 }
2739 2bd574a2ef1c updated for version 7.3.146 Bram Moolenaar <bram@vim.org> parents: 2690 diff changeset	1139 }
2bd574a2ef1c updated for version 7.3.146 Bram Moolenaar <bram@vim.org> parents: 2690 diff changeset	1140
22529 35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	1141 if (lp->ll_valtype != NULL)
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	1142 // use the type of the member
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	1143 lp->ll_valtype = lp->ll_valtype->tt_member;
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	1144
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1145 if (lp->ll_di == NULL)
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1146 {
15762 dff66c4670b1 patch 8.1.0888: the a: dict is not immutable as documented Bram Moolenaar <Bram@vim.org> parents: 15636 diff changeset	1147 // Can't add "v:" or "a:" variable.
17922 4d63d47d87ef patch 8.1.1957: more code can be moved to evalvars.c Bram Moolenaar <Bram@vim.org> parents: 17893 diff changeset	1148 if (lp->ll_dict == get_vimvar_dict()
15762 dff66c4670b1 patch 8.1.0888: the a: dict is not immutable as documented Bram Moolenaar <Bram@vim.org> parents: 15636 diff changeset	1149 \|\| &lp->ll_dict->dv_hashtab == get_funccal_args_ht())
2739 2bd574a2ef1c updated for version 7.3.146 Bram Moolenaar <bram@vim.org> parents: 2690 diff changeset	1150 {
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	1151 semsg(_(e_illvar), name);
16013 93b08b92a049 patch 8.1.1012: memory leak with E461 Bram Moolenaar <Bram@vim.org> parents: 15969 diff changeset	1152 clear_tv(&var1);
2739 2bd574a2ef1c updated for version 7.3.146 Bram Moolenaar <bram@vim.org> parents: 2690 diff changeset	1153 return NULL;
2bd574a2ef1c updated for version 7.3.146 Bram Moolenaar <bram@vim.org> parents: 2690 diff changeset	1154 }
2bd574a2ef1c updated for version 7.3.146 Bram Moolenaar <bram@vim.org> parents: 2690 diff changeset	1155
15762 dff66c4670b1 patch 8.1.0888: the a: dict is not immutable as documented Bram Moolenaar <Bram@vim.org> parents: 15636 diff changeset	1156 // Key does not exist in dict: may need to add it.
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1157 if (p == '[' \|\| p == '.' \|\| unlet)
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1158 {
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1159 if (!quiet)
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	1160 semsg(_(e_dictkey), key);
10926 7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	1161 clear_tv(&var1);
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1162 return NULL;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1163 }
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1164 if (len == -1)
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1165 lp->ll_newkey = vim_strsave(key);
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1166 else
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1167 lp->ll_newkey = vim_strnsave(key, len);
10926 7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	1168 clear_tv(&var1);
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1169 if (lp->ll_newkey == NULL)
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1170 p = NULL;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1171 break;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1172 }
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1173 // existing variable, need to check if it can be changed
10912 fd1760f8c215 patch 8.0.0345: islocked('d.changedtick') does not work Christian Brabandt <cb@256bit.org> parents: 10910 diff changeset	1174 else if ((flags & GLV_READ_ONLY) == 0
22298 07e48ee8c3bb patch 8.2.1698: cannot lock a variable in legacy Vim script like in Vim9 Bram Moolenaar <Bram@vim.org> parents: 22272 diff changeset	1175 && (var_check_ro(lp->ll_di->di_flags, name, FALSE)
07e48ee8c3bb patch 8.2.1698: cannot lock a variable in legacy Vim script like in Vim9 Bram Moolenaar <Bram@vim.org> parents: 22272 diff changeset	1176 \|\| var_check_lock(lp->ll_di->di_flags, name, FALSE)))
10910 8bff367672a4 patch 8.0.0344: unlet command leaks memory Christian Brabandt <cb@256bit.org> parents: 10908 diff changeset	1177 {
8bff367672a4 patch 8.0.0344: unlet command leaks memory Christian Brabandt <cb@256bit.org> parents: 10908 diff changeset	1178 clear_tv(&var1);
2739 2bd574a2ef1c updated for version 7.3.146 Bram Moolenaar <bram@vim.org> parents: 2690 diff changeset	1179 return NULL;
10910 8bff367672a4 patch 8.0.0344: unlet command leaks memory Christian Brabandt <cb@256bit.org> parents: 10908 diff changeset	1180 }
2739 2bd574a2ef1c updated for version 7.3.146 Bram Moolenaar <bram@vim.org> parents: 2690 diff changeset	1181
10926 7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	1182 clear_tv(&var1);
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1183 lp->ll_tv = &lp->ll_di->di_tv;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1184 }
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1185 else if (lp->ll_tv->v_type == VAR_BLOB)
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1186 {
15456 f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	1187 long bloblen = blob_len(lp->ll_tv->vval.v_blob);
f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	1188
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1189 /*
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1190 * Get the number and item for the only or first index of the List.
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1191 */
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1192 if (empty1)
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1193 lp->ll_n1 = 0;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1194 else
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1195 // is number or string
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1196 lp->ll_n1 = (long)tv_get_number(&var1);
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1197 clear_tv(&var1);
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1198
24454 53216e87f21c patch 8.2.2767: compiler warning for unused argument Bram Moolenaar <Bram@vim.org> parents: 24450 diff changeset	1199 if (check_blob_index(bloblen, lp->ll_n1, quiet) == FAIL)
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1200 {
15456 f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	1201 clear_tv(&var2);
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1202 return NULL;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1203 }
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1204 if (lp->ll_range && !lp->ll_empty2)
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1205 {
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1206 lp->ll_n2 = (long)tv_get_number(&var2);
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1207 clear_tv(&var2);
24450 3e1886f1e875 patch 8.2.2765: Vim9: not all blob operations work Bram Moolenaar <Bram@vim.org> parents: 24440 diff changeset	1208 if (check_blob_range(bloblen, lp->ll_n1, lp->ll_n2, quiet)
3e1886f1e875 patch 8.2.2765: Vim9: not all blob operations work Bram Moolenaar <Bram@vim.org> parents: 24440 diff changeset	1209 == FAIL)
15456 f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	1210 return NULL;
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1211 }
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1212 lp->ll_blob = lp->ll_tv->vval.v_blob;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1213 lp->ll_tv = NULL;
16036 89fb86821b4a patch 8.1.1023: may use NULL pointer when indexing a blob Bram Moolenaar <Bram@vim.org> parents: 16013 diff changeset	1214 break;
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1215 }
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1216 else
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1217 {
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1218 /*
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1219 * Get the number and item for the only or first index of the List.
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1220 */
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1221 if (empty1)
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1222 lp->ll_n1 = 0;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1223 else
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1224 // is number or string
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	1225 lp->ll_n1 = (long)tv_get_number(&var1);
10926 7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	1226 clear_tv(&var1);
7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	1227
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1228 lp->ll_dict = NULL;
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1229 lp->ll_list = lp->ll_tv->vval.v_list;
25591 ea69398b40d1 patch 8.2.3332: Vim9: cannot assign to range in list Bram Moolenaar <Bram@vim.org> parents: 25521 diff changeset	1230 lp->ll_li = check_range_index_one(lp->ll_list, &lp->ll_n1, quiet);
842 a209672376fd updated for version 7.0f vimboss parents: 841 diff changeset	1231 if (lp->ll_li == NULL)
a209672376fd updated for version 7.0f vimboss parents: 841 diff changeset	1232 {
25591 ea69398b40d1 patch 8.2.3332: Vim9: cannot assign to range in list Bram Moolenaar <Bram@vim.org> parents: 25521 diff changeset	1233 clear_tv(&var2);
ea69398b40d1 patch 8.2.3332: Vim9: cannot assign to range in list Bram Moolenaar <Bram@vim.org> parents: 25521 diff changeset	1234 return NULL;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1235 }
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1236
22529 35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	1237 if (lp->ll_valtype != NULL)
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	1238 // use the type of the member
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	1239 lp->ll_valtype = lp->ll_valtype->tt_member;
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	1240
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1241 /*
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1242 * May need to find the item or absolute index for the second
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1243 * index of a range.
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1244 * When no index given: "lp->ll_empty2" is TRUE.
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1245 * Otherwise "lp->ll_n2" is set to the second index.
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	1246 */
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1247 if (lp->ll_range && !lp->ll_empty2)
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1248 {
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	1249 lp->ll_n2 = (long)tv_get_number(&var2);
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1250 // is number or string
88 2b4debdc8d2c updated for version 7.0035 vimboss parents: 86 diff changeset	1251 clear_tv(&var2);
25591 ea69398b40d1 patch 8.2.3332: Vim9: cannot assign to range in list Bram Moolenaar <Bram@vim.org> parents: 25521 diff changeset	1252 if (check_range_index_two(lp->ll_list,
ea69398b40d1 patch 8.2.3332: Vim9: cannot assign to range in list Bram Moolenaar <Bram@vim.org> parents: 25521 diff changeset	1253 &lp->ll_n1, lp->ll_li,
ea69398b40d1 patch 8.2.3332: Vim9: cannot assign to range in list Bram Moolenaar <Bram@vim.org> parents: 25521 diff changeset	1254 &lp->ll_n2, quiet) == FAIL)
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1255 return NULL;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1256 }
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1257
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1258 lp->ll_tv = &lp->ll_li->li_tv;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1259 }
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1260 }
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1261
10926 7dab3a9cb933 patch 8.0.0352: not easy to see when a typval needs to be cleared Christian Brabandt <cb@256bit.org> parents: 10912 diff changeset	1262 clear_tv(&var1);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	1263 lp->ll_name_end = p;
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1264 return p;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1265 }
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1266
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1267 /*
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	1268 * Clear lval "lp" that was filled by get_lval().
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1269 */
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	1270 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1271 clear_lval(lval_T *lp)
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1272 {
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1273 vim_free(lp->ll_exp_name);
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1274 vim_free(lp->ll_newkey);
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1275 }
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1276
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1277 /*
151 40a0699b6c62 updated for version 7.0046 vimboss parents: 142 diff changeset	1278 * Set a variable that was parsed by get_lval() to "rettv".
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1279 * "endp" points to just after the parsed name.
15790 05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1280 * "op" is NULL, "+" for "+=", "-" for "-=", "" for "=", "/" for "/=",
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1281 * "%" for "%=", "." for ".=" or "=" for "=".
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1282 */
17873 d50a5faa75bd patch 8.1.1933: the eval.c file is too big Bram Moolenaar <Bram@vim.org> parents: 17833 diff changeset	1283 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1284 set_var_lval(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1285 lval_T *lp,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1286 char_u *endp,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1287 typval_T *rettv,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1288 int copy,
23917 4b417b776b95 patch 8.2.2501: not always clear where an error is reported Bram Moolenaar <Bram@vim.org> parents: 23835 diff changeset	1289 int flags, // ASSIGN_CONST, ASSIGN_NO_DECL
4b417b776b95 patch 8.2.2501: not always clear where an error is reported Bram Moolenaar <Bram@vim.org> parents: 23835 diff changeset	1290 char_u *op,
4b417b776b95 patch 8.2.2501: not always clear where an error is reported Bram Moolenaar <Bram@vim.org> parents: 23835 diff changeset	1291 int var_idx) // index for "let [a, b] = list"
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1292 {
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1293 int cc;
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	1294 dictitem_T *di;
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1295
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1296 if (lp->ll_tv == NULL)
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1297 {
10889 5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1298 cc = *endp;
5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1299 *endp = NUL;
24717 bf8feac8a89a patch 8.2.2897: Vim9: can use reserved words at the script level Bram Moolenaar <Bram@vim.org> parents: 24713 diff changeset	1300 if (in_vim9script() && check_reserved_name(lp->ll_name) == FAIL)
bf8feac8a89a patch 8.2.2897: Vim9: can use reserved words at the script level Bram Moolenaar <Bram@vim.org> parents: 24713 diff changeset	1301 return;
bf8feac8a89a patch 8.2.2897: Vim9: can use reserved words at the script level Bram Moolenaar <Bram@vim.org> parents: 24713 diff changeset	1302
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1303 if (lp->ll_blob != NULL)
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1304 {
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1305 int error = FALSE, val;
15456 f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	1306
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1307 if (op != NULL && *op != '=')
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1308 {
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	1309 semsg(_(e_letwrong), op);
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1310 return;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1311 }
22298 07e48ee8c3bb patch 8.2.1698: cannot lock a variable in legacy Vim script like in Vim9 Bram Moolenaar <Bram@vim.org> parents: 22272 diff changeset	1312 if (value_check_lock(lp->ll_blob->bv_lock, lp->ll_name, FALSE))
21847 fb74a3387694 patch 8.2.1473: items in a list given to :const can still be modified Bram Moolenaar <Bram@vim.org> parents: 21837 diff changeset	1313 return;
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1314
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1315 if (lp->ll_range && rettv->v_type == VAR_BLOB)
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1316 {
15456 f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	1317 if (lp->ll_empty2)
f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	1318 lp->ll_n2 = blob_len(lp->ll_blob) - 1;
f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	1319
24434 602e528a8e43 patch 8.2.2757: Vim9: blob tests for legacy and Vim9 script are separate Bram Moolenaar <Bram@vim.org> parents: 24432 diff changeset	1320 if (blob_set_range(lp->ll_blob, lp->ll_n1, lp->ll_n2,
602e528a8e43 patch 8.2.2757: Vim9: blob tests for legacy and Vim9 script are separate Bram Moolenaar <Bram@vim.org> parents: 24432 diff changeset	1321 rettv) == FAIL)
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1322 return;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1323 }
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1324 else
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1325 {
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1326 val = (int)tv_get_number_chk(rettv, &error);
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1327 if (!error)
24486 5e0db87e5184 patch 8.2.2783: duplicate code for setting byte in blob, blob test may fail Bram Moolenaar <Bram@vim.org> parents: 24454 diff changeset	1328 blob_set_append(lp->ll_blob, lp->ll_n1, val);
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1329 }
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1330 }
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1331 else if (op != NULL && *op != '=')
10889 5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1332 {
5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1333 typval_T tv;
5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1334
24440 d2f9bdd938fa patch 8.2.2760: Vim9: no error for changing a for loop variable Bram Moolenaar <Bram@vim.org> parents: 24434 diff changeset	1335 if ((flags & (ASSIGN_CONST \| ASSIGN_FINAL))
d2f9bdd938fa patch 8.2.2760: Vim9: no error for changing a for loop variable Bram Moolenaar <Bram@vim.org> parents: 24434 diff changeset	1336 && (flags & ASSIGN_FOR_LOOP) == 0)
17079 00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1337 {
00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1338 emsg(_(e_cannot_mod));
00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1339 *endp = cc;
00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1340 return;
00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1341 }
00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1342
15790 05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1343 // handle +=, -=, *=, /=, %= and .=
10889 5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1344 di = NULL;
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21118 diff changeset	1345 if (eval_variable(lp->ll_name, (int)STRLEN(lp->ll_name),
24112 0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	1346 &tv, &di, EVAL_VAR_VERBOSE) == OK)
10889 5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1347 {
5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1348 if ((di == NULL
15780 5b6c3c7feba8 patch 8.1.0897: can modify a:000 when using a reference Bram Moolenaar <Bram@vim.org> parents: 15770 diff changeset	1349 \|\| (!var_check_ro(di->di_flags, lp->ll_name, FALSE)
5b6c3c7feba8 patch 8.1.0897: can modify a:000 when using a reference Bram Moolenaar <Bram@vim.org> parents: 15770 diff changeset	1350 && !tv_check_lock(&di->di_tv, lp->ll_name, FALSE)))
10889 5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1351 && tv_op(&tv, rettv, op) == OK)
25284 29191571eceb patch 8.2.3179: Vim9: cannot assign to an imported variable at script level Bram Moolenaar <Bram@vim.org> parents: 25280 diff changeset	1352 set_var_const(lp->ll_name, NULL, &tv, FALSE,
29191571eceb patch 8.2.3179: Vim9: cannot assign to an imported variable at script level Bram Moolenaar <Bram@vim.org> parents: 25280 diff changeset	1353 ASSIGN_NO_DECL, 0);
10889 5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1354 clear_tv(&tv);
5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1355 }
5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1356 }
5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1357 else
21443 66386ca8a69f patch 8.2.1272: Vim9: type not checked if declaration also assigns value Bram Moolenaar <Bram@vim.org> parents: 21425 diff changeset	1358 {
25326 cfbf40f749b0 patch 8.2.3200: Vim9: hard to guess where a type error is given Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1359 if (lp->ll_type != NULL && check_typval_arg_type(lp->ll_type, rettv,
cfbf40f749b0 patch 8.2.3200: Vim9: hard to guess where a type error is given Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1360 NULL, 0) == FAIL)
21443 66386ca8a69f patch 8.2.1272: Vim9: type not checked if declaration also assigns value Bram Moolenaar <Bram@vim.org> parents: 21425 diff changeset	1361 return;
23917 4b417b776b95 patch 8.2.2501: not always clear where an error is reported Bram Moolenaar <Bram@vim.org> parents: 23835 diff changeset	1362 set_var_const(lp->ll_name, lp->ll_type, rettv, copy,
4b417b776b95 patch 8.2.2501: not always clear where an error is reported Bram Moolenaar <Bram@vim.org> parents: 23835 diff changeset	1363 flags, var_idx);
21443 66386ca8a69f patch 8.2.1272: Vim9: type not checked if declaration also assigns value Bram Moolenaar <Bram@vim.org> parents: 21425 diff changeset	1364 }
10889 5780bd3a5a7e patch 8.0.0334: can't access b:changedtick from a dict reference Christian Brabandt <cb@256bit.org> parents: 10728 diff changeset	1365 *endp = cc;
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1366 }
22298 07e48ee8c3bb patch 8.2.1698: cannot lock a variable in legacy Vim script like in Vim9 Bram Moolenaar <Bram@vim.org> parents: 22272 diff changeset	1367 else if (value_check_lock(lp->ll_newkey == NULL
151 40a0699b6c62 updated for version 7.0046 vimboss parents: 142 diff changeset	1368 ? lp->ll_tv->v_lock
6773 eb4b705a5d6a patch 7.4.708 Bram Moolenaar <bram@vim.org> parents: 6761 diff changeset	1369 : lp->ll_tv->vval.v_dict->dv_lock, lp->ll_name, FALSE))
151 40a0699b6c62 updated for version 7.0046 vimboss parents: 142 diff changeset	1370 ;
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1371 else if (lp->ll_range)
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1372 {
24440 d2f9bdd938fa patch 8.2.2760: Vim9: no error for changing a for loop variable Bram Moolenaar <Bram@vim.org> parents: 24434 diff changeset	1373 if ((flags & (ASSIGN_CONST \| ASSIGN_FINAL))
d2f9bdd938fa patch 8.2.2760: Vim9: no error for changing a for loop variable Bram Moolenaar <Bram@vim.org> parents: 24434 diff changeset	1374 && (flags & ASSIGN_FOR_LOOP) == 0)
17079 00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1375 {
00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1376 emsg(_("E996: Cannot lock a range"));
00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1377 return;
00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1378 }
00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1379
25591 ea69398b40d1 patch 8.2.3332: Vim9: cannot assign to range in list Bram Moolenaar <Bram@vim.org> parents: 25521 diff changeset	1380 (void)list_assign_range(lp->ll_list, rettv->vval.v_list,
ea69398b40d1 patch 8.2.3332: Vim9: cannot assign to range in list Bram Moolenaar <Bram@vim.org> parents: 25521 diff changeset	1381 lp->ll_n1, lp->ll_n2, lp->ll_empty2, op, lp->ll_name);
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1382 }
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1383 else
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1384 {
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1385 /*
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1386 * Assign to a List or Dictionary item.
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1387 */
24440 d2f9bdd938fa patch 8.2.2760: Vim9: no error for changing a for loop variable Bram Moolenaar <Bram@vim.org> parents: 24434 diff changeset	1388 if ((flags & (ASSIGN_CONST \| ASSIGN_FINAL))
d2f9bdd938fa patch 8.2.2760: Vim9: no error for changing a for loop variable Bram Moolenaar <Bram@vim.org> parents: 24434 diff changeset	1389 && (flags & ASSIGN_FOR_LOOP) == 0)
17079 00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1390 {
00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1391 emsg(_("E996: Cannot lock a list or dict"));
00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1392 return;
00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1393 }
22529 35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	1394
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	1395 if (lp->ll_valtype != NULL
25326 cfbf40f749b0 patch 8.2.3200: Vim9: hard to guess where a type error is given Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1396 && check_typval_arg_type(lp->ll_valtype, rettv,
cfbf40f749b0 patch 8.2.3200: Vim9: hard to guess where a type error is given Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	1397 NULL, 0) == FAIL)
22529 35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	1398 return;
35ef9b0a81a3 patch 8.2.1813: Vim9: can assign wrong type to script dict Bram Moolenaar <Bram@vim.org> parents: 22500 diff changeset	1399
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1400 if (lp->ll_newkey != NULL)
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1401 {
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1402 if (op != NULL && *op != '=')
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1403 {
24363 1a145eb83a28 patch 8.2.2722: Vim9: crash when using LHS with double index Bram Moolenaar <Bram@vim.org> parents: 24343 diff changeset	1404 semsg(_(e_dictkey), lp->ll_newkey);
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1405 return;
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1406 }
24764 3907cf9be745 patch 8.2.2920: still a way to shadow a builtin function Bram Moolenaar <Bram@vim.org> parents: 24760 diff changeset	1407 if (dict_wrong_func_name(lp->ll_tv->vval.v_dict, rettv,
3907cf9be745 patch 8.2.2920: still a way to shadow a builtin function Bram Moolenaar <Bram@vim.org> parents: 24760 diff changeset	1408 lp->ll_newkey))
24760 ca0f983f08cf patch 8.2.2918: builtin function can be shadowed by global variable Bram Moolenaar <Bram@vim.org> parents: 24717 diff changeset	1409 return;
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1410
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1411 // Need to add an item to the Dictionary.
121 86d71ae0c85a updated for version 7.0042 vimboss parents: 117 diff changeset	1412 di = dictitem_alloc(lp->ll_newkey);
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1413 if (di == NULL)
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1414 return;
121 86d71ae0c85a updated for version 7.0042 vimboss parents: 117 diff changeset	1415 if (dict_add(lp->ll_tv->vval.v_dict, di) == FAIL)
86d71ae0c85a updated for version 7.0042 vimboss parents: 117 diff changeset	1416 {
86d71ae0c85a updated for version 7.0042 vimboss parents: 117 diff changeset	1417 vim_free(di);
86d71ae0c85a updated for version 7.0042 vimboss parents: 117 diff changeset	1418 return;
86d71ae0c85a updated for version 7.0042 vimboss parents: 117 diff changeset	1419 }
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1420 lp->ll_tv = &di->di_tv;
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1421 }
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1422 else if (op != NULL && *op != '=')
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1423 {
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1424 tv_op(lp->ll_tv, rettv, op);
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1425 return;
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1426 }
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1427 else
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1428 clear_tv(lp->ll_tv);
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1429
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1430 /*
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1431 * Assign the value to the variable or list item.
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1432 */
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1433 if (copy)
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1434 copy_tv(rettv, lp->ll_tv);
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1435 else
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1436 {
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1437 lp->ll_tv = rettv;
156 c5b05f6de1ad updated for version 7.0047 vimboss parents: 151 diff changeset	1438 lp->ll_tv->v_lock = 0;
110 3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1439 init_tv(rettv);
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1440 }
3b1d692e5a2c updated for version 7.0040 vimboss parents: 104 diff changeset	1441 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1442 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1443
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1444 /*
15790 05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1445 * Handle "tv1 += tv2", "tv1 -= tv2", "tv1 *= tv2", "tv1 /= tv2", "tv1 %= tv2"
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1446 * and "tv1 .= tv2"
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1447 * Returns OK or FAIL.
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1448 */
25591 ea69398b40d1 patch 8.2.3332: Vim9: cannot assign to range in list Bram Moolenaar <Bram@vim.org> parents: 25521 diff changeset	1449 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1450 tv_op(typval_T tv1, typval_T tv2, char_u *op)
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1451 {
9389 32e34e574716 commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12 Christian Brabandt <cb@256bit.org> parents: 9387 diff changeset	1452 varnumber_T n;
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1453 char_u numbuf[NUMBUFLEN];
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1454 char_u *s;
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	1455 int failed = FALSE;
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1456
25455 e7c02cbe701f patch 8.2.3264: Vim9: assign test fails Bram Moolenaar <Bram@vim.org> parents: 25425 diff changeset	1457 // Can't do anything with a Funcref or Dict on the right.
e7c02cbe701f patch 8.2.3264: Vim9: assign test fails Bram Moolenaar <Bram@vim.org> parents: 25425 diff changeset	1458 // v:true and friends only work with "..=".
7712 bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	1459 if (tv2->v_type != VAR_FUNC && tv2->v_type != VAR_DICT
25455 e7c02cbe701f patch 8.2.3264: Vim9: assign test fails Bram Moolenaar <Bram@vim.org> parents: 25425 diff changeset	1460 && ((tv2->v_type != VAR_BOOL && tv2->v_type != VAR_SPECIAL)
e7c02cbe701f patch 8.2.3264: Vim9: assign test fails Bram Moolenaar <Bram@vim.org> parents: 25425 diff changeset	1461 \|\| *op == '.'))
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1462 {
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1463 switch (tv1->v_type)
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1464 {
7957 b74549818500 commit https://github.com/vim/vim/commit/835dc636a5350f610b62f110227d2363b5b2880a Christian Brabandt <cb@256bit.org> parents: 7955 diff changeset	1465 case VAR_UNKNOWN:
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19888 diff changeset	1466 case VAR_ANY:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	1467 case VAR_VOID:
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1468 case VAR_DICT:
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1469 case VAR_FUNC:
8538 c337c813c64d commit https://github.com/vim/vim/commit/1735bc988c546cc962c5f94792815b4d7cb79710 Christian Brabandt <cb@256bit.org> parents: 8536 diff changeset	1470 case VAR_PARTIAL:
19102 ba9f50bfda83 patch 8.2.0111: VAR_SPECIAL is also used for booleans Bram Moolenaar <Bram@vim.org> parents: 19087 diff changeset	1471 case VAR_BOOL:
7712 bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	1472 case VAR_SPECIAL:
7957 b74549818500 commit https://github.com/vim/vim/commit/835dc636a5350f610b62f110227d2363b5b2880a Christian Brabandt <cb@256bit.org> parents: 7955 diff changeset	1473 case VAR_JOB:
8041 c6443e78cf2d commit https://github.com/vim/vim/commit/7707344ddec9069b495b2a5ed41f2104466fc88b Christian Brabandt <cb@256bit.org> parents: 8031 diff changeset	1474 case VAR_CHANNEL:
24606 a4fda40e0bb9 patch 8.2.2842: Vim9: skip argument to searchpair() is not compiled Bram Moolenaar <Bram@vim.org> parents: 24553 diff changeset	1475 case VAR_INSTR:
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1476 break;
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1477
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1478 case VAR_BLOB:
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1479 if (*op != '+' \|\| tv2->v_type != VAR_BLOB)
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1480 break;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1481 // BLOB += BLOB
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1482 if (tv1->vval.v_blob != NULL && tv2->vval.v_blob != NULL)
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1483 {
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1484 blob_T *b1 = tv1->vval.v_blob;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1485 blob_T *b2 = tv2->vval.v_blob;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1486 int i, len = blob_len(b2);
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1487 for (i = 0; i < len; i++)
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1488 ga_append(&b1->bv_ga, blob_get(b2, i));
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1489 }
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1490 return OK;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1491
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1492 case VAR_LIST:
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1493 if (*op != '+' \|\| tv2->v_type != VAR_LIST)
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1494 break;
15790 05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1495 // List += List
22365 a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1496 if (tv2->vval.v_list != NULL)
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1497 {
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1498 if (tv1->vval.v_list == NULL)
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1499 {
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1500 tv1->vval.v_list = tv2->vval.v_list;
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1501 ++tv1->vval.v_list->lv_refcount;
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1502 }
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1503 else
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1504 list_extend(tv1->vval.v_list, tv2->vval.v_list, NULL);
a4866826cebc patch 8.2.1731: Vim9: cannot use += to append to empty NULL list Bram Moolenaar <Bram@vim.org> parents: 22298 diff changeset	1505 }
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1506 return OK;
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1507
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1508 case VAR_NUMBER:
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1509 case VAR_STRING:
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1510 if (tv2->v_type == VAR_LIST)
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1511 break;
15790 05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1512 if (vim_strchr((char_u )"+-/%", *op) != NULL)
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1513 {
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1514 // nr += nr , nr -= nr , nr *=nr , nr /= nr , nr %= nr
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	1515 n = tv_get_number(tv1);
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1516 #ifdef FEAT_FLOAT
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1517 if (tv2->v_type == VAR_FLOAT)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1518 {
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1519 float_T f = n;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1520
15790 05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1521 if (*op == '%')
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1522 break;
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1523 switch (*op)
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1524 {
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1525 case '+': f += tv2->vval.v_float; break;
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1526 case '-': f -= tv2->vval.v_float; break;
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1527 case '': f = tv2->vval.v_float; break;
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1528 case '/': f /= tv2->vval.v_float; break;
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1529 }
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1530 clear_tv(tv1);
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1531 tv1->v_type = VAR_FLOAT;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1532 tv1->vval.v_float = f;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1533 }
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1534 else
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1535 #endif
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1536 {
15790 05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1537 switch (*op)
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1538 {
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1539 case '+': n += tv_get_number(tv2); break;
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1540 case '-': n -= tv_get_number(tv2); break;
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1541 case '': n = tv_get_number(tv2); break;
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	1542 case '/': n = num_divide(n, tv_get_number(tv2),
e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	1543 &failed); break;
e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	1544 case '%': n = num_modulus(n, tv_get_number(tv2),
e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	1545 &failed); break;
15790 05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1546 }
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1547 clear_tv(tv1);
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1548 tv1->v_type = VAR_NUMBER;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1549 tv1->vval.v_number = n;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1550 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1551 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1552 else
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1553 {
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1554 if (tv2->v_type == VAR_FLOAT)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1555 break;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1556
15790 05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1557 // str .= str
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	1558 s = tv_get_string(tv1);
de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	1559 s = concat_str(s, tv_get_string_buf(tv2, numbuf));
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1560 clear_tv(tv1);
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1561 tv1->v_type = VAR_STRING;
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1562 tv1->vval.v_string = s;
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1563 }
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	1564 return failed ? FAIL : OK;
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1565
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1566 case VAR_FLOAT:
8364 991d8fd4d841 commit https://github.com/vim/vim/commit/5fac467474376a844407cecc0ff481510ead221c Christian Brabandt <cb@256bit.org> parents: 8350 diff changeset	1567 #ifdef FEAT_FLOAT
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1568 {
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1569 float_T f;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1570
15790 05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1571 if (op == '%' \|\| op == '.'
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1572 \|\| (tv2->v_type != VAR_FLOAT
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1573 && tv2->v_type != VAR_NUMBER
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1574 && tv2->v_type != VAR_STRING))
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1575 break;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1576 if (tv2->v_type == VAR_FLOAT)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1577 f = tv2->vval.v_float;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1578 else
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	1579 f = tv_get_number(tv2);
15790 05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1580 switch (*op)
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1581 {
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1582 case '+': tv1->vval.v_float += f; break;
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1583 case '-': tv1->vval.v_float -= f; break;
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1584 case '': tv1->vval.v_float = f; break;
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1585 case '/': tv1->vval.v_float /= f; break;
05d836c8f1c4 patch 8.1.0902: incomplete set of assignment operators Bram Moolenaar <Bram@vim.org> parents: 15784 diff changeset	1586 }
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1587 }
8364 991d8fd4d841 commit https://github.com/vim/vim/commit/5fac467474376a844407cecc0ff481510ead221c Christian Brabandt <cb@256bit.org> parents: 8350 diff changeset	1588 #endif
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	1589 return OK;
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1590 }
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1591 }
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1592
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	1593 semsg(_(e_letwrong), op);
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1594 return FAIL;
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1595 }
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1596
d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	1597 /*
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1598 * Evaluate the expression used in a ":for var in expr" command.
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1599 * "arg" points to "var".
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1600 * Set "*errp" to TRUE for an error, FALSE otherwise;
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1601 * Return a pointer that holds the info. Null when there is an error.
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1602 */
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1603 void *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1604 eval_for_line(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1605 char_u *arg,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1606 int *errp,
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	1607 exarg_T *eap,
21058 111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1608 evalarg_T *evalarg)
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1609 {
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	1610 forinfo_T *fi;
25149 18b31f0a4bb5 patch 8.2.3111: Vim9: confusing error with extra whitespace before colon Bram Moolenaar <Bram@vim.org> parents: 25064 diff changeset	1611 char_u *var_list_end;
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1612 char_u *expr;
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	1613 typval_T tv;
3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	1614 list_T *l;
21058 111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1615 int skip = !(evalarg->eval_flags & EVAL_EVALUATE);
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1616
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1617 *errp = TRUE; // default: there is an error
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1618
16825 ce04ebdf26b8 patch 8.1.1414: alloc() returning "char_u " causes a lot of type casts Bram Moolenaar <Bram@vim.org>* parents: 16796 diff changeset	1619 fi = ALLOC_CLEAR_ONE(forinfo_T);
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1620 if (fi == NULL)
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1621 return NULL;
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1622
25149 18b31f0a4bb5 patch 8.2.3111: Vim9: confusing error with extra whitespace before colon Bram Moolenaar <Bram@vim.org> parents: 25064 diff changeset	1623 var_list_end = skip_var_list(arg, TRUE, &fi->fi_varcount,
18b31f0a4bb5 patch 8.2.3111: Vim9: confusing error with extra whitespace before colon Bram Moolenaar <Bram@vim.org> parents: 25064 diff changeset	1624 &fi->fi_semicolon, FALSE);
18b31f0a4bb5 patch 8.2.3111: Vim9: confusing error with extra whitespace before colon Bram Moolenaar <Bram@vim.org> parents: 25064 diff changeset	1625 if (var_list_end == NULL)
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1626 return fi;
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1627
25149 18b31f0a4bb5 patch 8.2.3111: Vim9: confusing error with extra whitespace before colon Bram Moolenaar <Bram@vim.org> parents: 25064 diff changeset	1628 expr = skipwhite_and_linebreak(var_list_end, evalarg);
21058 111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1629 if (expr[0] != 'i' \|\| expr[1] != 'n'
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1630 \|\| !(expr[2] == NUL \|\| VIM_ISWHITE(expr[2])))
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1631 {
25149 18b31f0a4bb5 patch 8.2.3111: Vim9: confusing error with extra whitespace before colon Bram Moolenaar <Bram@vim.org> parents: 25064 diff changeset	1632 if (in_vim9script() && *expr == ':' && expr != var_list_end)
18b31f0a4bb5 patch 8.2.3111: Vim9: confusing error with extra whitespace before colon Bram Moolenaar <Bram@vim.org> parents: 25064 diff changeset	1633 semsg(_(e_no_white_space_allowed_before_colon_str), expr);
18b31f0a4bb5 patch 8.2.3111: Vim9: confusing error with extra whitespace before colon Bram Moolenaar <Bram@vim.org> parents: 25064 diff changeset	1634 else
18b31f0a4bb5 patch 8.2.3111: Vim9: confusing error with extra whitespace before colon Bram Moolenaar <Bram@vim.org> parents: 25064 diff changeset	1635 emsg(_(e_missing_in));
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1636 return fi;
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1637 }
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1638
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1639 if (skip)
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1640 ++emsg_skip;
21058 111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1641 expr = skipwhite_and_linebreak(expr + 2, evalarg);
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1642 if (eval0(expr, &tv, eap, evalarg) == OK)
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1643 {
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1644 *errp = FALSE;
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1645 if (!skip)
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1646 {
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1647 if (tv.v_type == VAR_LIST)
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1648 {
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1649 l = tv.vval.v_list;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1650 if (l == NULL)
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1651 {
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1652 // a null list is like an empty list: do nothing
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1653 clear_tv(&tv);
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1654 }
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1655 else
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1656 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	1657 // Need a real list here.
20392 4c317d8c1051 patch 8.2.0751: Vim9: performance can be improved Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	1658 CHECK_LIST_MATERIALIZE(l);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	1659
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1660 // No need to increment the refcount, it's already set for
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1661 // the list being used in "tv".
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1662 fi->fi_list = l;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1663 list_add_watch(l, &fi->fi_lw);
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1664 fi->fi_lw.lw_item = l->lv_first;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1665 }
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1666 }
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1667 else if (tv.v_type == VAR_BLOB)
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1668 {
15581 c2382f0d1279 patch 8.1.0798: changing a blob while iterating over it works strangely Bram Moolenaar <Bram@vim.org> parents: 15543 diff changeset	1669 fi->fi_bi = 0;
c2382f0d1279 patch 8.1.0798: changing a blob while iterating over it works strangely Bram Moolenaar <Bram@vim.org> parents: 15543 diff changeset	1670 if (tv.vval.v_blob != NULL)
c2382f0d1279 patch 8.1.0798: changing a blob while iterating over it works strangely Bram Moolenaar <Bram@vim.org> parents: 15543 diff changeset	1671 {
c2382f0d1279 patch 8.1.0798: changing a blob while iterating over it works strangely Bram Moolenaar <Bram@vim.org> parents: 15543 diff changeset	1672 typval_T btv;
c2382f0d1279 patch 8.1.0798: changing a blob while iterating over it works strangely Bram Moolenaar <Bram@vim.org> parents: 15543 diff changeset	1673
c2382f0d1279 patch 8.1.0798: changing a blob while iterating over it works strangely Bram Moolenaar <Bram@vim.org> parents: 15543 diff changeset	1674 // Make a copy, so that the iteration still works when the
c2382f0d1279 patch 8.1.0798: changing a blob while iterating over it works strangely Bram Moolenaar <Bram@vim.org> parents: 15543 diff changeset	1675 // blob is changed.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	1676 blob_copy(tv.vval.v_blob, &btv);
15581 c2382f0d1279 patch 8.1.0798: changing a blob while iterating over it works strangely Bram Moolenaar <Bram@vim.org> parents: 15543 diff changeset	1677 fi->fi_blob = btv.vval.v_blob;
c2382f0d1279 patch 8.1.0798: changing a blob while iterating over it works strangely Bram Moolenaar <Bram@vim.org> parents: 15543 diff changeset	1678 }
c2382f0d1279 patch 8.1.0798: changing a blob while iterating over it works strangely Bram Moolenaar <Bram@vim.org> parents: 15543 diff changeset	1679 clear_tv(&tv);
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1680 }
24234 7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1681 else if (tv.v_type == VAR_STRING)
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1682 {
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1683 fi->fi_byte_idx = 0;
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1684 fi->fi_string = tv.vval.v_string;
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1685 tv.vval.v_string = NULL;
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1686 if (fi->fi_string == NULL)
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1687 fi->fi_string = vim_strsave((char_u *)"");
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1688 }
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1689 else
359 6c62b9b939bd updated for version 7.0093 vimboss parents: 357 diff changeset	1690 {
25495 7144d2ffc86b patch 8.2.3284: no error for insert() or remove() changing a locked blob Bram Moolenaar <Bram@vim.org> parents: 25455 diff changeset	1691 emsg(_(e_string_list_or_blob_required));
359 6c62b9b939bd updated for version 7.0093 vimboss parents: 357 diff changeset	1692 clear_tv(&tv);
6c62b9b939bd updated for version 7.0093 vimboss parents: 357 diff changeset	1693 }
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1694 }
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1695 }
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1696 if (skip)
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1697 --emsg_skip;
21058 111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1698 fi->fi_break_count = evalarg->eval_break_count;
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1699
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1700 return fi;
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1701 }
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1702
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1703 /*
21058 111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1704 * Used when looping over a :for line, skip the "in expr" part.
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1705 */
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1706 void
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1707 skip_for_lines(void fi_void, evalarg_T evalarg)
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1708 {
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1709 forinfo_T fi = (forinfo_T )fi_void;
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1710 int i;
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1711
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1712 for (i = 0; i < fi->fi_break_count; ++i)
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1713 eval_next_line(evalarg);
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1714 }
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1715
111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	1716 /*
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1717 * Use the first item in a ":for" list. Advance to the next.
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1718 * Assign the values to the variable (list). "arg" points to the first one.
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1719 * Return TRUE when a valid item was found, FALSE when at end of list or
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1720 * something wrong.
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1721 */
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1722 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1723 next_for_item(void fi_void, char_u arg)
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1724 {
4974 a594ce86b5ea updated for version 7.3.1232 Bram Moolenaar <bram@vim.org> parents: 4936 diff changeset	1725 forinfo_T fi = (forinfo_T )fi_void;
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1726 int result;
24440 d2f9bdd938fa patch 8.2.2760: Vim9: no error for changing a for loop variable Bram Moolenaar <Bram@vim.org> parents: 24434 diff changeset	1727 int flag = ASSIGN_FOR_LOOP \| (in_vim9script()
25153 610e15e8778d patch 8.2.3113: no error when for loop variable shadows script variable Bram Moolenaar <Bram@vim.org> parents: 25149 diff changeset	1728 ? (ASSIGN_FINAL
610e15e8778d patch 8.2.3113: no error when for loop variable shadows script variable Bram Moolenaar <Bram@vim.org> parents: 25149 diff changeset	1729 // first round: error if variable exists
610e15e8778d patch 8.2.3113: no error when for loop variable shadows script variable Bram Moolenaar <Bram@vim.org> parents: 25149 diff changeset	1730 \| (fi->fi_bi == 0 ? 0 : ASSIGN_DECL)
610e15e8778d patch 8.2.3113: no error when for loop variable shadows script variable Bram Moolenaar <Bram@vim.org> parents: 25149 diff changeset	1731 \| ASSIGN_NO_MEMBER_TYPE)
24440 d2f9bdd938fa patch 8.2.2760: Vim9: no error for changing a for loop variable Bram Moolenaar <Bram@vim.org> parents: 24434 diff changeset	1732 : 0);
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	1733 listitem_T *item;
25280 ca7a8ea2eb5f patch 8.2.3177: Vim9: can not use "for _ in expr" at script level Bram Moolenaar <Bram@vim.org> parents: 25276 diff changeset	1734 int skip_assign = in_vim9script() && arg[0] == '_'
ca7a8ea2eb5f patch 8.2.3177: Vim9: can not use "for _ in expr" at script level Bram Moolenaar <Bram@vim.org> parents: 25276 diff changeset	1735 && !eval_isnamec(arg[1]);
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1736
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1737 if (fi->fi_blob != NULL)
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1738 {
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1739 typval_T tv;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1740
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1741 if (fi->fi_bi >= blob_len(fi->fi_blob))
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1742 return FALSE;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1743 tv.v_type = VAR_NUMBER;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1744 tv.v_lock = VAR_FIXED;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1745 tv.vval.v_number = blob_get(fi->fi_blob, fi->fi_bi);
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1746 ++fi->fi_bi;
25280 ca7a8ea2eb5f patch 8.2.3177: Vim9: can not use "for _ in expr" at script level Bram Moolenaar <Bram@vim.org> parents: 25276 diff changeset	1747 if (skip_assign)
ca7a8ea2eb5f patch 8.2.3177: Vim9: can not use "for _ in expr" at script level Bram Moolenaar <Bram@vim.org> parents: 25276 diff changeset	1748 return TRUE;
17079 00ffed9bbb65 patch 8.1.1539: not easy to define a variable and lock it Bram Moolenaar <Bram@vim.org> parents: 17053 diff changeset	1749 return ex_let_vars(arg, &tv, TRUE, fi->fi_semicolon,
24234 7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1750 fi->fi_varcount, flag, NULL) == OK;
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1751 }
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1752
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1753 if (fi->fi_string != NULL)
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1754 {
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1755 typval_T tv;
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1756 int len;
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1757
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1758 len = mb_ptr2len(fi->fi_string + fi->fi_byte_idx);
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1759 if (len == 0)
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1760 return FALSE;
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1761 tv.v_type = VAR_STRING;
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1762 tv.v_lock = VAR_FIXED;
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1763 tv.vval.v_string = vim_strnsave(fi->fi_string + fi->fi_byte_idx, len);
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1764 fi->fi_byte_idx += len;
25153 610e15e8778d patch 8.2.3113: no error when for loop variable shadows script variable Bram Moolenaar <Bram@vim.org> parents: 25149 diff changeset	1765 ++fi->fi_bi;
25280 ca7a8ea2eb5f patch 8.2.3177: Vim9: can not use "for _ in expr" at script level Bram Moolenaar <Bram@vim.org> parents: 25276 diff changeset	1766 if (skip_assign)
ca7a8ea2eb5f patch 8.2.3177: Vim9: can not use "for _ in expr" at script level Bram Moolenaar <Bram@vim.org> parents: 25276 diff changeset	1767 result = TRUE;
ca7a8ea2eb5f patch 8.2.3177: Vim9: can not use "for _ in expr" at script level Bram Moolenaar <Bram@vim.org> parents: 25276 diff changeset	1768 else
ca7a8ea2eb5f patch 8.2.3177: Vim9: can not use "for _ in expr" at script level Bram Moolenaar <Bram@vim.org> parents: 25276 diff changeset	1769 result = ex_let_vars(arg, &tv, TRUE, fi->fi_semicolon,
24234 7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1770 fi->fi_varcount, flag, NULL) == OK;
24240 2194227d034a patch 8.2.2661: leaking memory when looping over a string Bram Moolenaar <Bram@vim.org> parents: 24234 diff changeset	1771 vim_free(tv.vval.v_string);
2194227d034a patch 8.2.2661: leaking memory when looping over a string Bram Moolenaar <Bram@vim.org> parents: 24234 diff changeset	1772 return result;
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1773 }
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	1774
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1775 item = fi->fi_lw.lw_item;
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1776 if (item == NULL)
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1777 result = FALSE;
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1778 else
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1779 {
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1780 fi->fi_lw.lw_item = item->li_next;
25153 610e15e8778d patch 8.2.3113: no error when for loop variable shadows script variable Bram Moolenaar <Bram@vim.org> parents: 25149 diff changeset	1781 ++fi->fi_bi;
25280 ca7a8ea2eb5f patch 8.2.3177: Vim9: can not use "for _ in expr" at script level Bram Moolenaar <Bram@vim.org> parents: 25276 diff changeset	1782 if (skip_assign)
ca7a8ea2eb5f patch 8.2.3177: Vim9: can not use "for _ in expr" at script level Bram Moolenaar <Bram@vim.org> parents: 25276 diff changeset	1783 result = TRUE;
ca7a8ea2eb5f patch 8.2.3177: Vim9: can not use "for _ in expr" at script level Bram Moolenaar <Bram@vim.org> parents: 25276 diff changeset	1784 else
ca7a8ea2eb5f patch 8.2.3177: Vim9: can not use "for _ in expr" at script level Bram Moolenaar <Bram@vim.org> parents: 25276 diff changeset	1785 result = (ex_let_vars(arg, &item->li_tv, TRUE, fi->fi_semicolon,
24234 7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1786 fi->fi_varcount, flag, NULL) == OK);
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1787 }
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1788 return result;
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1789 }
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1790
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1791 /*
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1792 * Free the structure used to store info used by ":for".
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1793 */
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1794 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1795 free_for_info(void *fi_void)
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1796 {
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	1797 forinfo_T fi = (forinfo_T )fi_void;
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1798
24234 7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1799 if (fi == NULL)
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1800 return;
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1801 if (fi->fi_list != NULL)
359 6c62b9b939bd updated for version 7.0093 vimboss parents: 357 diff changeset	1802 {
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1803 list_rem_watch(fi->fi_list, &fi->fi_lw);
359 6c62b9b939bd updated for version 7.0093 vimboss parents: 357 diff changeset	1804 list_unref(fi->fi_list);
6c62b9b939bd updated for version 7.0093 vimboss parents: 357 diff changeset	1805 }
24234 7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1806 else if (fi->fi_blob != NULL)
15460 543cff56dd3f patch 8.1.0738: using freed memory, for loop over blob leaks memory Bram Moolenaar <Bram@vim.org> parents: 15458 diff changeset	1807 blob_unref(fi->fi_blob);
24234 7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1808 else
7ffc795288dd patch 8.2.2658: :for cannot loop over a string Bram Moolenaar <Bram@vim.org> parents: 24194 diff changeset	1809 vim_free(fi->fi_string);
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1810 vim_free(fi);
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1811 }
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1812
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1813 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1814 set_context_for_expression(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1815 expand_T *xp,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1816 char_u *arg,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	1817 cmdidx_T cmdidx)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1818 {
22391 a9fb7efa31d6 patch 8.2.1744: Vim9: using ":const!" is weird Bram Moolenaar <Bram@vim.org> parents: 22365 diff changeset	1819 int has_expr = cmdidx != CMD_let && cmdidx != CMD_var;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1820 int c;
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1821 char_u *p;
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1822
22391 a9fb7efa31d6 patch 8.2.1744: Vim9: using ":const!" is weird Bram Moolenaar <Bram@vim.org> parents: 22365 diff changeset	1823 if (cmdidx == CMD_let \|\| cmdidx == CMD_var
a9fb7efa31d6 patch 8.2.1744: Vim9: using ":const!" is weird Bram Moolenaar <Bram@vim.org> parents: 22365 diff changeset	1824 \|\| cmdidx == CMD_const \|\| cmdidx == CMD_final)
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1825 {
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1826 xp->xp_context = EXPAND_USER_VARS;
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	1827 if (vim_strpbrk(arg, (char_u )"\"'+-/%.=!?~\|&$([<>,#") == NULL)
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1828 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1829 // ":let var1 var2 ...": find last space.
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	1830 for (p = arg + STRLEN(arg); p >= arg; )
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1831 {
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1832 xp->xp_pattern = p;
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 10964 diff changeset	1833 MB_PTR_BACK(arg, p);
11129 f4ea50924c6d patch 8.0.0452: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11127 diff changeset	1834 if (VIM_ISWHITE(*p))
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1835 break;
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1836 }
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1837 return;
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1838 }
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1839 }
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1840 else
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1841 xp->xp_context = cmdidx == CMD_call ? EXPAND_FUNCTIONS
0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1842 : EXPAND_EXPRESSION;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1843 while ((xp->xp_pattern = vim_strpbrk(arg,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1844 (char_u )"\"'+-/%.=!?~\|&$([<>,#")) != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1845 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1846 c = *xp->xp_pattern;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1847 if (c == '&')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1848 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1849 c = xp->xp_pattern[1];
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1850 if (c == '&')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1851 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1852 ++xp->xp_pattern;
22391 a9fb7efa31d6 patch 8.2.1744: Vim9: using ":const!" is weird Bram Moolenaar <Bram@vim.org> parents: 22365 diff changeset	1853 xp->xp_context = has_expr ? EXPAND_EXPRESSION : EXPAND_NOTHING;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1854 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1855 else if (c != ' ')
201 300fac7c5a2b updated for version 7.0059 vimboss parents: 192 diff changeset	1856 {
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1857 xp->xp_context = EXPAND_SETTINGS;
201 300fac7c5a2b updated for version 7.0059 vimboss parents: 192 diff changeset	1858 if ((c == 'l' \|\| c == 'g') && xp->xp_pattern[2] == ':')
300fac7c5a2b updated for version 7.0059 vimboss parents: 192 diff changeset	1859 xp->xp_pattern += 2;
300fac7c5a2b updated for version 7.0059 vimboss parents: 192 diff changeset	1860
300fac7c5a2b updated for version 7.0059 vimboss parents: 192 diff changeset	1861 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1862 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1863 else if (c == '$')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1864 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1865 // environment variable
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1866 xp->xp_context = EXPAND_ENV_VARS;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1867 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1868 else if (c == '=')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1869 {
22391 a9fb7efa31d6 patch 8.2.1744: Vim9: using ":const!" is weird Bram Moolenaar <Bram@vim.org> parents: 22365 diff changeset	1870 has_expr = TRUE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1871 xp->xp_context = EXPAND_EXPRESSION;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1872 }
8763 4b83af41f5db commit https://github.com/vim/vim/commit/a32095fc8fdf5fe3d487c86d9cc54adb1236731e Christian Brabandt <cb@256bit.org> parents: 8749 diff changeset	1873 else if (c == '#'
4b83af41f5db commit https://github.com/vim/vim/commit/a32095fc8fdf5fe3d487c86d9cc54adb1236731e Christian Brabandt <cb@256bit.org> parents: 8749 diff changeset	1874 && xp->xp_context == EXPAND_EXPRESSION)
4b83af41f5db commit https://github.com/vim/vim/commit/a32095fc8fdf5fe3d487c86d9cc54adb1236731e Christian Brabandt <cb@256bit.org> parents: 8749 diff changeset	1875 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1876 // Autoload function/variable contains '#'.
8763 4b83af41f5db commit https://github.com/vim/vim/commit/a32095fc8fdf5fe3d487c86d9cc54adb1236731e Christian Brabandt <cb@256bit.org> parents: 8749 diff changeset	1877 break;
4b83af41f5db commit https://github.com/vim/vim/commit/a32095fc8fdf5fe3d487c86d9cc54adb1236731e Christian Brabandt <cb@256bit.org> parents: 8749 diff changeset	1878 }
6367 81c9b19ee0fb updated for version 7.4.516 Bram Moolenaar <bram@vim.org> parents: 6361 diff changeset	1879 else if ((c == '<' \|\| c == '#')
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1880 && xp->xp_context == EXPAND_FUNCTIONS
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1881 && vim_strchr(xp->xp_pattern, '(') == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1882 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1883 // Function name can start with "<SNR>" and contain '#'.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1884 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1885 }
22391 a9fb7efa31d6 patch 8.2.1744: Vim9: using ":const!" is weird Bram Moolenaar <Bram@vim.org> parents: 22365 diff changeset	1886 else if (has_expr)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1887 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1888 if (c == '"') // string
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1889 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1890 while ((c = *++xp->xp_pattern) != NUL && c != '"')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1891 if (c == '\\' && xp->xp_pattern[1] != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1892 ++xp->xp_pattern;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1893 xp->xp_context = EXPAND_NOTHING;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1894 }
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1895 else if (c == '\'') // literal string
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1896 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1897 // Trick: '' is like stopping and starting a literal string.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1898 while ((c = *++xp->xp_pattern) != NUL && c != '\'')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1899 /* skip */ ;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1900 xp->xp_context = EXPAND_NOTHING;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1901 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1902 else if (c == '\|')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1903 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1904 if (xp->xp_pattern[1] == '\|')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1905 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1906 ++xp->xp_pattern;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1907 xp->xp_context = EXPAND_EXPRESSION;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1908 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1909 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1910 xp->xp_context = EXPAND_COMMANDS;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1911 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1912 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1913 xp->xp_context = EXPAND_EXPRESSION;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1914 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1915 else
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1916 // Doesn't look like something valid, expand as an expression
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1917 // anyway.
76 0ef9cebc4f5d updated for version 7.0031 vimboss parents: 71 diff changeset	1918 xp->xp_context = EXPAND_EXPRESSION;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1919 arg = xp->xp_pattern;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1920 if (*arg != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1921 while ((c = *++arg) != NUL && (c == ' ' \|\| c == '\t'))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1922 /* skip */ ;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1923 }
23322 68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1924
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1925 // ":exe one two" completes "two"
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1926 if ((cmdidx == CMD_execute
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1927 \|\| cmdidx == CMD_echo
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1928 \|\| cmdidx == CMD_echon
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1929 \|\| cmdidx == CMD_echomsg)
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1930 && xp->xp_context == EXPAND_EXPRESSION)
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1931 {
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1932 for (;;)
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1933 {
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1934 char_u *n = skiptowhite(arg);
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1935
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1936 if (n == arg \|\| IS_WHITE_OR_NUL(*skipwhite(n)))
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1937 break;
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1938 arg = skipwhite(n);
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1939 }
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1940 }
68df9697667a patch 8.2.2206: :exe command line completion only works for first argument Bram Moolenaar <Bram@vim.org> parents: 23299 diff changeset	1941
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1942 xp->xp_pattern = arg;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1943 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1944
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1945 /*
8749 65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1946 * Return TRUE if "pat" matches "text".
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1947 * Does not use 'cpo' and always uses 'magic'.
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1948 */
17377 cb008de2a6ec patch 8.1.1687: the evalfunc.c file is too big Bram Moolenaar <Bram@vim.org> parents: 17375 diff changeset	1949 int
8749 65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1950 pattern_match(char_u pat, char_u text, int ic)
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1951 {
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1952 int matches = FALSE;
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1953 char_u *save_cpo;
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1954 regmatch_T regmatch;
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1955
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1956 // avoid 'l' flag in 'cpoptions'
8749 65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1957 save_cpo = p_cpo;
23493 f8382c4e6551 patch 8.2.2289: Vim9: 'cpo' can become empty Bram Moolenaar <Bram@vim.org> parents: 23450 diff changeset	1958 p_cpo = empty_option;
8749 65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1959 regmatch.regprog = vim_regcomp(pat, RE_MAGIC + RE_STRING);
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1960 if (regmatch.regprog != NULL)
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1961 {
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1962 regmatch.rm_ic = ic;
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1963 matches = vim_regexec_nl(&regmatch, text, (colnr_T)0);
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1964 vim_regfree(regmatch.regprog);
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1965 }
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1966 p_cpo = save_cpo;
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1967 return matches;
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1968 }
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1969
65a5a18d3acf commit https://github.com/vim/vim/commit/ea6553bec340920d8a09c7210cdc2d218e25ace2 Christian Brabandt <cb@256bit.org> parents: 8742 diff changeset	1970 /*
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1971 * Handle a name followed by "(". Both for just "name(arg)" and for
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1972 * "expr->name(arg)".
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1973 * Returns OK or FAIL.
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1974 */
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1975 static int
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1976 eval_func(
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1977 char_u **arg, // points to "(", will be advanced
21118 b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	1978 evalarg_T *evalarg,
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1979 char_u *name,
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1980 int name_len,
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1981 typval_T *rettv,
20397 c225be44692a patch 8.2.0753: Vim9: expressions are evaluated in the discovery phase Bram Moolenaar <Bram@vim.org> parents: 20392 diff changeset	1982 int flags,
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1983 typval_T *basetv) // "expr" for "expr->name(arg)"
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1984 {
20397 c225be44692a patch 8.2.0753: Vim9: expressions are evaluated in the discovery phase Bram Moolenaar <Bram@vim.org> parents: 20392 diff changeset	1985 int evaluate = flags & EVAL_EVALUATE;
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1986 char_u *s = name;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1987 int len = name_len;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1988 partial_T *partial;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1989 int ret = OK;
23527 27ca5534a408 patch 8.2.2306: Vim9: when using function reference type is not checked Bram Moolenaar <Bram@vim.org> parents: 23525 diff changeset	1990 type_T *type = NULL;
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1991
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1992 if (!evaluate)
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1993 check_vars(s, len);
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1994
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1995 // If "s" is the name of a variable of type VAR_FUNC
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	1996 // use its contents.
23527 27ca5534a408 patch 8.2.2306: Vim9: when using function reference type is not checked Bram Moolenaar <Bram@vim.org> parents: 23525 diff changeset	1997 s = deref_func_name(s, &len, &partial,
27ca5534a408 patch 8.2.2306: Vim9: when using function reference type is not checked Bram Moolenaar <Bram@vim.org> parents: 23525 diff changeset	1998 in_vim9script() ? &type : NULL, !evaluate);
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	1999
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2000 // Need to make a copy, in case evaluating the arguments makes
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2001 // the name invalid.
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2002 s = vim_strsave(s);
20397 c225be44692a patch 8.2.0753: Vim9: expressions are evaluated in the discovery phase Bram Moolenaar <Bram@vim.org> parents: 20392 diff changeset	2003 if (s == NULL \|\| (flags & EVAL_CONSTANT))
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2004 ret = FAIL;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2005 else
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2006 {
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2007 funcexe_T funcexe;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2008
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2009 // Invoke the function.
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 19922 diff changeset	2010 CLEAR_FIELD(funcexe);
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2011 funcexe.firstline = curwin->w_cursor.lnum;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2012 funcexe.lastline = curwin->w_cursor.lnum;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2013 funcexe.evaluate = evaluate;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2014 funcexe.partial = partial;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2015 funcexe.basetv = basetv;
23527 27ca5534a408 patch 8.2.2306: Vim9: when using function reference type is not checked Bram Moolenaar <Bram@vim.org> parents: 23525 diff changeset	2016 funcexe.check_type = type;
21118 b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	2017 ret = get_func_tv(s, len, rettv, arg, evalarg, &funcexe);
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2018 }
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2019 vim_free(s);
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2020
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2021 // If evaluate is FALSE rettv->v_type was not set in
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2022 // get_func_tv, but it's needed in handle_subscript() to parse
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2023 // what follows. So set it here.
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2024 if (rettv->v_type == VAR_UNKNOWN && !evaluate && **arg == '(')
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2025 {
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2026 rettv->vval.v_string = NULL;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2027 rettv->v_type = VAR_FUNC;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2028 }
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2029
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2030 // Stop the expression evaluation when immediately
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2031 // aborting on error, or when an interrupt occurred or
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2032 // an exception was thrown but not caught.
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2033 if (evaluate && aborting())
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2034 {
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2035 if (ret == OK)
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2036 clear_tv(rettv);
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2037 ret = FAIL;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2038 }
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2039 return ret;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2040 }
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2041
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	2042 /*
22580 eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2043 * Get the next line source line without advancing. But do skip over comment
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2044 * lines.
24553 cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	2045 * Only called for Vim9 script.
22580 eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2046 */
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2047 static char_u *
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2048 getline_peek_skip_comments(evalarg_T *evalarg)
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2049 {
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2050 for (;;)
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2051 {
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2052 char_u *next = getline_peek(evalarg->eval_getline,
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2053 evalarg->eval_cookie);
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2054 char_u *p;
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2055
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2056 if (next == NULL)
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2057 break;
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2058 p = skipwhite(next);
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2059 if (*p != NUL && !vim9_comment_start(p))
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2060 return next;
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2061 (void)eval_next_line(evalarg);
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2062 }
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2063 return NULL;
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2064 }
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2065
eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2066 /*
21148 667192c5938b patch 8.2.1125: Vim9: double quote can be a string or a comment Bram Moolenaar <Bram@vim.org> parents: 21142 diff changeset	2067 * If inside Vim9 script, "arg" points to the end of a line (ignoring a #
667192c5938b patch 8.2.1125: Vim9: double quote can be a string or a comment Bram Moolenaar <Bram@vim.org> parents: 21142 diff changeset	2068 * comment) and there is a next line, return the next line (skipping blanks)
667192c5938b patch 8.2.1125: Vim9: double quote can be a string or a comment Bram Moolenaar <Bram@vim.org> parents: 21142 diff changeset	2069 * and set "getnext".
24525 887121a6d7cf patch 8.2.2802: Vim9: illegal memory access Bram Moolenaar <Bram@vim.org> parents: 24518 diff changeset	2070 * Otherwise return the next non-white at or after "arg" and set "getnext" to
887121a6d7cf patch 8.2.2802: Vim9: illegal memory access Bram Moolenaar <Bram@vim.org> parents: 24518 diff changeset	2071 * FALSE.
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2072 * "arg" must point somewhere inside a line, not at the start.
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2073 */
25206 dc66d0284518 patch 8.2.3139: functions for string manipulation are spread out Bram Moolenaar <Bram@vim.org> parents: 25186 diff changeset	2074 static char_u *
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2075 eval_next_non_blank(char_u arg, evalarg_T evalarg, int *getnext)
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2076 {
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2077 char_u *p = skipwhite(arg);
cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2078
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2079 *getnext = FALSE;
21279 8d1d11afd8c8 patch 8.2.1190: Vim9: checking for Vim9 syntax is spread out Bram Moolenaar <Bram@vim.org> parents: 21277 diff changeset	2080 if (in_vim9script()
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2081 && evalarg != NULL
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	2082 && (evalarg->eval_cookie != NULL \|\| evalarg->eval_cctx != NULL)
24525 887121a6d7cf patch 8.2.2802: Vim9: illegal memory access Bram Moolenaar <Bram@vim.org> parents: 24518 diff changeset	2083 && (*p == NUL \|\| (vim9_comment_start(p) && VIM_ISWHITE(p[-1]))))
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2084 {
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2085 char_u *next;
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	2086
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	2087 if (evalarg->eval_cookie != NULL)
22580 eb54d34ecd27 patch 8.2.1838: Vim9: cannot insert a comment line in an expression Bram Moolenaar <Bram@vim.org> parents: 22541 diff changeset	2088 next = getline_peek_skip_comments(evalarg);
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	2089 else
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2090 next = peek_next_line_from_context(evalarg->eval_cctx);
cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2091
cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2092 if (next != NULL)
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2093 {
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2094 *getnext = TRUE;
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2095 return skipwhite(next);
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2096 }
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2097 }
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2098 return p;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2099 }
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2100
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2101 /*
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2102 * To be called after eval_next_non_blank() sets "getnext" to TRUE.
24553 cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	2103 * Only called for Vim9 script.
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	2104 */
25206 dc66d0284518 patch 8.2.3139: functions for string manipulation are spread out Bram Moolenaar <Bram@vim.org> parents: 25186 diff changeset	2105 static char_u *
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	2106 eval_next_line(evalarg_T *evalarg)
3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	2107 {
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2108 garray_T *gap = &evalarg->eval_ga;
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2109 char_u *line;
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2110
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	2111 if (evalarg->eval_cookie != NULL)
21889 e7e485a60caf patch 8.2.1494: missing change to calling eval_getline() Bram Moolenaar <Bram@vim.org> parents: 21865 diff changeset	2112 line = evalarg->eval_getline(0, evalarg->eval_cookie, 0,
e7e485a60caf patch 8.2.1494: missing change to calling eval_getline() Bram Moolenaar <Bram@vim.org> parents: 21865 diff changeset	2113 GETLINE_CONCAT_ALL);
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	2114 else
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	2115 line = next_line_from_context(evalarg->eval_cctx, TRUE);
21058 111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	2116 ++evalarg->eval_break_count;
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2117 if (gap->ga_itemsize > 0 && ga_grow(gap, 1) == OK)
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2118 {
24553 cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	2119 char_u *p = skipwhite(line);
cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	2120
cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	2121 // Going to concatenate the lines after parsing. For an empty or
cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	2122 // comment line use an empty string.
cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	2123 if (*p == NUL \|\| vim9_comment_start(p))
cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	2124 {
cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	2125 vim_free(line);
cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	2126 line = vim_strsave((char_u *)"");
cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	2127 }
cb0d344bd381 patch 8.2.2816: Vim9: comment below expression in lambda causes problems Bram Moolenaar <Bram@vim.org> parents: 24533 diff changeset	2128
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2129 ((char_u **)gap->ga_data)[gap->ga_len] = line;
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2130 ++gap->ga_len;
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2131 }
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2132 else if (evalarg->eval_cookie != NULL)
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2133 {
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2134 vim_free(evalarg->eval_tofree);
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2135 evalarg->eval_tofree = line;
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2136 }
25276 d26dc79c533f patch 8.2.3175: Vim9: using illegal pointer with nested lambdas. Bram Moolenaar <Bram@vim.org> parents: 25220 diff changeset	2137
d26dc79c533f patch 8.2.3175: Vim9: using illegal pointer with nested lambdas. Bram Moolenaar <Bram@vim.org> parents: 25220 diff changeset	2138 // Advanced to the next line, "arg" no longer points into the previous
d26dc79c533f patch 8.2.3175: Vim9: using illegal pointer with nested lambdas. Bram Moolenaar <Bram@vim.org> parents: 25220 diff changeset	2139 // line.
26053 e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2140 evalarg->eval_using_cmdline = FALSE;
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	2141 return skipwhite(line);
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	2142 }
3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	2143
21118 b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	2144 /*
b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	2145 * Call eval_next_non_blank() and get the next line if needed.
b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	2146 */
21046 0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	2147 char_u *
0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	2148 skipwhite_and_linebreak(char_u arg, evalarg_T evalarg)
0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	2149 {
0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	2150 int getnext;
0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	2151 char_u *p = skipwhite(arg);
0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	2152
21148 667192c5938b patch 8.2.1125: Vim9: double quote can be a string or a comment Bram Moolenaar <Bram@vim.org> parents: 21142 diff changeset	2153 if (evalarg == NULL)
667192c5938b patch 8.2.1125: Vim9: double quote can be a string or a comment Bram Moolenaar <Bram@vim.org> parents: 21142 diff changeset	2154 return skipwhite(arg);
21046 0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	2155 eval_next_non_blank(p, evalarg, &getnext);
0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	2156 if (getnext)
0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	2157 return eval_next_line(evalarg);
0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	2158 return p;
0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	2159 }
0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	2160
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	2161 /*
26053 e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2162 * Initialize "evalarg" for use.
e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2163 */
e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2164 void
e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2165 init_evalarg(evalarg_T *evalarg)
e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2166 {
e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2167 CLEAR_POINTER(evalarg);
e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2168 ga_init2(&evalarg->eval_tofree_ga, sizeof(char_u *), 20);
e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2169 }
e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2170
e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2171 /*
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2172 * After using "evalarg" filled from "eap": free the memory.
21050 7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	2173 */
7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	2174 void
7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	2175 clear_evalarg(evalarg_T evalarg, exarg_T eap)
7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	2176 {
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2177 if (evalarg != NULL)
21050 7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	2178 {
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2179 if (evalarg->eval_tofree != NULL)
21058 111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	2180 {
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2181 if (eap != NULL)
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2182 {
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2183 // We may need to keep the original command line, e.g. for
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2184 // ":let" it has the variable names. But we may also need the
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2185 // new one, "nextcmd" points into it. Keep both.
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2186 vim_free(eap->cmdline_tofree);
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2187 eap->cmdline_tofree = *eap->cmdlinep;
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2188 *eap->cmdlinep = evalarg->eval_tofree;
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2189 }
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2190 else
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2191 vim_free(evalarg->eval_tofree);
ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2192 evalarg->eval_tofree = NULL;
21058 111f877e63d9 patch 8.2.1080: Vim9: no line break allowed in a for loop Bram Moolenaar <Bram@vim.org> parents: 21056 diff changeset	2193 }
21220 ad13736a1783 patch 8.2.1161: Vim9: using freed memory Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	2194
26053 e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2195 ga_clear_strings(&evalarg->eval_tofree_ga);
24190 5f3a2d31c48d patch 8.2.2636: memory leak when compiling inline function Bram Moolenaar <Bram@vim.org> parents: 24174 diff changeset	2196 VIM_CLEAR(evalarg->eval_tofree_lambda);
21050 7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	2197 }
7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	2198 }
7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	2199
7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	2200 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2201 * The "evaluate" argument: When FALSE, the argument is only parsed but not
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	2202 * executed. The function may return OK, but the rettv will be of type
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2203 * VAR_UNKNOWN. The function still returns FAIL for a syntax error.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2204 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2205
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2206 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2207 * Handle zero level expression.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2208 * This calls eval1() and handles error message and nextcmd.
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	2209 * Put the result in "rettv" when returning OK and "evaluate" is TRUE.
533 c8b6b7e1005d updated for version 7.0150 vimboss parents: 531 diff changeset	2210 * Note: "rettv.v_lock" is not set.
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2211 * "evalarg" can be NULL, EVALARG_EVALUATE or a pointer.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2212 * Return OK or FAIL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2213 */
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	2214 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	2215 eval0(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	2216 char_u *arg,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	2217 typval_T *rettv,
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	2218 exarg_T *eap,
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2219 evalarg_T *evalarg)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2220 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2221 int ret;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2222 char_u *p;
15456 f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	2223 int did_emsg_before = did_emsg;
f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	2224 int called_emsg_before = called_emsg;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2225 int flags = evalarg == NULL ? 0 : evalarg->eval_flags;
24958 21ec48d542a8 patch 8.2.3016: confusing error when expression is followed by comma Bram Moolenaar <Bram@vim.org> parents: 24895 diff changeset	2226 int end_error = FALSE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2227
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2228 p = skipwhite(arg);
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2229 ret = eval1(&p, rettv, evalarg);
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2230 p = skipwhite(p);
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	2231
24958 21ec48d542a8 patch 8.2.3016: confusing error when expression is followed by comma Bram Moolenaar <Bram@vim.org> parents: 24895 diff changeset	2232 if (ret != FAIL)
21ec48d542a8 patch 8.2.3016: confusing error when expression is followed by comma Bram Moolenaar <Bram@vim.org> parents: 24895 diff changeset	2233 end_error = !ends_excmd2(arg, p);
21ec48d542a8 patch 8.2.3016: confusing error when expression is followed by comma Bram Moolenaar <Bram@vim.org> parents: 24895 diff changeset	2234 if (ret == FAIL \|\| end_error)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2235 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2236 if (ret != FAIL)
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	2237 clear_tv(rettv);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2238 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2239 * Report the invalid expression unless the expression evaluation has
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2240 * been cancelled due to an aborting error, an interrupt, or an
15456 f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	2241 * exception, or we already gave a more specific error.
f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	2242 * Also check called_emsg for when using assert_fails().
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2243 */
20397 c225be44692a patch 8.2.0753: Vim9: expressions are evaluated in the discovery phase Bram Moolenaar <Bram@vim.org> parents: 20392 diff changeset	2244 if (!aborting()
c225be44692a patch 8.2.0753: Vim9: expressions are evaluated in the discovery phase Bram Moolenaar <Bram@vim.org> parents: 20392 diff changeset	2245 && did_emsg == did_emsg_before
c225be44692a patch 8.2.0753: Vim9: expressions are evaluated in the discovery phase Bram Moolenaar <Bram@vim.org> parents: 20392 diff changeset	2246 && called_emsg == called_emsg_before
24174 99bfaa4693db patch 8.2.2628: Vim9: #{ can still be used at the script level Bram Moolenaar <Bram@vim.org> parents: 24112 diff changeset	2247 && (flags & EVAL_CONSTANT) == 0
99bfaa4693db patch 8.2.2628: Vim9: #{ can still be used at the script level Bram Moolenaar <Bram@vim.org> parents: 24112 diff changeset	2248 && (!in_vim9script() \|\| !vim9_bad_comment(p)))
24958 21ec48d542a8 patch 8.2.3016: confusing error when expression is followed by comma Bram Moolenaar <Bram@vim.org> parents: 24895 diff changeset	2249 {
21ec48d542a8 patch 8.2.3016: confusing error when expression is followed by comma Bram Moolenaar <Bram@vim.org> parents: 24895 diff changeset	2250 if (end_error)
21ec48d542a8 patch 8.2.3016: confusing error when expression is followed by comma Bram Moolenaar <Bram@vim.org> parents: 24895 diff changeset	2251 semsg(_(e_trailing_arg), p);
21ec48d542a8 patch 8.2.3016: confusing error when expression is followed by comma Bram Moolenaar <Bram@vim.org> parents: 24895 diff changeset	2252 else
25064 8f2262c72178 patch 8.2.3069: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25054 diff changeset	2253 semsg(_(e_invalid_expression_str), arg);
24958 21ec48d542a8 patch 8.2.3016: confusing error when expression is followed by comma Bram Moolenaar <Bram@vim.org> parents: 24895 diff changeset	2254 }
23096 b6aadb0b3a56 patch 8.2.2094: when an expression fails getting next command may be wrong Bram Moolenaar <Bram@vim.org> parents: 23072 diff changeset	2255
b6aadb0b3a56 patch 8.2.2094: when an expression fails getting next command may be wrong Bram Moolenaar <Bram@vim.org> parents: 23072 diff changeset	2256 // Some of the expression may not have been consumed. Do not check for
23191 3e7723bab4e5 patch 8.2.2141: a user command with try/catch may not catch an expression error Bram Moolenaar <Bram@vim.org> parents: 23096 diff changeset	2257 // a next command to avoid more errors, unless "\|" is following, which
3e7723bab4e5 patch 8.2.2141: a user command with try/catch may not catch an expression error Bram Moolenaar <Bram@vim.org> parents: 23096 diff changeset	2258 // could only be a command separator.
3e7723bab4e5 patch 8.2.2141: a user command with try/catch may not catch an expression error Bram Moolenaar <Bram@vim.org> parents: 23096 diff changeset	2259 if (eap != NULL && skipwhite(p)[0] == '\|' && skipwhite(p)[1] != '\|')
3e7723bab4e5 patch 8.2.2141: a user command with try/catch may not catch an expression error Bram Moolenaar <Bram@vim.org> parents: 23096 diff changeset	2260 eap->nextcmd = check_nextcmd(p);
23096 b6aadb0b3a56 patch 8.2.2094: when an expression fails getting next command may be wrong Bram Moolenaar <Bram@vim.org> parents: 23072 diff changeset	2261 return FAIL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2262 }
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	2263
3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	2264 if (eap != NULL)
25521 2063b858cad9 patch 8.2.3297: cannot use all commands inside a {} block Bram Moolenaar <Bram@vim.org> parents: 25495 diff changeset	2265 set_nextcmd(eap, p);
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	2266
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2267 return ret;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2268 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2269
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2270 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2271 * Handle top level expression:
1800 e7633eb32cfd updated for version 7.2-098 vimboss parents: 1794 diff changeset	2272 * expr2 ? expr1 : expr1
22492 0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2273 * expr2 ?? expr1
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2274 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2275 * "arg" must point to the first non-white of the expression.
21644 7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2276 * "arg" is advanced to just after the recognized expression.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2277 *
533 c8b6b7e1005d updated for version 7.0150 vimboss parents: 531 diff changeset	2278 * Note: "rettv.v_lock" is not set.
c8b6b7e1005d updated for version 7.0150 vimboss parents: 531 diff changeset	2279 *
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2280 * Return OK or FAIL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2281 */
9556 afaff1d283d3 commit https://github.com/vim/vim/commit/cd52459c387785796713826c63174cdeed295dd4 Christian Brabandt <cb@256bit.org> parents: 9527 diff changeset	2282 int
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2283 eval1(char_u *arg, typval_T rettv, evalarg_T *evalarg)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2284 {
21022 9d8634e91d1b patch 8.2.1062: Vim9: no line break allowed inside "cond ? val1 : val2" Bram Moolenaar <Bram@vim.org> parents: 21002 diff changeset	2285 char_u *p;
9d8634e91d1b patch 8.2.1062: Vim9: no line break allowed inside "cond ? val1 : val2" Bram Moolenaar <Bram@vim.org> parents: 21002 diff changeset	2286 int getnext;
9d8634e91d1b patch 8.2.1062: Vim9: no line break allowed inside "cond ? val1 : val2" Bram Moolenaar <Bram@vim.org> parents: 21002 diff changeset	2287
22246 6f83d2adee74 patch 8.2.1672: v_lock is used when it is not initialized Bram Moolenaar <Bram@vim.org> parents: 22244 diff changeset	2288 CLEAR_POINTER(rettv);
6f83d2adee74 patch 8.2.1672: v_lock is used when it is not initialized Bram Moolenaar <Bram@vim.org> parents: 22244 diff changeset	2289
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2290 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2291 * Get the first variable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2292 */
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2293 if (eval2(arg, rettv, evalarg) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2294 return FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2295
21022 9d8634e91d1b patch 8.2.1062: Vim9: no line break allowed inside "cond ? val1 : val2" Bram Moolenaar <Bram@vim.org> parents: 21002 diff changeset	2296 p = eval_next_non_blank(*arg, evalarg, &getnext);
9d8634e91d1b patch 8.2.1062: Vim9: no line break allowed inside "cond ? val1 : val2" Bram Moolenaar <Bram@vim.org> parents: 21002 diff changeset	2297 if (*p == '?')
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2298 {
22492 0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2299 int op_falsy = p[1] == '?';
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2300 int result;
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2301 typval_T var2;
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2302 evalarg_T *evalarg_used = evalarg;
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2303 evalarg_T local_evalarg;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2304 int orig_flags;
21002 4852db420162 patch 8.2.1052: build failure with older compilers Bram Moolenaar <Bram@vim.org> parents: 20996 diff changeset	2305 int evaluate;
22500 ef8a3177edc1 patch 8.2.1798: Vim9: trinary operator condition is too permissive Bram Moolenaar <Bram@vim.org> parents: 22494 diff changeset	2306 int vim9script = in_vim9script();
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2307
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2308 if (evalarg == NULL)
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2309 {
26053 e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2310 init_evalarg(&local_evalarg);
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2311 evalarg_used = &local_evalarg;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2312 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2313 orig_flags = evalarg_used->eval_flags;
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2314 evaluate = evalarg_used->eval_flags & EVAL_EVALUATE;
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2315
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2316 if (getnext)
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2317 *arg = eval_next_line(evalarg_used);
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2318 else
21644 7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2319 {
22500 ef8a3177edc1 patch 8.2.1798: Vim9: trinary operator condition is too permissive Bram Moolenaar <Bram@vim.org> parents: 22494 diff changeset	2320 if (evaluate && vim9script && !VIM_ISWHITE(p[-1]))
21644 7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2321 {
24339 236e9ebdb30e patch 8.2.2710: Vim9: not all tests cover script and :def function Bram Moolenaar <Bram@vim.org> parents: 24250 diff changeset	2322 error_white_both(p, op_falsy ? 2 : 1);
21644 7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2323 clear_tv(rettv);
7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2324 return FAIL;
7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2325 }
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2326 *arg = p;
21644 7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2327 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2328
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2329 result = FALSE;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2330 if (evaluate)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2331 {
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2332 int error = FALSE;
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2333
22500 ef8a3177edc1 patch 8.2.1798: Vim9: trinary operator condition is too permissive Bram Moolenaar <Bram@vim.org> parents: 22494 diff changeset	2334 if (op_falsy)
21831 d8422de73113 patch 8.2.1465: Vim9: subscript not handled properly Bram Moolenaar <Bram@vim.org> parents: 21828 diff changeset	2335 result = tv2bool(rettv);
22500 ef8a3177edc1 patch 8.2.1798: Vim9: trinary operator condition is too permissive Bram Moolenaar <Bram@vim.org> parents: 22494 diff changeset	2336 else if (vim9script)
ef8a3177edc1 patch 8.2.1798: Vim9: trinary operator condition is too permissive Bram Moolenaar <Bram@vim.org> parents: 22494 diff changeset	2337 result = tv_get_bool_chk(rettv, &error);
21831 d8422de73113 patch 8.2.1465: Vim9: subscript not handled properly Bram Moolenaar <Bram@vim.org> parents: 21828 diff changeset	2338 else if (tv_get_number_chk(rettv, &error) != 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2339 result = TRUE;
22492 0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2340 if (error \|\| !op_falsy \|\| !result)
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2341 clear_tv(rettv);
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2342 if (error)
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2343 return FAIL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2344 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2345
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2346 /*
20397 c225be44692a patch 8.2.0753: Vim9: expressions are evaluated in the discovery phase Bram Moolenaar <Bram@vim.org> parents: 20392 diff changeset	2347 * Get the second variable. Recursive!
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2348 */
22492 0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2349 if (op_falsy)
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2350 ++*arg;
22500 ef8a3177edc1 patch 8.2.1798: Vim9: trinary operator condition is too permissive Bram Moolenaar <Bram@vim.org> parents: 22494 diff changeset	2351 if (evaluate && vim9script && !IS_WHITE_OR_NUL((*arg)[1]))
21644 7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2352 {
24713 34a5329b85aa patch 8.2.2895: Vim9: random characters appear in some error messages Bram Moolenaar <Bram@vim.org> parents: 24707 diff changeset	2353 error_white_both(*arg - (op_falsy ? 1 : 0), op_falsy ? 2 : 1);
21644 7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2354 clear_tv(rettv);
7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2355 return FAIL;
7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2356 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2357 arg = skipwhite_and_linebreak(arg + 1, evalarg_used);
22492 0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2358 evalarg_used->eval_flags = (op_falsy ? !result : result)
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2359 ? orig_flags : orig_flags & ~EVAL_EVALUATE;
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2360 if (eval1(arg, &var2, evalarg_used) == FAIL)
21925 51d591dbb8df patch 8.2.1512: failure after trinary expression fails Bram Moolenaar <Bram@vim.org> parents: 21915 diff changeset	2361 {
51d591dbb8df patch 8.2.1512: failure after trinary expression fails Bram Moolenaar <Bram@vim.org> parents: 21915 diff changeset	2362 evalarg_used->eval_flags = orig_flags;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2363 return FAIL;
21925 51d591dbb8df patch 8.2.1512: failure after trinary expression fails Bram Moolenaar <Bram@vim.org> parents: 21915 diff changeset	2364 }
22492 0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2365 if (!op_falsy \|\| !result)
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2366 *rettv = var2;
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2367
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2368 if (!op_falsy)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2369 {
22492 0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2370 /*
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2371 * Check for the ":".
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2372 */
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2373 p = eval_next_non_blank(*arg, evalarg_used, &getnext);
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2374 if (*p != ':')
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2375 {
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2376 emsg(_(e_missing_colon));
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2377 if (evaluate && result)
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2378 clear_tv(rettv);
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2379 evalarg_used->eval_flags = orig_flags;
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2380 return FAIL;
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2381 }
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2382 if (getnext)
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2383 *arg = eval_next_line(evalarg_used);
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2384 else
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2385 {
22500 ef8a3177edc1 patch 8.2.1798: Vim9: trinary operator condition is too permissive Bram Moolenaar <Bram@vim.org> parents: 22494 diff changeset	2386 if (evaluate && vim9script && !VIM_ISWHITE(p[-1]))
22492 0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2387 {
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2388 error_white_both(p, 1);
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2389 clear_tv(rettv);
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2390 evalarg_used->eval_flags = orig_flags;
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2391 return FAIL;
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2392 }
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2393 *arg = p;
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2394 }
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2395
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2396 /*
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2397 * Get the third variable. Recursive!
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2398 */
22500 ef8a3177edc1 patch 8.2.1798: Vim9: trinary operator condition is too permissive Bram Moolenaar <Bram@vim.org> parents: 22494 diff changeset	2399 if (evaluate && vim9script && !IS_WHITE_OR_NUL((*arg)[1]))
21644 7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2400 {
24713 34a5329b85aa patch 8.2.2895: Vim9: random characters appear in some error messages Bram Moolenaar <Bram@vim.org> parents: 24707 diff changeset	2401 error_white_both(*arg, 1);
21644 7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2402 clear_tv(rettv);
21925 51d591dbb8df patch 8.2.1512: failure after trinary expression fails Bram Moolenaar <Bram@vim.org> parents: 21915 diff changeset	2403 evalarg_used->eval_flags = orig_flags;
21644 7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2404 return FAIL;
7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2405 }
22492 0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2406 arg = skipwhite_and_linebreak(arg + 1, evalarg_used);
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2407 evalarg_used->eval_flags = !result ? orig_flags
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2408 : orig_flags & ~EVAL_EVALUATE;
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2409 if (eval1(arg, &var2, evalarg_used) == FAIL)
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2410 {
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2411 if (evaluate && result)
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2412 clear_tv(rettv);
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2413 evalarg_used->eval_flags = orig_flags;
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2414 return FAIL;
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2415 }
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2416 if (evaluate && !result)
0e03ef68e738 patch 8.2.1794: no falsy Coalescing operator Bram Moolenaar <Bram@vim.org> parents: 22391 diff changeset	2417 *rettv = var2;
21644 7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2418 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2419
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2420 if (evalarg == NULL)
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2421 clear_evalarg(&local_evalarg, NULL);
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2422 else
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2423 evalarg->eval_flags = orig_flags;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2424 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2425
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2426 return OK;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2427 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2428
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2429 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2430 * Handle first level expression:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2431 * expr2 \|\| expr2 \|\| expr2 logical OR
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2432 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2433 * "arg" must point to the first non-white of the expression.
21644 7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2434 * "arg" is advanced to just after the recognized expression.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2435 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2436 * Return OK or FAIL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2437 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2438 static int
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2439 eval2(char_u *arg, typval_T rettv, evalarg_T *evalarg)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2440 {
21024 02b03915855d patch 8.2.1063: Vim9: no line break allowed before \|\| or && Bram Moolenaar <Bram@vim.org> parents: 21022 diff changeset	2441 char_u *p;
02b03915855d patch 8.2.1063: Vim9: no line break allowed before \|\| or && Bram Moolenaar <Bram@vim.org> parents: 21022 diff changeset	2442 int getnext;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2443
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2444 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2445 * Get the first variable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2446 */
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2447 if (eval3(arg, rettv, evalarg) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2448 return FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2449
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2450 /*
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2451 * Handle the "\|\|" operator.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2452 */
21024 02b03915855d patch 8.2.1063: Vim9: no line break allowed before \|\| or && Bram Moolenaar <Bram@vim.org> parents: 21022 diff changeset	2453 p = eval_next_non_blank(*arg, evalarg, &getnext);
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2454 if (p[0] == '\|' && p[1] == '\|')
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2455 {
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2456 evalarg_T *evalarg_used = evalarg;
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2457 evalarg_T local_evalarg;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2458 int evaluate;
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2459 int orig_flags;
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2460 long result = FALSE;
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2461 typval_T var2;
22494 4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2462 int error = FALSE;
21309 31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2463 int vim9script = in_vim9script();
21024 02b03915855d patch 8.2.1063: Vim9: no line break allowed before \|\| or && Bram Moolenaar <Bram@vim.org> parents: 21022 diff changeset	2464
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2465 if (evalarg == NULL)
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2466 {
26053 e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2467 init_evalarg(&local_evalarg);
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2468 evalarg_used = &local_evalarg;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2469 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2470 orig_flags = evalarg_used->eval_flags;
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2471 evaluate = orig_flags & EVAL_EVALUATE;
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2472 if (evaluate)
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2473 {
21309 31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2474 if (vim9script)
22494 4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2475 result = tv_get_bool_chk(rettv, &error);
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2476 else if (tv_get_number_chk(rettv, &error) != 0)
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2477 result = TRUE;
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2478 clear_tv(rettv);
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2479 if (error)
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2480 return FAIL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2481 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2482
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2483 /*
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2484 * Repeat until there is no following "\|\|".
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2485 */
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2486 while (p[0] == '\|' && p[1] == '\|')
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2487 {
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2488 if (getnext)
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2489 *arg = eval_next_line(evalarg_used);
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2490 else
21642 5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2491 {
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2492 if (evaluate && in_vim9script() && !VIM_ISWHITE(p[-1]))
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2493 {
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2494 error_white_both(p, 2);
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2495 clear_tv(rettv);
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2496 return FAIL;
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2497 }
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2498 *arg = p;
21642 5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2499 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2500
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2501 /*
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2502 * Get the second variable.
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2503 */
21642 5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2504 if (evaluate && in_vim9script() && !IS_WHITE_OR_NUL((*arg)[2]))
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2505 {
24713 34a5329b85aa patch 8.2.2895: Vim9: random characters appear in some error messages Bram Moolenaar <Bram@vim.org> parents: 24707 diff changeset	2506 error_white_both(*arg, 2);
21642 5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2507 clear_tv(rettv);
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2508 return FAIL;
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2509 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2510 arg = skipwhite_and_linebreak(arg + 2, evalarg_used);
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2511 evalarg_used->eval_flags = !result ? orig_flags
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2512 : orig_flags & ~EVAL_EVALUATE;
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2513 if (eval3(arg, &var2, evalarg_used) == FAIL)
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2514 return FAIL;
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2515
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2516 /*
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2517 * Compute the result.
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2518 */
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2519 if (evaluate && !result)
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2520 {
21309 31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2521 if (vim9script)
22494 4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2522 result = tv_get_bool_chk(&var2, &error);
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2523 else if (tv_get_number_chk(&var2, &error) != 0)
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2524 result = TRUE;
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2525 clear_tv(&var2);
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2526 if (error)
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2527 return FAIL;
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2528 }
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2529 if (evaluate)
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2530 {
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2531 if (vim9script)
21309 31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2532 {
22494 4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2533 rettv->v_type = VAR_BOOL;
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2534 rettv->vval.v_number = result ? VVAL_TRUE : VVAL_FALSE;
21309 31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2535 }
31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2536 else
31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2537 {
22494 4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2538 rettv->v_type = VAR_NUMBER;
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2539 rettv->vval.v_number = result;
21309 31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2540 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2541 }
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2542
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2543 p = eval_next_non_blank(*arg, evalarg_used, &getnext);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2544 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2545
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2546 if (evalarg == NULL)
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2547 clear_evalarg(&local_evalarg, NULL);
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2548 else
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2549 evalarg->eval_flags = orig_flags;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2550 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2551
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2552 return OK;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2553 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2554
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2555 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2556 * Handle second level expression:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2557 * expr3 && expr3 && expr3 logical AND
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2558 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2559 * "arg" must point to the first non-white of the expression.
21644 7d3ba70a03f1 patch 8.2.1372: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21642 diff changeset	2560 * "arg" is advanced to just after the recognized expression.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2561 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2562 * Return OK or FAIL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2563 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2564 static int
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2565 eval3(char_u *arg, typval_T rettv, evalarg_T *evalarg)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2566 {
21024 02b03915855d patch 8.2.1063: Vim9: no line break allowed before \|\| or && Bram Moolenaar <Bram@vim.org> parents: 21022 diff changeset	2567 char_u *p;
02b03915855d patch 8.2.1063: Vim9: no line break allowed before \|\| or && Bram Moolenaar <Bram@vim.org> parents: 21022 diff changeset	2568 int getnext;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2569
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2570 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2571 * Get the first variable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2572 */
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2573 if (eval4(arg, rettv, evalarg) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2574 return FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2575
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2576 /*
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2577 * Handle the "&&" operator.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2578 */
21024 02b03915855d patch 8.2.1063: Vim9: no line break allowed before \|\| or && Bram Moolenaar <Bram@vim.org> parents: 21022 diff changeset	2579 p = eval_next_non_blank(*arg, evalarg, &getnext);
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2580 if (p[0] == '&' && p[1] == '&')
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2581 {
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2582 evalarg_T *evalarg_used = evalarg;
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2583 evalarg_T local_evalarg;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2584 int orig_flags;
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2585 int evaluate;
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2586 long result = TRUE;
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2587 typval_T var2;
22494 4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2588 int error = FALSE;
21309 31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2589 int vim9script = in_vim9script();
21024 02b03915855d patch 8.2.1063: Vim9: no line break allowed before \|\| or && Bram Moolenaar <Bram@vim.org> parents: 21022 diff changeset	2590
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2591 if (evalarg == NULL)
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2592 {
26053 e861c5aaedd8 patch 8.2.3560: using freed memory with lambda Bram Moolenaar <Bram@vim.org> parents: 25765 diff changeset	2593 init_evalarg(&local_evalarg);
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2594 evalarg_used = &local_evalarg;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2595 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2596 orig_flags = evalarg_used->eval_flags;
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2597 evaluate = orig_flags & EVAL_EVALUATE;
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2598 if (evaluate)
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2599 {
21309 31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2600 if (vim9script)
22494 4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2601 result = tv_get_bool_chk(rettv, &error);
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2602 else if (tv_get_number_chk(rettv, &error) == 0)
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2603 result = FALSE;
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2604 clear_tv(rettv);
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2605 if (error)
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2606 return FAIL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2607 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2608
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2609 /*
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2610 * Repeat until there is no following "&&".
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2611 */
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2612 while (p[0] == '&' && p[1] == '&')
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2613 {
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2614 if (getnext)
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2615 *arg = eval_next_line(evalarg_used);
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2616 else
21642 5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2617 {
22494 4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2618 if (evaluate && vim9script && !VIM_ISWHITE(p[-1]))
21642 5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2619 {
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2620 error_white_both(p, 2);
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2621 clear_tv(rettv);
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2622 return FAIL;
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2623 }
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2624 *arg = p;
21642 5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2625 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2626
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2627 /*
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2628 * Get the second variable.
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2629 */
21642 5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2630 if (evaluate && in_vim9script() && !IS_WHITE_OR_NUL((*arg)[2]))
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2631 {
24713 34a5329b85aa patch 8.2.2895: Vim9: random characters appear in some error messages Bram Moolenaar <Bram@vim.org> parents: 24707 diff changeset	2632 error_white_both(*arg, 2);
21642 5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2633 clear_tv(rettv);
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2634 return FAIL;
5ae89c8633ae patch 8.2.1371: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21636 diff changeset	2635 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2636 arg = skipwhite_and_linebreak(arg + 2, evalarg_used);
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2637 evalarg_used->eval_flags = result ? orig_flags
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2638 : orig_flags & ~EVAL_EVALUATE;
22202 7899b4e2880c patch 8.2.1650: Vim9: result of && and \|\| expression is not bool in script Bram Moolenaar <Bram@vim.org> parents: 22021 diff changeset	2639 CLEAR_FIELD(var2);
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2640 if (eval4(arg, &var2, evalarg_used) == FAIL)
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2641 return FAIL;
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2642
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2643 /*
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2644 * Compute the result.
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2645 */
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2646 if (evaluate && result)
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2647 {
21309 31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2648 if (vim9script)
22494 4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2649 result = tv_get_bool_chk(&var2, &error);
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2650 else if (tv_get_number_chk(&var2, &error) == 0)
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2651 result = FALSE;
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2652 clear_tv(&var2);
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2653 if (error)
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2654 return FAIL;
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2655 }
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2656 if (evaluate)
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2657 {
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2658 if (vim9script)
21309 31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2659 {
22494 4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2660 rettv->v_type = VAR_BOOL;
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2661 rettv->vval.v_number = result ? VVAL_TRUE : VVAL_FALSE;
21309 31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2662 }
31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2663 else
31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2664 {
22494 4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2665 rettv->v_type = VAR_NUMBER;
4c21f7f6f9e3 patch 8.2.1795: Vim9: operators && and \|\| have a confusing result Bram Moolenaar <Bram@vim.org> parents: 22492 diff changeset	2666 rettv->vval.v_number = result;
21309 31a3f4d408b9 patch 8.2.1205: Vim9: && and \|\| work different when not compiled Bram Moolenaar <Bram@vim.org> parents: 21307 diff changeset	2667 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2668 }
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2669
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2670 p = eval_next_non_blank(*arg, evalarg_used, &getnext);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2671 }
21277 1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2672
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2673 if (evalarg == NULL)
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2674 clear_evalarg(&local_evalarg, NULL);
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2675 else
1e5c29d4e5b3 patch 8.2.1189: Vim9: line continuation in lambda doesn't always work Bram Moolenaar <Bram@vim.org> parents: 21251 diff changeset	2676 evalarg->eval_flags = orig_flags;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2677 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2678
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2679 return OK;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2680 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2681
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2682 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2683 * Handle third level expression:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2684 * var1 == var2
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2685 * var1 =~ var2
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2686 * var1 != var2
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2687 * var1 !~ var2
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2688 * var1 > var2
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2689 * var1 >= var2
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2690 * var1 < var2
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2691 * var1 <= var2
80 d2796c60ca6f updated for version 7.0032 vimboss parents: 76 diff changeset	2692 * var1 is var2
d2796c60ca6f updated for version 7.0032 vimboss parents: 76 diff changeset	2693 * var1 isnot var2
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2694 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2695 * "arg" must point to the first non-white of the expression.
21636 dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2696 * "arg" is advanced to just after the recognized expression.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2697 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2698 * Return OK or FAIL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2699 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2700 static int
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2701 eval4(char_u *arg, typval_T rettv, evalarg_T *evalarg)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2702 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2703 char_u *p;
21026 fe2ed85db946 patch 8.2.1064: Vim9: no line break allowed before comperators Bram Moolenaar <Bram@vim.org> parents: 21024 diff changeset	2704 int getnext;
23553 5c094273c015 patch 8.2.2319: "exptype_T" can be read as "expected type" Bram Moolenaar <Bram@vim.org> parents: 23551 diff changeset	2705 exprtype_T type = EXPR_UNKNOWN;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2706 int len = 2;
21546 4d3e983313dc patch 8.2.1323: Vim9: invalid operators only rejected in :def function Bram Moolenaar <Bram@vim.org> parents: 21512 diff changeset	2707 int type_is = FALSE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2708
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2709 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2710 * Get the first variable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2711 */
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2712 if (eval5(arg, rettv, evalarg) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2713 return FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2714
21026 fe2ed85db946 patch 8.2.1064: Vim9: no line break allowed before comperators Bram Moolenaar <Bram@vim.org> parents: 21024 diff changeset	2715 p = eval_next_non_blank(*arg, evalarg, &getnext);
21546 4d3e983313dc patch 8.2.1323: Vim9: invalid operators only rejected in :def function Bram Moolenaar <Bram@vim.org> parents: 21512 diff changeset	2716 type = get_compare_type(p, &len, &type_is);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2717
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2718 /*
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	2719 * If there is a comparative operator, use it.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2720 */
19017 d9ea4f0bfd34 patch 8.2.0069: ETYPE_ is used for two different enums Bram Moolenaar <Bram@vim.org> parents: 19001 diff changeset	2721 if (type != EXPR_UNKNOWN)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2722 {
21425 a6c316ef161a patch 8.2.1263: Vim9: comperators use 'ignorecase' in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21385 diff changeset	2723 typval_T var2;
a6c316ef161a patch 8.2.1263: Vim9: comperators use 'ignorecase' in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21385 diff changeset	2724 int ic;
a6c316ef161a patch 8.2.1263: Vim9: comperators use 'ignorecase' in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21385 diff changeset	2725 int vim9script = in_vim9script();
21636 dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2726 int evaluate = evalarg == NULL
dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2727 ? 0 : (evalarg->eval_flags & EVAL_EVALUATE);
21425 a6c316ef161a patch 8.2.1263: Vim9: comperators use 'ignorecase' in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21385 diff changeset	2728
21026 fe2ed85db946 patch 8.2.1064: Vim9: no line break allowed before comperators Bram Moolenaar <Bram@vim.org> parents: 21024 diff changeset	2729 if (getnext)
24713 34a5329b85aa patch 8.2.2895: Vim9: random characters appear in some error messages Bram Moolenaar <Bram@vim.org> parents: 24707 diff changeset	2730 {
21026 fe2ed85db946 patch 8.2.1064: Vim9: no line break allowed before comperators Bram Moolenaar <Bram@vim.org> parents: 21024 diff changeset	2731 *arg = eval_next_line(evalarg);
24713 34a5329b85aa patch 8.2.2895: Vim9: random characters appear in some error messages Bram Moolenaar <Bram@vim.org> parents: 24707 diff changeset	2732 p = *arg;
34a5329b85aa patch 8.2.2895: Vim9: random characters appear in some error messages Bram Moolenaar <Bram@vim.org> parents: 24707 diff changeset	2733 }
21636 dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2734 else if (evaluate && vim9script && !VIM_ISWHITE(**arg))
dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2735 {
24713 34a5329b85aa patch 8.2.2895: Vim9: random characters appear in some error messages Bram Moolenaar <Bram@vim.org> parents: 24707 diff changeset	2736 error_white_both(*arg, len);
21636 dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2737 clear_tv(rettv);
dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2738 return FAIL;
dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2739 }
21026 fe2ed85db946 patch 8.2.1064: Vim9: no line break allowed before comperators Bram Moolenaar <Bram@vim.org> parents: 21024 diff changeset	2740
21546 4d3e983313dc patch 8.2.1323: Vim9: invalid operators only rejected in :def function Bram Moolenaar <Bram@vim.org> parents: 21512 diff changeset	2741 if (vim9script && type_is && (p[len] == '?' \|\| p[len] == '#'))
4d3e983313dc patch 8.2.1323: Vim9: invalid operators only rejected in :def function Bram Moolenaar <Bram@vim.org> parents: 21512 diff changeset	2742 {
25064 8f2262c72178 patch 8.2.3069: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25054 diff changeset	2743 semsg(_(e_invalid_expression_str), p);
21546 4d3e983313dc patch 8.2.1323: Vim9: invalid operators only rejected in :def function Bram Moolenaar <Bram@vim.org> parents: 21512 diff changeset	2744 clear_tv(rettv);
4d3e983313dc patch 8.2.1323: Vim9: invalid operators only rejected in :def function Bram Moolenaar <Bram@vim.org> parents: 21512 diff changeset	2745 return FAIL;
4d3e983313dc patch 8.2.1323: Vim9: invalid operators only rejected in :def function Bram Moolenaar <Bram@vim.org> parents: 21512 diff changeset	2746 }
4d3e983313dc patch 8.2.1323: Vim9: invalid operators only rejected in :def function Bram Moolenaar <Bram@vim.org> parents: 21512 diff changeset	2747
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2748 // extra question mark appended: ignore case
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2749 if (p[len] == '?')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2750 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2751 ic = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2752 ++len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2753 }
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2754 // extra '#' appended: match case
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2755 else if (p[len] == '#')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2756 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2757 ic = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2758 ++len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2759 }
21425 a6c316ef161a patch 8.2.1263: Vim9: comperators use 'ignorecase' in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21385 diff changeset	2760 // nothing appended: use 'ignorecase' if not in Vim script
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2761 else
21425 a6c316ef161a patch 8.2.1263: Vim9: comperators use 'ignorecase' in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21385 diff changeset	2762 ic = vim9script ? FALSE : p_ic;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2763
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2764 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2765 * Get the second variable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2766 */
21636 dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2767 if (evaluate && vim9script && !IS_WHITE_OR_NUL(p[len]))
dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2768 {
24339 236e9ebdb30e patch 8.2.2710: Vim9: not all tests cover script and :def function Bram Moolenaar <Bram@vim.org> parents: 24250 diff changeset	2769 error_white_both(p, len);
21636 dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2770 clear_tv(rettv);
dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2771 return FAIL;
dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2772 }
21046 0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	2773 *arg = skipwhite_and_linebreak(p + len, evalarg);
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2774 if (eval5(arg, &var2, evalarg) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2775 {
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	2776 clear_tv(rettv);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2777 return FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2778 }
21636 dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2779 if (evaluate)
13274 f4b4162264b1 patch 8.0.1511: some code for the debugger watch expression is clumsy Christian Brabandt <cb@256bit.org> parents: 13272 diff changeset	2780 {
21251 d1215fcdbca8 patch 8.2.1176: Vim9: not enough type checking in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21220 diff changeset	2781 int ret;
d1215fcdbca8 patch 8.2.1176: Vim9: not enough type checking in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21220 diff changeset	2782
21425 a6c316ef161a patch 8.2.1263: Vim9: comperators use 'ignorecase' in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21385 diff changeset	2783 if (vim9script && check_compare_types(type, rettv, &var2) == FAIL)
21251 d1215fcdbca8 patch 8.2.1176: Vim9: not enough type checking in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21220 diff changeset	2784 {
d1215fcdbca8 patch 8.2.1176: Vim9: not enough type checking in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21220 diff changeset	2785 ret = FAIL;
d1215fcdbca8 patch 8.2.1176: Vim9: not enough type checking in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21220 diff changeset	2786 clear_tv(rettv);
d1215fcdbca8 patch 8.2.1176: Vim9: not enough type checking in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21220 diff changeset	2787 }
d1215fcdbca8 patch 8.2.1176: Vim9: not enough type checking in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21220 diff changeset	2788 else
d1215fcdbca8 patch 8.2.1176: Vim9: not enough type checking in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21220 diff changeset	2789 ret = typval_compare(rettv, &var2, type, ic);
13274 f4b4162264b1 patch 8.0.1511: some code for the debugger watch expression is clumsy Christian Brabandt <cb@256bit.org> parents: 13272 diff changeset	2790 clear_tv(&var2);
f4b4162264b1 patch 8.0.1511: some code for the debugger watch expression is clumsy Christian Brabandt <cb@256bit.org> parents: 13272 diff changeset	2791 return ret;
f4b4162264b1 patch 8.0.1511: some code for the debugger watch expression is clumsy Christian Brabandt <cb@256bit.org> parents: 13272 diff changeset	2792 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2793 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2794
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2795 return OK;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2796 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2797
22683 5cbcd3768125 patch 8.2.1890: Vim9: strange error for subtracting from a list Bram Moolenaar <Bram@vim.org> parents: 22606 diff changeset	2798 /*
5cbcd3768125 patch 8.2.1890: Vim9: strange error for subtracting from a list Bram Moolenaar <Bram@vim.org> parents: 22606 diff changeset	2799 * Make a copy of blob "tv1" and append blob "tv2".
5cbcd3768125 patch 8.2.1890: Vim9: strange error for subtracting from a list Bram Moolenaar <Bram@vim.org> parents: 22606 diff changeset	2800 */
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2801 void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2802 eval_addblob(typval_T tv1, typval_T tv2)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2803 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2804 blob_T *b1 = tv1->vval.v_blob;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2805 blob_T *b2 = tv2->vval.v_blob;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2806 blob_T *b = blob_alloc();
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2807 int i;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2808
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2809 if (b != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2810 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2811 for (i = 0; i < blob_len(b1); i++)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2812 ga_append(&b->bv_ga, blob_get(b1, i));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2813 for (i = 0; i < blob_len(b2); i++)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2814 ga_append(&b->bv_ga, blob_get(b2, i));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2815
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2816 clear_tv(tv1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2817 rettv_blob_set(tv1, b);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2818 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2819 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2820
22683 5cbcd3768125 patch 8.2.1890: Vim9: strange error for subtracting from a list Bram Moolenaar <Bram@vim.org> parents: 22606 diff changeset	2821 /*
5cbcd3768125 patch 8.2.1890: Vim9: strange error for subtracting from a list Bram Moolenaar <Bram@vim.org> parents: 22606 diff changeset	2822 * Make a copy of list "tv1" and append list "tv2".
5cbcd3768125 patch 8.2.1890: Vim9: strange error for subtracting from a list Bram Moolenaar <Bram@vim.org> parents: 22606 diff changeset	2823 */
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2824 int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2825 eval_addlist(typval_T tv1, typval_T tv2)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2826 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2827 typval_T var3;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2828
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2829 // concatenate Lists
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2830 if (list_concat(tv1->vval.v_list, tv2->vval.v_list, &var3) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2831 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2832 clear_tv(tv1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2833 clear_tv(tv2);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2834 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2835 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2836 clear_tv(tv1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2837 *tv1 = var3;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2838 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2839 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2840
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2841 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2842 * Handle fourth level expression:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2843 * + number addition
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2844 * - number subtraction
16223 abb67309c1ca patch 8.1.1116: cannot enforce a Vim script style Bram Moolenaar <Bram@vim.org> parents: 16219 diff changeset	2845 * . string concatenation (if script version is 1)
16219 bd49e1656c72 patch 8.1.1114: confusing overloaded operator "." for string concatenation Bram Moolenaar <Bram@vim.org> parents: 16170 diff changeset	2846 * .. string concatenation
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2847 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2848 * "arg" must point to the first non-white of the expression.
21636 dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	2849 * "arg" is advanced to just after the recognized expression.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2850 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2851 * Return OK or FAIL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2852 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2853 static int
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2854 eval5(char_u *arg, typval_T rettv, evalarg_T *evalarg)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2855 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2856 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2857 * Get the first variable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2858 */
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2859 if (eval6(arg, rettv, evalarg, FALSE) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2860 return FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2861
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2862 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2863 * Repeat computing, until no '+', '-' or '.' is following.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2864 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2865 for (;;)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2866 {
21305 91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	2867 int evaluate;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2868 int getnext;
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2869 char_u *p;
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2870 int op;
21630 3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	2871 int oplen;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2872 int concat;
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2873 typval_T var2;
21949 e6608764248a patch 8.2.1524: no longer get an error for string concatenation with float Bram Moolenaar <Bram@vim.org> parents: 21925 diff changeset	2874 int vim9script = in_vim9script();
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2875
16223 abb67309c1ca patch 8.1.1116: cannot enforce a Vim script style Bram Moolenaar <Bram@vim.org> parents: 16219 diff changeset	2876 // "." is only string concatenation when scriptversion is 1
24047 b535ab17d160 patch 8.2.2565: Vim9: "..=" not always recognized Bram Moolenaar <Bram@vim.org> parents: 23982 diff changeset	2877 // "+=", "-=" and "..=" are assignments
24533 9c404d78d767 patch 8.2.2806: Vim9: using "++nr" as a command might not work Bram Moolenaar <Bram@vim.org> parents: 24525 diff changeset	2878 // "++" and "--" on the next line are a separate command.
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2879 p = eval_next_non_blank(*arg, evalarg, &getnext);
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2880 op = *p;
25622 15b54e0a576b patch 8.2.3347: check for legacy script is incomplete Bram Moolenaar <Bram@vim.org> parents: 25620 diff changeset	2881 concat = op == '.' && (*(p + 1) == '.' \|\| in_old_script(2));
24047 b535ab17d160 patch 8.2.2565: Vim9: "..=" not always recognized Bram Moolenaar <Bram@vim.org> parents: 23982 diff changeset	2882 if ((op != '+' && op != '-' && !concat) \|\| p[1] == '='
b535ab17d160 patch 8.2.2565: Vim9: "..=" not always recognized Bram Moolenaar <Bram@vim.org> parents: 23982 diff changeset	2883 \|\| (p[1] == '.' && p[2] == '='))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2884 break;
24533 9c404d78d767 patch 8.2.2806: Vim9: using "++nr" as a command might not work Bram Moolenaar <Bram@vim.org> parents: 24525 diff changeset	2885 if (getnext && (op == '+' \|\| op == '-') && p[0] == p[1])
9c404d78d767 patch 8.2.2806: Vim9: using "++nr" as a command might not work Bram Moolenaar <Bram@vim.org> parents: 24525 diff changeset	2886 break;
21305 91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	2887
21630 3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	2888 evaluate = evalarg == NULL ? 0 : (evalarg->eval_flags & EVAL_EVALUATE);
21634 3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	2889 oplen = (concat && p[1] == '.') ? 2 : 1;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2890 if (getnext)
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	2891 *arg = eval_next_line(evalarg);
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2892 else
21630 3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	2893 {
21949 e6608764248a patch 8.2.1524: no longer get an error for string concatenation with float Bram Moolenaar <Bram@vim.org> parents: 21925 diff changeset	2894 if (evaluate && vim9script && !VIM_ISWHITE(**arg))
21630 3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	2895 {
24713 34a5329b85aa patch 8.2.2895: Vim9: random characters appear in some error messages Bram Moolenaar <Bram@vim.org> parents: 24707 diff changeset	2896 error_white_both(*arg, oplen);
21630 3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	2897 clear_tv(rettv);
3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	2898 return FAIL;
3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	2899 }
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	2900 *arg = p;
21630 3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	2901 }
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	2902 if ((op != '+' \|\| (rettv->v_type != VAR_LIST
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	2903 && rettv->v_type != VAR_BLOB))
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	2904 #ifdef FEAT_FLOAT
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	2905 && (op == '.' \|\| rettv->v_type != VAR_FLOAT)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	2906 #endif
22683 5cbcd3768125 patch 8.2.1890: Vim9: strange error for subtracting from a list Bram Moolenaar <Bram@vim.org> parents: 22606 diff changeset	2907 && evaluate)
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2908 {
22683 5cbcd3768125 patch 8.2.1890: Vim9: strange error for subtracting from a list Bram Moolenaar <Bram@vim.org> parents: 22606 diff changeset	2909 int error = FALSE;
5cbcd3768125 patch 8.2.1890: Vim9: strange error for subtracting from a list Bram Moolenaar <Bram@vim.org> parents: 22606 diff changeset	2910
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2911 // For "list + ...", an illegal use of the first operand as
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2912 // a number cannot be determined before evaluating the 2nd
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2913 // operand: if this is also a list, all is ok.
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2914 // For "something . ...", "something - ..." or "non-list + ...",
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2915 // we know that the first operand needs to be a string or number
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2916 // without evaluating the 2nd operand. So check before to avoid
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2917 // side effects after an error.
22683 5cbcd3768125 patch 8.2.1890: Vim9: strange error for subtracting from a list Bram Moolenaar <Bram@vim.org> parents: 22606 diff changeset	2918 if (op != '.')
5cbcd3768125 patch 8.2.1890: Vim9: strange error for subtracting from a list Bram Moolenaar <Bram@vim.org> parents: 22606 diff changeset	2919 tv_get_number_chk(rettv, &error);
5cbcd3768125 patch 8.2.1890: Vim9: strange error for subtracting from a list Bram Moolenaar <Bram@vim.org> parents: 22606 diff changeset	2920 if ((op == '.' && tv_get_string_chk(rettv) == NULL) \|\| error)
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2921 {
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2922 clear_tv(rettv);
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2923 return FAIL;
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2924 }
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2925 }
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2926
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2927 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2928 * Get the second variable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2929 */
21949 e6608764248a patch 8.2.1524: no longer get an error for string concatenation with float Bram Moolenaar <Bram@vim.org> parents: 21925 diff changeset	2930 if (evaluate && vim9script && !IS_WHITE_OR_NUL((*arg)[oplen]))
21630 3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	2931 {
24707 ad7cac75b2d1 patch 8.2.2892: error message contains random characters Bram Moolenaar <Bram@vim.org> parents: 24655 diff changeset	2932 error_white_both(*arg, oplen);
21630 3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	2933 clear_tv(rettv);
3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	2934 return FAIL;
3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	2935 }
3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	2936 arg = skipwhite_and_linebreak(arg + oplen, evalarg);
21949 e6608764248a patch 8.2.1524: no longer get an error for string concatenation with float Bram Moolenaar <Bram@vim.org> parents: 21925 diff changeset	2937 if (eval6(arg, &var2, evalarg, !vim9script && op == '.') == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2938 {
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	2939 clear_tv(rettv);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2940 return FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2941 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2942
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2943 if (evaluate)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2944 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2945 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2946 * Compute the result.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2947 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2948 if (op == '.')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2949 {
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2950 char_u buf1[NUMBUFLEN], buf2[NUMBUFLEN];
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2951 char_u *s1 = tv_get_string_buf(rettv, buf1);
21771 fcf978444298 patch 8.2.1435: Vim9: always converting to string for ".." leads to mistakes Bram Moolenaar <Bram@vim.org> parents: 21733 diff changeset	2952 char_u *s2 = NULL;
fcf978444298 patch 8.2.1435: Vim9: always converting to string for ".." leads to mistakes Bram Moolenaar <Bram@vim.org> parents: 21733 diff changeset	2953
21949 e6608764248a patch 8.2.1524: no longer get an error for string concatenation with float Bram Moolenaar <Bram@vim.org> parents: 21925 diff changeset	2954 if (vim9script && (var2.v_type == VAR_VOID
21771 fcf978444298 patch 8.2.1435: Vim9: always converting to string for ".." leads to mistakes Bram Moolenaar <Bram@vim.org> parents: 21733 diff changeset	2955 \|\| var2.v_type == VAR_CHANNEL
fcf978444298 patch 8.2.1435: Vim9: always converting to string for ".." leads to mistakes Bram Moolenaar <Bram@vim.org> parents: 21733 diff changeset	2956 \|\| var2.v_type == VAR_JOB))
24614 07b3d21a8b4b patch 8.2.2846: Vim9: "echo Func()" does not give an error for using void Bram Moolenaar <Bram@vim.org> parents: 24606 diff changeset	2957 semsg(_(e_using_invalid_value_as_string_str),
07b3d21a8b4b patch 8.2.2846: Vim9: "echo Func()" does not give an error for using void Bram Moolenaar <Bram@vim.org> parents: 24606 diff changeset	2958 vartype_name(var2.v_type));
21771 fcf978444298 patch 8.2.1435: Vim9: always converting to string for ".." leads to mistakes Bram Moolenaar <Bram@vim.org> parents: 21733 diff changeset	2959 #ifdef FEAT_FLOAT
21949 e6608764248a patch 8.2.1524: no longer get an error for string concatenation with float Bram Moolenaar <Bram@vim.org> parents: 21925 diff changeset	2960 else if (vim9script && var2.v_type == VAR_FLOAT)
21771 fcf978444298 patch 8.2.1435: Vim9: always converting to string for ".." leads to mistakes Bram Moolenaar <Bram@vim.org> parents: 21733 diff changeset	2961 {
fcf978444298 patch 8.2.1435: Vim9: always converting to string for ".." leads to mistakes Bram Moolenaar <Bram@vim.org> parents: 21733 diff changeset	2962 vim_snprintf((char *)buf2, NUMBUFLEN, "%g",
fcf978444298 patch 8.2.1435: Vim9: always converting to string for ".." leads to mistakes Bram Moolenaar <Bram@vim.org> parents: 21733 diff changeset	2963 var2.vval.v_float);
fcf978444298 patch 8.2.1435: Vim9: always converting to string for ".." leads to mistakes Bram Moolenaar <Bram@vim.org> parents: 21733 diff changeset	2964 s2 = buf2;
fcf978444298 patch 8.2.1435: Vim9: always converting to string for ".." leads to mistakes Bram Moolenaar <Bram@vim.org> parents: 21733 diff changeset	2965 }
fcf978444298 patch 8.2.1435: Vim9: always converting to string for ".." leads to mistakes Bram Moolenaar <Bram@vim.org> parents: 21733 diff changeset	2966 #endif
fcf978444298 patch 8.2.1435: Vim9: always converting to string for ".." leads to mistakes Bram Moolenaar <Bram@vim.org> parents: 21733 diff changeset	2967 else
fcf978444298 patch 8.2.1435: Vim9: always converting to string for ".." leads to mistakes Bram Moolenaar <Bram@vim.org> parents: 21733 diff changeset	2968 s2 = tv_get_string_buf_chk(&var2, buf2);
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	2969 if (s2 == NULL) // type error ?
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2970 {
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2971 clear_tv(rettv);
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2972 clear_tv(&var2);
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2973 return FAIL;
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	2974 }
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	2975 p = concat_str(s1, s2);
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	2976 clear_tv(rettv);
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	2977 rettv->v_type = VAR_STRING;
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	2978 rettv->vval.v_string = p;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2979 }
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	2980 else if (op == '+' && rettv->v_type == VAR_BLOB
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	2981 && var2.v_type == VAR_BLOB)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2982 eval_addblob(rettv, &var2);
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	2983 else if (op == '+' && rettv->v_type == VAR_LIST
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	2984 && var2.v_type == VAR_LIST)
80 d2796c60ca6f updated for version 7.0032 vimboss parents: 76 diff changeset	2985 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	2986 if (eval_addlist(rettv, &var2) == FAIL)
80 d2796c60ca6f updated for version 7.0032 vimboss parents: 76 diff changeset	2987 return FAIL;
d2796c60ca6f updated for version 7.0032 vimboss parents: 76 diff changeset	2988 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2989 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2990 {
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2991 int error = FALSE;
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2992 varnumber_T n1, n2;
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	2993 #ifdef FEAT_FLOAT
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2994 float_T f1 = 0, f2 = 0;
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	2995
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	2996 if (rettv->v_type == VAR_FLOAT)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	2997 {
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	2998 f1 = rettv->vval.v_float;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	2999 n1 = 0;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3000 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3001 else
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3002 #endif
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3003 {
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	3004 n1 = tv_get_number_chk(rettv, &error);
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3005 if (error)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3006 {
24343 7735cbff607d patch 8.2.2712: memory leak when adding to a blob fails Bram Moolenaar <Bram@vim.org> parents: 24339 diff changeset	3007 // This can only happen for "list + non-list" or
7735cbff607d patch 8.2.2712: memory leak when adding to a blob fails Bram Moolenaar <Bram@vim.org> parents: 24339 diff changeset	3008 // "blob + non-blob". For "non-list + ..." or
7735cbff607d patch 8.2.2712: memory leak when adding to a blob fails Bram Moolenaar <Bram@vim.org> parents: 24339 diff changeset	3009 // "something - ...", we returned before evaluating the
7735cbff607d patch 8.2.2712: memory leak when adding to a blob fails Bram Moolenaar <Bram@vim.org> parents: 24339 diff changeset	3010 // 2nd operand.
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3011 clear_tv(rettv);
24343 7735cbff607d patch 8.2.2712: memory leak when adding to a blob fails Bram Moolenaar <Bram@vim.org> parents: 24339 diff changeset	3012 clear_tv(&var2);
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3013 return FAIL;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3014 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3015 #ifdef FEAT_FLOAT
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3016 if (var2.v_type == VAR_FLOAT)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3017 f1 = n1;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3018 #endif
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3019 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3020 #ifdef FEAT_FLOAT
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3021 if (var2.v_type == VAR_FLOAT)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3022 {
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3023 f2 = var2.vval.v_float;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3024 n2 = 0;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3025 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3026 else
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3027 #endif
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3028 {
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	3029 n2 = tv_get_number_chk(&var2, &error);
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3030 if (error)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3031 {
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3032 clear_tv(rettv);
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3033 clear_tv(&var2);
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3034 return FAIL;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3035 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3036 #ifdef FEAT_FLOAT
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3037 if (rettv->v_type == VAR_FLOAT)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3038 f2 = n2;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3039 #endif
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	3040 }
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	3041 clear_tv(rettv);
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3042
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3043 #ifdef FEAT_FLOAT
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3044 // If there is a float on either side the result is a float.
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3045 if (rettv->v_type == VAR_FLOAT \|\| var2.v_type == VAR_FLOAT)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3046 {
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3047 if (op == '+')
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3048 f1 = f1 + f2;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3049 else
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3050 f1 = f1 - f2;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3051 rettv->v_type = VAR_FLOAT;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3052 rettv->vval.v_float = f1;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3053 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3054 else
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3055 #endif
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3056 {
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3057 if (op == '+')
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3058 n1 = n1 + n2;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3059 else
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3060 n1 = n1 - n2;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3061 rettv->v_type = VAR_NUMBER;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3062 rettv->vval.v_number = n1;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3063 }
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	3064 }
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	3065 clear_tv(&var2);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3066 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3067 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3068 return OK;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3069 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3070
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3071 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3072 * Handle fifth level expression:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3073 * * number multiplication
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3074 * / number division
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3075 * % number modulo
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3076 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3077 * "arg" must point to the first non-white of the expression.
21636 dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	3078 * "arg" is advanced to just after the recognized expression.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3079 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3080 * Return OK or FAIL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3081 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3082 static int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	3083 eval6(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	3084 char_u **arg,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	3085 typval_T *rettv,
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3086 evalarg_T *evalarg,
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3087 int want_string) // after "." operator
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3088 {
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3089 #ifdef FEAT_FLOAT
21305 91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3090 int use_float = FALSE;
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3091 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3092
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3093 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3094 * Get the first variable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3095 */
24518 cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3096 if (eval7t(arg, rettv, evalarg, want_string) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3097 return FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3098
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3099 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3100 * Repeat computing, until no '*', '/' or '%' is following.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3101 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3102 for (;;)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3103 {
21305 91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3104 int evaluate;
91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3105 int getnext;
91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3106 typval_T var2;
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	3107 char_u *p;
21305 91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3108 int op;
91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3109 varnumber_T n1, n2;
91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3110 #ifdef FEAT_FLOAT
91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3111 float_T f1, f2;
91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3112 #endif
91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3113 int error;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3114
24047 b535ab17d160 patch 8.2.2565: Vim9: "..=" not always recognized Bram Moolenaar <Bram@vim.org> parents: 23982 diff changeset	3115 // "*=", "/=" and "%=" are assignments
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	3116 p = eval_next_non_blank(*arg, evalarg, &getnext);
cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	3117 op = *p;
24047 b535ab17d160 patch 8.2.2565: Vim9: "..=" not always recognized Bram Moolenaar <Bram@vim.org> parents: 23982 diff changeset	3118 if ((op != '*' && op != '/' && op != '%') \|\| p[1] == '=')
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3119 break;
21305 91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3120
21634 3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3121 evaluate = evalarg == NULL ? 0 : (evalarg->eval_flags & EVAL_EVALUATE);
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3122 if (getnext)
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	3123 *arg = eval_next_line(evalarg);
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	3124 else
21634 3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3125 {
3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3126 if (evaluate && in_vim9script() && !VIM_ISWHITE(**arg))
3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3127 {
24713 34a5329b85aa patch 8.2.2895: Vim9: random characters appear in some error messages Bram Moolenaar <Bram@vim.org> parents: 24707 diff changeset	3128 error_white_both(*arg, 1);
21634 3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3129 clear_tv(rettv);
3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3130 return FAIL;
3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3131 }
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	3132 *arg = p;
21634 3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3133 }
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3134
21305 91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3135 #ifdef FEAT_FLOAT
91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3136 f1 = 0;
91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3137 f2 = 0;
91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3138 #endif
91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3139 error = FALSE;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3140 if (evaluate)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3141 {
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3142 #ifdef FEAT_FLOAT
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3143 if (rettv->v_type == VAR_FLOAT)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3144 {
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3145 f1 = rettv->vval.v_float;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3146 use_float = TRUE;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3147 n1 = 0;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3148 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3149 else
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3150 #endif
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	3151 n1 = tv_get_number_chk(rettv, &error);
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	3152 clear_tv(rettv);
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	3153 if (error)
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	3154 return FAIL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3155 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3156 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3157 n1 = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3158
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3159 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3160 * Get the second variable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3161 */
21634 3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3162 if (evaluate && in_vim9script() && !IS_WHITE_OR_NUL((*arg)[1]))
3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3163 {
24063 d8f3a993dc9a patch 8.2.2573: Vim9: using inalid pointer for error message Bram Moolenaar <Bram@vim.org> parents: 24047 diff changeset	3164 error_white_both(*arg, 1);
21634 3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3165 clear_tv(rettv);
3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3166 return FAIL;
3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3167 }
3a86e41fdffd patch 8.2.1367: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21630 diff changeset	3168 arg = skipwhite_and_linebreak(arg + 1, evalarg);
24518 cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3169 if (eval7t(arg, &var2, evalarg, FALSE) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3170 return FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3171
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3172 if (evaluate)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3173 {
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3174 #ifdef FEAT_FLOAT
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3175 if (var2.v_type == VAR_FLOAT)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3176 {
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3177 if (!use_float)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3178 {
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3179 f1 = n1;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3180 use_float = TRUE;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3181 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3182 f2 = var2.vval.v_float;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3183 n2 = 0;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3184 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3185 else
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3186 #endif
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3187 {
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	3188 n2 = tv_get_number_chk(&var2, &error);
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3189 clear_tv(&var2);
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3190 if (error)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3191 return FAIL;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3192 #ifdef FEAT_FLOAT
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3193 if (use_float)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3194 f2 = n2;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3195 #endif
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3196 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3197
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3198 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3199 * Compute the result.
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3200 * When either side is a float the result is a float.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3201 */
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3202 #ifdef FEAT_FLOAT
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3203 if (use_float)
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3204 {
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3205 if (op == '*')
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3206 f1 = f1 * f2;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3207 else if (op == '/')
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3208 {
2441 620a42739426 Improvements for VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2427 diff changeset	3209 # ifdef VMS
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3210 // VMS crashes on divide by zero, work around it
2441 620a42739426 Improvements for VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2427 diff changeset	3211 if (f2 == 0.0)
620a42739426 Improvements for VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2427 diff changeset	3212 {
620a42739426 Improvements for VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2427 diff changeset	3213 if (f1 == 0)
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3214 f1 = -1 * __F_FLT_MAX - 1L; // similar to NaN
2441 620a42739426 Improvements for VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2427 diff changeset	3215 else if (f1 < 0)
2529 2aaa88366cbb Fix for float values on VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2513 diff changeset	3216 f1 = -1 * __F_FLT_MAX;
2441 620a42739426 Improvements for VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2427 diff changeset	3217 else
2529 2aaa88366cbb Fix for float values on VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2513 diff changeset	3218 f1 = __F_FLT_MAX;
2441 620a42739426 Improvements for VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2427 diff changeset	3219 }
620a42739426 Improvements for VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2427 diff changeset	3220 else
620a42739426 Improvements for VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2427 diff changeset	3221 f1 = f1 / f2;
620a42739426 Improvements for VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2427 diff changeset	3222 # else
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3223 // We rely on the floating point library to handle divide
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3224 // by zero to result in "inf" and not a crash.
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3225 f1 = f1 / f2;
2441 620a42739426 Improvements for VMS. (Zoltan Arpadffy) Bram Moolenaar <bram@vim.org> parents: 2427 diff changeset	3226 # endif
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3227 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3228 else
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3229 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	3230 emsg(_(e_modulus));
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3231 return FAIL;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3232 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3233 rettv->v_type = VAR_FLOAT;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3234 rettv->vval.v_float = f1;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3235 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3236 else
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3237 #endif
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3238 {
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	3239 int failed = FALSE;
e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	3240
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3241 if (op == '*')
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3242 n1 = n1 * n2;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3243 else if (op == '/')
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	3244 n1 = num_divide(n1, n2, &failed);
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3245 else
23679 e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	3246 n1 = num_modulus(n1, n2, &failed);
e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	3247 if (failed)
e8c379b20765 patch 8.2.2381: Vim9: divide by zero does not abort expression execution Bram Moolenaar <Bram@vim.org> parents: 23673 diff changeset	3248 return FAIL;
15969 9cc42db77a54 patch 8.1.0990: floating point exception with "%= 0" and "/= 0" Bram Moolenaar <Bram@vim.org> parents: 15904 diff changeset	3249
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3250 rettv->v_type = VAR_NUMBER;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3251 rettv->vval.v_number = n1;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3252 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3253 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3254 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3255
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3256 return OK;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3257 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3258
24518 cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3259 /*
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3260 * Handle a type cast before a base level expression.
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3261 * "arg" must point to the first non-white of the expression.
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3262 * "arg" is advanced to just after the recognized expression.
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3263 * Return OK or FAIL.
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3264 */
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3265 static int
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3266 eval7t(
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3267 char_u **arg,
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3268 typval_T *rettv,
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3269 evalarg_T *evalarg,
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3270 int want_string) // after "." operator
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3271 {
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3272 type_T *want_type = NULL;
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3273 garray_T type_list; // list of pointers to allocated types
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3274 int res;
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3275 int evaluate = evalarg == NULL ? 0
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3276 : (evalarg->eval_flags & EVAL_EVALUATE);
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3277
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3278 // Recognize <type> in Vim9 script only.
25374 7124992f26ef patch 8.2.3224: cannot call script-local function after :vim9cmd Bram Moolenaar <Bram@vim.org> parents: 25358 diff changeset	3279 if (in_vim9script() && *arg == '<' && eval_isnamec1((arg)[1])
7124992f26ef patch 8.2.3224: cannot call script-local function after :vim9cmd Bram Moolenaar <Bram@vim.org> parents: 25358 diff changeset	3280 && STRNCMP(*arg, "<SNR>", 5) != 0)
24518 cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3281 {
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3282 ++*arg;
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3283 ga_init2(&type_list, sizeof(type_T *), 10);
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3284 want_type = parse_type(arg, &type_list, TRUE);
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3285 if (want_type == NULL && (evaluate \|\| **arg != '>'))
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3286 {
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3287 clear_type_list(&type_list);
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3288 return FAIL;
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3289 }
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3290
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3291 if (**arg != '>')
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3292 {
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3293 if (skipwhite(arg) == '>')
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3294 semsg(_(e_no_white_space_allowed_before_str_str), ">", *arg);
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3295 else
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3296 emsg(_(e_missing_gt));
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3297 clear_type_list(&type_list);
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3298 return FAIL;
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3299 }
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3300 ++*arg;
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3301 arg = skipwhite_and_linebreak(arg, evalarg);
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3302 }
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3303
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3304 res = eval7(arg, rettv, evalarg, want_string);
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3305
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3306 if (want_type != NULL && evaluate)
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3307 {
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3308 if (res == OK)
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3309 {
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3310 type_T *actual = typval2type(rettv, get_copyID(), &type_list, TRUE);
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3311
25425 effe5f2b4d01 patch 8.2.3249: Vim9: error for re-imported function with default argument Bram Moolenaar <Bram@vim.org> parents: 25384 diff changeset	3312 if (!equal_type(want_type, actual, 0))
24518 cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3313 {
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3314 if (want_type == &t_bool && actual != &t_bool
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3315 && (actual->tt_flags & TTFLAG_BOOL_OK))
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3316 {
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3317 int n = tv2bool(rettv);
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3318
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3319 // can use "0" and "1" for boolean in some places
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3320 clear_tv(rettv);
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3321 rettv->v_type = VAR_BOOL;
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3322 rettv->vval.v_number = n ? VVAL_TRUE : VVAL_FALSE;
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3323 }
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3324 else
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3325 {
25328 0aac8880d74d patch 8.2.3201: crash in test Bram Moolenaar <Bram@vim.org> parents: 25326 diff changeset	3326 where_T where = WHERE_INIT;
0aac8880d74d patch 8.2.3201: crash in test Bram Moolenaar <Bram@vim.org> parents: 25326 diff changeset	3327
24518 cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3328 where.wt_variable = TRUE;
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3329 res = check_type(want_type, actual, TRUE, where);
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3330 }
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3331 }
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3332 }
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3333 clear_type_list(&type_list);
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3334 }
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3335
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3336 return res;
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3337 }
cf334a353c30 patch 8.2.2799: Vim9: type casts don't fully work at the script level Bram Moolenaar <Bram@vim.org> parents: 24486 diff changeset	3338
23525 54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3339 int
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3340 eval_leader(char_u **arg, int vim9)
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3341 {
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3342 char_u s = arg;
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3343 char_u p = arg;
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3344
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3345 while (p == '!' \|\| p == '-' \|\| *p == '+')
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3346 {
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3347 char_u *n = skipwhite(p + 1);
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3348
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3349 // ++, --, -+ and +- are not accepted in Vim9 script
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3350 if (vim9 && (p == '-' \|\| p == '+') && (n == '-' \|\| n == '+'))
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3351 {
25064 8f2262c72178 patch 8.2.3069: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25054 diff changeset	3352 semsg(_(e_invalid_expression_str), s);
23525 54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3353 return FAIL;
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3354 }
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3355 p = n;
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3356 }
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3357 *arg = p;
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3358 return OK;
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3359 }
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3360
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3361 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3362 * Handle sixth level expression:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3363 * number number constant
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	3364 * 0zFFFFFFFF Blob constant
1228 5eb1ac6f92ad updated for version 7.1b vimboss parents: 1109 diff changeset	3365 * "string" string constant
5eb1ac6f92ad updated for version 7.1b vimboss parents: 1109 diff changeset	3366 * 'string' literal string constant
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3367 * &option-name option value
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3368 * @r register contents
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3369 * identifier variable value
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3370 * function() function call
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3371 * $VAR environment variable
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3372 * (expression) nested expression
151 40a0699b6c62 updated for version 7.0046 vimboss parents: 142 diff changeset	3373 * [expr, expr] List
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	3374 * {arg, arg -> expr} Lambda
17368 6604ecb7a615 patch 8.1.1683: dictionary with string keys is longer than needed Bram Moolenaar <Bram@vim.org> parents: 17322 diff changeset	3375 * {key: val, key: val} Dictionary
17413 40417757dffd patch 8.1.1705: using ~{} for a literal dict is not nice Bram Moolenaar <Bram@vim.org> parents: 17387 diff changeset	3376 * #{key: val, key: val} Dictionary with literal keys
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3377 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3378 * Also handle:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3379 * ! in front logical NOT
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3380 * - in front unary minus
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3381 * + in front unary plus (ignored)
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3382 * trailing [] subscript in String or List
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3383 * trailing .name entry in Dictionary
17612 e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3384 * trailing ->name() method call
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3385 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3386 * "arg" must point to the first non-white of the expression.
21636 dcfcb6163f3d patch 8.2.1368: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21634 diff changeset	3387 * "arg" is advanced to just after the recognized expression.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3388 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3389 * Return OK or FAIL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3390 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3391 static int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	3392 eval7(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	3393 char_u **arg,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	3394 typval_T *rettv,
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3395 evalarg_T *evalarg,
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	3396 int want_string) // after "." operator
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3397 {
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3398 int evaluate = evalarg != NULL
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3399 && (evalarg->eval_flags & EVAL_EVALUATE);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3400 int len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3401 char_u *s;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3402 char_u start_leader, end_leader;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3403 int ret = OK;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3404 char_u *alias;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3405
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3406 /*
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	3407 * Initialise variable so that clear_tv() can't mistake this for a
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	3408 * string and free a string that isn't there.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3409 */
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	3410 rettv->v_type = VAR_UNKNOWN;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3411
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3412 /*
10042 4aead6a9b7a9 commit https://github.com/vim/vim/commit/edf3f97ae2af024708ebb4ac614227327033ca47 Christian Brabandt <cb@256bit.org> parents: 10000 diff changeset	3413 * Skip '!', '-' and '+' characters. They are handled later.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3414 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3415 start_leader = *arg;
23525 54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3416 if (eval_leader(arg, in_vim9script()) == FAIL)
54ec7c8b7459 patch 8.2.2305: Vim9: "++var" and "--var" are silently accepted Bram Moolenaar <Bram@vim.org> parents: 23499 diff changeset	3417 return FAIL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3418 end_leader = *arg;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3419
16223 abb67309c1ca patch 8.1.1116: cannot enforce a Vim script style Bram Moolenaar <Bram@vim.org> parents: 16219 diff changeset	3420 if (*arg == '.' && (!isdigit((*arg + 1))
abb67309c1ca patch 8.1.1116: cannot enforce a Vim script style Bram Moolenaar <Bram@vim.org> parents: 16219 diff changeset	3421 #ifdef FEAT_FLOAT
25622 15b54e0a576b patch 8.2.3347: check for legacy script is incomplete Bram Moolenaar <Bram@vim.org> parents: 25620 diff changeset	3422 \|\| in_old_script(2)
16223 abb67309c1ca patch 8.1.1116: cannot enforce a Vim script style Bram Moolenaar <Bram@vim.org> parents: 16219 diff changeset	3423 #endif
abb67309c1ca patch 8.1.1116: cannot enforce a Vim script style Bram Moolenaar <Bram@vim.org> parents: 16219 diff changeset	3424 ))
abb67309c1ca patch 8.1.1116: cannot enforce a Vim script style Bram Moolenaar <Bram@vim.org> parents: 16219 diff changeset	3425 {
25064 8f2262c72178 patch 8.2.3069: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25054 diff changeset	3426 semsg(_(e_invalid_expression_str), *arg);
16223 abb67309c1ca patch 8.1.1116: cannot enforce a Vim script style Bram Moolenaar <Bram@vim.org> parents: 16219 diff changeset	3427 ++*arg;
abb67309c1ca patch 8.1.1116: cannot enforce a Vim script style Bram Moolenaar <Bram@vim.org> parents: 16219 diff changeset	3428 return FAIL;
abb67309c1ca patch 8.1.1116: cannot enforce a Vim script style Bram Moolenaar <Bram@vim.org> parents: 16219 diff changeset	3429 }
abb67309c1ca patch 8.1.1116: cannot enforce a Vim script style Bram Moolenaar <Bram@vim.org> parents: 16219 diff changeset	3430
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3431 switch (**arg)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3432 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3433 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3434 * Number constant.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3435 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3436 case '0':
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3437 case '1':
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3438 case '2':
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3439 case '3':
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3440 case '4':
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3441 case '5':
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3442 case '6':
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3443 case '7':
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3444 case '8':
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3445 case '9':
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21118 diff changeset	3446 case '.': ret = eval_number(arg, rettv, evaluate, want_string);
21032 f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3447
f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3448 // Apply prefixed "-" and "+" now. Matters especially when
f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3449 // "->" follows.
21733 1bb5adfe5966 patch 8.2.1416: Vim9: boolean evaluation does not work as intended Bram Moolenaar <Bram@vim.org> parents: 21725 diff changeset	3450 if (ret == OK && evaluate && end_leader > start_leader
1bb5adfe5966 patch 8.2.1416: Vim9: boolean evaluation does not work as intended Bram Moolenaar <Bram@vim.org> parents: 21725 diff changeset	3451 && rettv->v_type != VAR_BLOB)
21032 f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3452 ret = eval7_leader(rettv, TRUE, start_leader, &end_leader);
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3453 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3454
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3455 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3456 * String constant: "string".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3457 */
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21118 diff changeset	3458 case '"': ret = eval_string(arg, rettv, evaluate);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3459 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3460
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3461 /*
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3462 * Literal string constant: 'str''ing'.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3463 */
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21118 diff changeset	3464 case '\'': ret = eval_lit_string(arg, rettv, evaluate);
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	3465 break;
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	3466
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	3467 /*
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	3468 * List: [expr, expr]
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	3469 */
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21118 diff changeset	3470 case '[': ret = eval_list(arg, rettv, evalarg, TRUE);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3471 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3472
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3473 /*
17413 40417757dffd patch 8.1.1705: using ~{} for a literal dict is not nice Bram Moolenaar <Bram@vim.org> parents: 17387 diff changeset	3474 * Dictionary: #{key: val, key: val}
17368 6604ecb7a615 patch 8.1.1683: dictionary with string keys is longer than needed Bram Moolenaar <Bram@vim.org> parents: 17322 diff changeset	3475 */
24174 99bfaa4693db patch 8.2.2628: Vim9: #{ can still be used at the script level Bram Moolenaar <Bram@vim.org> parents: 24112 diff changeset	3476 case '#': if (in_vim9script())
99bfaa4693db patch 8.2.2628: Vim9: #{ can still be used at the script level Bram Moolenaar <Bram@vim.org> parents: 24112 diff changeset	3477 {
99bfaa4693db patch 8.2.2628: Vim9: #{ can still be used at the script level Bram Moolenaar <Bram@vim.org> parents: 24112 diff changeset	3478 ret = vim9_bad_comment(*arg) ? FAIL : NOTDONE;
99bfaa4693db patch 8.2.2628: Vim9: #{ can still be used at the script level Bram Moolenaar <Bram@vim.org> parents: 24112 diff changeset	3479 }
99bfaa4693db patch 8.2.2628: Vim9: #{ can still be used at the script level Bram Moolenaar <Bram@vim.org> parents: 24112 diff changeset	3480 else if ((*arg)[1] == '{')
17368 6604ecb7a615 patch 8.1.1683: dictionary with string keys is longer than needed Bram Moolenaar <Bram@vim.org> parents: 17322 diff changeset	3481 {
6604ecb7a615 patch 8.1.1683: dictionary with string keys is longer than needed Bram Moolenaar <Bram@vim.org> parents: 17322 diff changeset	3482 ++*arg;
21034 2f8b0812819f patch 8.2.1068: Vim9: no line break allowed inside a dict Bram Moolenaar <Bram@vim.org> parents: 21032 diff changeset	3483 ret = eval_dict(arg, rettv, evalarg, TRUE);
17368 6604ecb7a615 patch 8.1.1683: dictionary with string keys is longer than needed Bram Moolenaar <Bram@vim.org> parents: 17322 diff changeset	3484 }
6604ecb7a615 patch 8.1.1683: dictionary with string keys is longer than needed Bram Moolenaar <Bram@vim.org> parents: 17322 diff changeset	3485 else
6604ecb7a615 patch 8.1.1683: dictionary with string keys is longer than needed Bram Moolenaar <Bram@vim.org> parents: 17322 diff changeset	3486 ret = NOTDONE;
6604ecb7a615 patch 8.1.1683: dictionary with string keys is longer than needed Bram Moolenaar <Bram@vim.org> parents: 17322 diff changeset	3487 break;
6604ecb7a615 patch 8.1.1683: dictionary with string keys is longer than needed Bram Moolenaar <Bram@vim.org> parents: 17322 diff changeset	3488
6604ecb7a615 patch 8.1.1683: dictionary with string keys is longer than needed Bram Moolenaar <Bram@vim.org> parents: 17322 diff changeset	3489 /*
9527 e8b3db8e2d30 commit https://github.com/vim/vim/commit/069c1e7fa9f45a665064f7f2c17da84d6a48f544 Christian Brabandt <cb@256bit.org> parents: 9525 diff changeset	3490 * Lambda: {arg, arg -> expr}
17368 6604ecb7a615 patch 8.1.1683: dictionary with string keys is longer than needed Bram Moolenaar <Bram@vim.org> parents: 17322 diff changeset	3491 * Dictionary: {'key': val, 'key': val}
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3492 */
23428 5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3493 case '{': if (in_vim9script())
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3494 ret = NOTDONE;
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3495 else
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3496 ret = get_lambda_tv(arg, rettv, in_vim9script(), evalarg);
9527 e8b3db8e2d30 commit https://github.com/vim/vim/commit/069c1e7fa9f45a665064f7f2c17da84d6a48f544 Christian Brabandt <cb@256bit.org> parents: 9525 diff changeset	3497 if (ret == NOTDONE)
21034 2f8b0812819f patch 8.2.1068: Vim9: no line break allowed inside a dict Bram Moolenaar <Bram@vim.org> parents: 21032 diff changeset	3498 ret = eval_dict(arg, rettv, evalarg, FALSE);
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3499 break;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3500
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3501 /*
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	3502 * Option value: &name
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3503 */
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21118 diff changeset	3504 case '&': ret = eval_option(arg, rettv, evaluate);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3505 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3506
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3507 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3508 * Environment variable: $VAR.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3509 */
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21118 diff changeset	3510 case '$': ret = eval_env_var(arg, rettv, evaluate);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3511 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3512
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3513 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3514 * Register contents: @r.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3515 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3516 case '@': ++*arg;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3517 if (evaluate)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3518 {
24339 236e9ebdb30e patch 8.2.2710: Vim9: not all tests cover script and :def function Bram Moolenaar <Bram@vim.org> parents: 24250 diff changeset	3519 if (in_vim9script() && IS_WHITE_OR_NUL(**arg))
236e9ebdb30e patch 8.2.2710: Vim9: not all tests cover script and :def function Bram Moolenaar <Bram@vim.org> parents: 24250 diff changeset	3520 semsg(_(e_syntax_error_at_str), *arg);
236e9ebdb30e patch 8.2.2710: Vim9: not all tests cover script and :def function Bram Moolenaar <Bram@vim.org> parents: 24250 diff changeset	3521 else if (in_vim9script() && !valid_yank_reg(**arg, FALSE))
236e9ebdb30e patch 8.2.2710: Vim9: not all tests cover script and :def function Bram Moolenaar <Bram@vim.org> parents: 24250 diff changeset	3522 emsg_invreg(**arg);
236e9ebdb30e patch 8.2.2710: Vim9: not all tests cover script and :def function Bram Moolenaar <Bram@vim.org> parents: 24250 diff changeset	3523 else
236e9ebdb30e patch 8.2.2710: Vim9: not all tests cover script and :def function Bram Moolenaar <Bram@vim.org> parents: 24250 diff changeset	3524 {
236e9ebdb30e patch 8.2.2710: Vim9: not all tests cover script and :def function Bram Moolenaar <Bram@vim.org> parents: 24250 diff changeset	3525 rettv->v_type = VAR_STRING;
236e9ebdb30e patch 8.2.2710: Vim9: not all tests cover script and :def function Bram Moolenaar <Bram@vim.org> parents: 24250 diff changeset	3526 rettv->vval.v_string = get_reg_contents(**arg,
236e9ebdb30e patch 8.2.2710: Vim9: not all tests cover script and :def function Bram Moolenaar <Bram@vim.org> parents: 24250 diff changeset	3527 GREG_EXPR_SRC);
236e9ebdb30e patch 8.2.2710: Vim9: not all tests cover script and :def function Bram Moolenaar <Bram@vim.org> parents: 24250 diff changeset	3528 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3529 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3530 if (**arg != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3531 ++*arg;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3532 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3533
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3534 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3535 * nested expression: (expression).
24655 3876d9629ebd patch 8.2.2866: Vim9: memory leak when using inline function Bram Moolenaar <Bram@vim.org> parents: 24632 diff changeset	3536 * or lambda: (arg) => expr
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3537 */
23338 9c5275b1c763 patch 8.2.2212: Vim9: lambda with => does not work at the script level Bram Moolenaar <Bram@vim.org> parents: 23332 diff changeset	3538 case '(': ret = NOTDONE;
9c5275b1c763 patch 8.2.2212: Vim9: lambda with => does not work at the script level Bram Moolenaar <Bram@vim.org> parents: 23332 diff changeset	3539 if (in_vim9script())
23970 ba79ceac82ec patch 8.2.2527: Vim9: lambda return type is not determined at script level Bram Moolenaar <Bram@vim.org> parents: 23917 diff changeset	3540 {
23338 9c5275b1c763 patch 8.2.2212: Vim9: lambda with => does not work at the script level Bram Moolenaar <Bram@vim.org> parents: 23332 diff changeset	3541 ret = get_lambda_tv(arg, rettv, TRUE, evalarg);
23970 ba79ceac82ec patch 8.2.2527: Vim9: lambda return type is not determined at script level Bram Moolenaar <Bram@vim.org> parents: 23917 diff changeset	3542 if (ret == OK && evaluate)
ba79ceac82ec patch 8.2.2527: Vim9: lambda return type is not determined at script level Bram Moolenaar <Bram@vim.org> parents: 23917 diff changeset	3543 {
ba79ceac82ec patch 8.2.2527: Vim9: lambda return type is not determined at script level Bram Moolenaar <Bram@vim.org> parents: 23917 diff changeset	3544 ufunc_T *ufunc = rettv->vval.v_partial->pt_func;
ba79ceac82ec patch 8.2.2527: Vim9: lambda return type is not determined at script level Bram Moolenaar <Bram@vim.org> parents: 23917 diff changeset	3545
24890 0cba2be8cbd7 patch 8.2.2983: Vim9: an inline function requires specifying the return type Bram Moolenaar <Bram@vim.org> parents: 24880 diff changeset	3546 // Compile it here to get the return type. The return
0cba2be8cbd7 patch 8.2.2983: Vim9: an inline function requires specifying the return type Bram Moolenaar <Bram@vim.org> parents: 24880 diff changeset	3547 // type is optional, when it's missing use t_unknown.
0cba2be8cbd7 patch 8.2.2983: Vim9: an inline function requires specifying the return type Bram Moolenaar <Bram@vim.org> parents: 24880 diff changeset	3548 // This is recognized in compile_return().
0cba2be8cbd7 patch 8.2.2983: Vim9: an inline function requires specifying the return type Bram Moolenaar <Bram@vim.org> parents: 24880 diff changeset	3549 if (ufunc->uf_ret_type->tt_type == VAR_VOID)
0cba2be8cbd7 patch 8.2.2983: Vim9: an inline function requires specifying the return type Bram Moolenaar <Bram@vim.org> parents: 24880 diff changeset	3550 ufunc->uf_ret_type = &t_unknown;
23972 a620df0ebbe5 patch 8.2.2528: Vim9: crash when compiling lambda fails Bram Moolenaar <Bram@vim.org> parents: 23970 diff changeset	3551 if (compile_def_function(ufunc,
24895 e61a2085c89b patch 8.2.2985: Vim9: a compiled function cannot be debugged Bram Moolenaar <Bram@vim.org> parents: 24890 diff changeset	3552 FALSE, COMPILE_TYPE(ufunc), NULL) == FAIL)
23972 a620df0ebbe5 patch 8.2.2528: Vim9: crash when compiling lambda fails Bram Moolenaar <Bram@vim.org> parents: 23970 diff changeset	3553 {
a620df0ebbe5 patch 8.2.2528: Vim9: crash when compiling lambda fails Bram Moolenaar <Bram@vim.org> parents: 23970 diff changeset	3554 clear_tv(rettv);
a620df0ebbe5 patch 8.2.2528: Vim9: crash when compiling lambda fails Bram Moolenaar <Bram@vim.org> parents: 23970 diff changeset	3555 ret = FAIL;
a620df0ebbe5 patch 8.2.2528: Vim9: crash when compiling lambda fails Bram Moolenaar <Bram@vim.org> parents: 23970 diff changeset	3556 }
23970 ba79ceac82ec patch 8.2.2527: Vim9: lambda return type is not determined at script level Bram Moolenaar <Bram@vim.org> parents: 23917 diff changeset	3557 }
ba79ceac82ec patch 8.2.2527: Vim9: lambda return type is not determined at script level Bram Moolenaar <Bram@vim.org> parents: 23917 diff changeset	3558 }
23338 9c5275b1c763 patch 8.2.2212: Vim9: lambda with => does not work at the script level Bram Moolenaar <Bram@vim.org> parents: 23332 diff changeset	3559 if (ret == NOTDONE)
9c5275b1c763 patch 8.2.2212: Vim9: lambda with => does not work at the script level Bram Moolenaar <Bram@vim.org> parents: 23332 diff changeset	3560 {
21046 0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	3561 arg = skipwhite_and_linebreak(arg + 1, evalarg);
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3562 ret = eval1(arg, rettv, evalarg); // recursive!
21044 dc2ca403a217 patch 8.2.1073: Vim9: no line break allowed in () expression Bram Moolenaar <Bram@vim.org> parents: 21040 diff changeset	3563
21046 0ca7e04d39e3 patch 8.2.1074: Vim9: no line break allowed after some operators Bram Moolenaar <Bram@vim.org> parents: 21044 diff changeset	3564 arg = skipwhite_and_linebreak(arg, evalarg);
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3565 if (**arg == ')')
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3566 ++*arg;
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3567 else if (ret == OK)
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3568 {
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3569 emsg(_(e_missing_close));
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3570 clear_tv(rettv);
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3571 ret = FAIL;
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	3572 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3573 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3574 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3575
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3576 default: ret = NOTDONE;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3577 break;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3578 }
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3579
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3580 if (ret == NOTDONE)
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3581 {
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3582 /*
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3583 * Must be a variable or function name.
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3584 * Can also be a curly-braces kind of name: {expr}.
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3585 */
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3586 s = *arg;
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	3587 len = get_name_len(arg, &alias, evaluate, TRUE);
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3588 if (alias != NULL)
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3589 s = alias;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3590
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	3591 if (len <= 0)
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3592 ret = FAIL;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3593 else
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3594 {
21305 91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3595 int flags = evalarg == NULL ? 0 : evalarg->eval_flags;
91d4af3309e7 patch 8.2.1203: unused assignments in expression evaluation Bram Moolenaar <Bram@vim.org> parents: 21279 diff changeset	3596
24426 78343859f42d patch 8.2.2753: Vim9: cannot ignore an item in assignment unpack Bram Moolenaar <Bram@vim.org> parents: 24408 diff changeset	3597 if (evaluate && in_vim9script() && len == 1 && *s == '_')
24408 96e0b898d5b4 patch 8.2.2744: Vim9: no way to explicitly ignore an argument Bram Moolenaar <Bram@vim.org> parents: 24363 diff changeset	3598 {
96e0b898d5b4 patch 8.2.2744: Vim9: no way to explicitly ignore an argument Bram Moolenaar <Bram@vim.org> parents: 24363 diff changeset	3599 emsg(_(e_cannot_use_underscore_here));
96e0b898d5b4 patch 8.2.2744: Vim9: no way to explicitly ignore an argument Bram Moolenaar <Bram@vim.org> parents: 24363 diff changeset	3600 ret = FAIL;
96e0b898d5b4 patch 8.2.2744: Vim9: no way to explicitly ignore an argument Bram Moolenaar <Bram@vim.org> parents: 24363 diff changeset	3601 }
96e0b898d5b4 patch 8.2.2744: Vim9: no way to explicitly ignore an argument Bram Moolenaar <Bram@vim.org> parents: 24363 diff changeset	3602 else if ((in_vim9script() ? *arg : skipwhite(*arg)) == '(')
21656 c3f6006bf0ba patch 8.2.1378: cannot put space between function name and paren Bram Moolenaar <Bram@vim.org> parents: 21644 diff changeset	3603 {
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21118 diff changeset	3604 // "name(..." recursive!
21656 c3f6006bf0ba patch 8.2.1378: cannot put space between function name and paren Bram Moolenaar <Bram@vim.org> parents: 21644 diff changeset	3605 arg = skipwhite(arg);
21118 b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	3606 ret = eval_func(arg, evalarg, s, len, rettv, flags, NULL);
21656 c3f6006bf0ba patch 8.2.1378: cannot put space between function name and paren Bram Moolenaar <Bram@vim.org> parents: 21644 diff changeset	3607 }
20401 918b9a05cf35 patch 8.2.0755: Vim9: No error when variable initializer is not a constant Bram Moolenaar <Bram@vim.org> parents: 20397 diff changeset	3608 else if (flags & EVAL_CONSTANT)
918b9a05cf35 patch 8.2.0755: Vim9: No error when variable initializer is not a constant Bram Moolenaar <Bram@vim.org> parents: 20397 diff changeset	3609 ret = FAIL;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3610 else if (evaluate)
21307 b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3611 {
b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3612 // get the value of "true", "false" or a variable
b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3613 if (len == 4 && in_vim9script() && STRNCMP(s, "true", 4) == 0)
b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3614 {
b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3615 rettv->v_type = VAR_BOOL;
b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3616 rettv->vval.v_number = VVAL_TRUE;
21725 741c1d58d50f patch 8.2.1412: Vim: not operator does not result in boolean Bram Moolenaar <Bram@vim.org> parents: 21691 diff changeset	3617 ret = OK;
21307 b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3618 }
b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3619 else if (len == 5 && in_vim9script()
23499 fe868a6d2e0a patch 8.2.2292: Vim: expr test fails Bram Moolenaar <Bram@vim.org> parents: 23495 diff changeset	3620 && STRNCMP(s, "false", 5) == 0)
21307 b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3621 {
b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3622 rettv->v_type = VAR_BOOL;
b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3623 rettv->vval.v_number = VVAL_FALSE;
21725 741c1d58d50f patch 8.2.1412: Vim: not operator does not result in boolean Bram Moolenaar <Bram@vim.org> parents: 21691 diff changeset	3624 ret = OK;
21307 b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3625 }
23499 fe868a6d2e0a patch 8.2.2292: Vim: expr test fails Bram Moolenaar <Bram@vim.org> parents: 23495 diff changeset	3626 else if (len == 4 && in_vim9script()
fe868a6d2e0a patch 8.2.2292: Vim: expr test fails Bram Moolenaar <Bram@vim.org> parents: 23495 diff changeset	3627 && STRNCMP(s, "null", 4) == 0)
fe868a6d2e0a patch 8.2.2292: Vim: expr test fails Bram Moolenaar <Bram@vim.org> parents: 23495 diff changeset	3628 {
fe868a6d2e0a patch 8.2.2292: Vim: expr test fails Bram Moolenaar <Bram@vim.org> parents: 23495 diff changeset	3629 rettv->v_type = VAR_SPECIAL;
fe868a6d2e0a patch 8.2.2292: Vim: expr test fails Bram Moolenaar <Bram@vim.org> parents: 23495 diff changeset	3630 rettv->vval.v_number = VVAL_NULL;
fe868a6d2e0a patch 8.2.2292: Vim: expr test fails Bram Moolenaar <Bram@vim.org> parents: 23495 diff changeset	3631 ret = OK;
fe868a6d2e0a patch 8.2.2292: Vim: expr test fails Bram Moolenaar <Bram@vim.org> parents: 23495 diff changeset	3632 }
21307 b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3633 else
24112 0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	3634 ret = eval_variable(s, len, rettv, NULL,
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	3635 EVAL_VAR_VERBOSE + EVAL_VAR_IMPORT);
21307 b991565745fb patch 8.2.1204: Vim9: true and false not recognized in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 21305 diff changeset	3636 }
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	3637 else
9686 8c2553beff0f commit https://github.com/vim/vim/commit/1e96d9bf98f9ab84d5af7f98d6a961d91b17364f Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	3638 {
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21118 diff changeset	3639 // skip the name
9686 8c2553beff0f commit https://github.com/vim/vim/commit/1e96d9bf98f9ab84d5af7f98d6a961d91b17364f Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	3640 check_vars(s, len);
117 d4ea645c7748 updated for version 7.0041 vimboss parents: 110 diff changeset	3641 ret = OK;
9686 8c2553beff0f commit https://github.com/vim/vim/commit/1e96d9bf98f9ab84d5af7f98d6a961d91b17364f Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	3642 }
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3643 }
2690 3ea3dcbf2cd6 updated for version 7.3.108 Bram Moolenaar <bram@vim.org> parents: 2687 diff changeset	3644 vim_free(alias);
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3645 }
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3646
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3647 // Handle following '[', '(' and '.' for expr[expr], expr.name,
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3648 // expr(expr), expr->name(expr)
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	3649 if (ret == OK)
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	3650 ret = handle_subscript(arg, rettv, evalarg, TRUE);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3651
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3652 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3653 * Apply logical NOT and unary '-', from right to left, ignore '+'.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3654 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3655 if (ret == OK && evaluate && end_leader > start_leader)
21032 f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3656 ret = eval7_leader(rettv, FALSE, start_leader, &end_leader);
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3657 return ret;
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3658 }
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3659
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3660 /*
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3661 * Apply the leading "!" and "-" before an eval7 expression to "rettv".
21032 f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3662 * When "numeric_only" is TRUE only handle "+" and "-".
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3663 * Adjusts "end_leaderp" until it is at "start_leader".
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3664 */
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3665 static int
21032 f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3666 eval7_leader(
f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3667 typval_T *rettv,
f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3668 int numeric_only,
f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3669 char_u *start_leader,
f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3670 char_u **end_leaderp)
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3671 {
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3672 char_u end_leader = end_leaderp;
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3673 int ret = OK;
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3674 int error = FALSE;
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3675 varnumber_T val = 0;
21725 741c1d58d50f patch 8.2.1412: Vim: not operator does not result in boolean Bram Moolenaar <Bram@vim.org> parents: 21691 diff changeset	3676 vartype_T type = rettv->v_type;
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3677 #ifdef FEAT_FLOAT
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3678 float_T f = 0.0;
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3679
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3680 if (rettv->v_type == VAR_FLOAT)
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3681 f = rettv->vval.v_float;
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3682 else
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3683 #endif
22606 336ac63fb987 patch 8.2.1851: Vim9: "!" followed by space incorrectly used Bram Moolenaar <Bram@vim.org> parents: 22580 diff changeset	3684 {
336ac63fb987 patch 8.2.1851: Vim9: "!" followed by space incorrectly used Bram Moolenaar <Bram@vim.org> parents: 22580 diff changeset	3685 while (VIM_ISWHITE(end_leader[-1]))
336ac63fb987 patch 8.2.1851: Vim9: "!" followed by space incorrectly used Bram Moolenaar <Bram@vim.org> parents: 22580 diff changeset	3686 --end_leader;
21733 1bb5adfe5966 patch 8.2.1416: Vim9: boolean evaluation does not work as intended Bram Moolenaar <Bram@vim.org> parents: 21725 diff changeset	3687 if (in_vim9script() && end_leader[-1] == '!')
1bb5adfe5966 patch 8.2.1416: Vim9: boolean evaluation does not work as intended Bram Moolenaar <Bram@vim.org> parents: 21725 diff changeset	3688 val = tv2bool(rettv);
1bb5adfe5966 patch 8.2.1416: Vim9: boolean evaluation does not work as intended Bram Moolenaar <Bram@vim.org> parents: 21725 diff changeset	3689 else
1bb5adfe5966 patch 8.2.1416: Vim9: boolean evaluation does not work as intended Bram Moolenaar <Bram@vim.org> parents: 21725 diff changeset	3690 val = tv_get_number_chk(rettv, &error);
22606 336ac63fb987 patch 8.2.1851: Vim9: "!" followed by space incorrectly used Bram Moolenaar <Bram@vim.org> parents: 22580 diff changeset	3691 }
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3692 if (error)
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3693 {
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3694 clear_tv(rettv);
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3695 ret = FAIL;
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3696 }
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3697 else
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3698 {
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3699 while (end_leader > start_leader)
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3700 {
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3701 --end_leader;
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3702 if (*end_leader == '!')
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3703 {
21032 f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3704 if (numeric_only)
f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3705 {
f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3706 ++end_leader;
f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3707 break;
f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3708 }
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3709 #ifdef FEAT_FLOAT
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3710 if (rettv->v_type == VAR_FLOAT)
22866 52e64d340a98 patch 8.2.1980: Vim9: some tests are not done at the script level Bram Moolenaar <Bram@vim.org> parents: 22816 diff changeset	3711 {
52e64d340a98 patch 8.2.1980: Vim9: some tests are not done at the script level Bram Moolenaar <Bram@vim.org> parents: 22816 diff changeset	3712 if (in_vim9script())
52e64d340a98 patch 8.2.1980: Vim9: some tests are not done at the script level Bram Moolenaar <Bram@vim.org> parents: 22816 diff changeset	3713 {
52e64d340a98 patch 8.2.1980: Vim9: some tests are not done at the script level Bram Moolenaar <Bram@vim.org> parents: 22816 diff changeset	3714 rettv->v_type = VAR_BOOL;
52e64d340a98 patch 8.2.1980: Vim9: some tests are not done at the script level Bram Moolenaar <Bram@vim.org> parents: 22816 diff changeset	3715 val = f == 0.0 ? VVAL_TRUE : VVAL_FALSE;
52e64d340a98 patch 8.2.1980: Vim9: some tests are not done at the script level Bram Moolenaar <Bram@vim.org> parents: 22816 diff changeset	3716 }
52e64d340a98 patch 8.2.1980: Vim9: some tests are not done at the script level Bram Moolenaar <Bram@vim.org> parents: 22816 diff changeset	3717 else
52e64d340a98 patch 8.2.1980: Vim9: some tests are not done at the script level Bram Moolenaar <Bram@vim.org> parents: 22816 diff changeset	3718 f = !f;
52e64d340a98 patch 8.2.1980: Vim9: some tests are not done at the script level Bram Moolenaar <Bram@vim.org> parents: 22816 diff changeset	3719 }
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3720 else
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3721 #endif
21725 741c1d58d50f patch 8.2.1412: Vim: not operator does not result in boolean Bram Moolenaar <Bram@vim.org> parents: 21691 diff changeset	3722 {
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3723 val = !val;
21725 741c1d58d50f patch 8.2.1412: Vim: not operator does not result in boolean Bram Moolenaar <Bram@vim.org> parents: 21691 diff changeset	3724 type = VAR_BOOL;
741c1d58d50f patch 8.2.1412: Vim: not operator does not result in boolean Bram Moolenaar <Bram@vim.org> parents: 21691 diff changeset	3725 }
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3726 }
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3727 else if (*end_leader == '-')
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3728 {
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3729 #ifdef FEAT_FLOAT
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3730 if (rettv->v_type == VAR_FLOAT)
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3731 f = -f;
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3732 else
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3733 #endif
21725 741c1d58d50f patch 8.2.1412: Vim: not operator does not result in boolean Bram Moolenaar <Bram@vim.org> parents: 21691 diff changeset	3734 {
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3735 val = -val;
21725 741c1d58d50f patch 8.2.1412: Vim: not operator does not result in boolean Bram Moolenaar <Bram@vim.org> parents: 21691 diff changeset	3736 type = VAR_NUMBER;
741c1d58d50f patch 8.2.1412: Vim: not operator does not result in boolean Bram Moolenaar <Bram@vim.org> parents: 21691 diff changeset	3737 }
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3738 }
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3739 }
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3740 #ifdef FEAT_FLOAT
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3741 if (rettv->v_type == VAR_FLOAT)
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	3742 {
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	3743 clear_tv(rettv);
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3744 rettv->vval.v_float = f;
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	3745 }
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	3746 else
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	3747 #endif
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3748 {
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3749 clear_tv(rettv);
21725 741c1d58d50f patch 8.2.1412: Vim: not operator does not result in boolean Bram Moolenaar <Bram@vim.org> parents: 21691 diff changeset	3750 if (in_vim9script())
741c1d58d50f patch 8.2.1412: Vim: not operator does not result in boolean Bram Moolenaar <Bram@vim.org> parents: 21691 diff changeset	3751 rettv->v_type = type;
741c1d58d50f patch 8.2.1412: Vim: not operator does not result in boolean Bram Moolenaar <Bram@vim.org> parents: 21691 diff changeset	3752 else
741c1d58d50f patch 8.2.1412: Vim: not operator does not result in boolean Bram Moolenaar <Bram@vim.org> parents: 21691 diff changeset	3753 rettv->v_type = VAR_NUMBER;
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3754 rettv->vval.v_number = val;
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3755 }
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3756 }
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	3757 *end_leaderp = end_leader;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3758 return ret;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3759 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3760
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	3761 /*
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3762 * Call the function referred to in "rettv".
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3763 */
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3764 static int
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3765 call_func_rettv(
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3766 char_u **arg,
21118 b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	3767 evalarg_T *evalarg,
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3768 typval_T *rettv,
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3769 int evaluate,
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3770 dict_T *selfdict,
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3771 typval_T *basetv)
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3772 {
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3773 partial_T *pt = NULL;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3774 funcexe_T funcexe;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3775 typval_T functv;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3776 char_u *s;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3777 int ret;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3778
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3779 // need to copy the funcref so that we can clear rettv
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3780 if (evaluate)
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3781 {
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3782 functv = *rettv;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3783 rettv->v_type = VAR_UNKNOWN;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3784
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3785 // Invoke the function. Recursive!
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3786 if (functv.v_type == VAR_PARTIAL)
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3787 {
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3788 pt = functv.vval.v_partial;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3789 s = partial_name(pt);
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3790 }
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3791 else
24878 f67773e26cfa patch 8.2.2977: crash when using a null function reference Bram Moolenaar <Bram@vim.org> parents: 24860 diff changeset	3792 {
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3793 s = functv.vval.v_string;
24878 f67773e26cfa patch 8.2.2977: crash when using a null function reference Bram Moolenaar <Bram@vim.org> parents: 24860 diff changeset	3794 if (s == NULL \|\| *s == NUL)
f67773e26cfa patch 8.2.2977: crash when using a null function reference Bram Moolenaar <Bram@vim.org> parents: 24860 diff changeset	3795 {
f67773e26cfa patch 8.2.2977: crash when using a null function reference Bram Moolenaar <Bram@vim.org> parents: 24860 diff changeset	3796 emsg(_(e_empty_function_name));
24880 d254f5c78b5a patch 8.2.2978: warning for uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 24878 diff changeset	3797 ret = FAIL;
24878 f67773e26cfa patch 8.2.2977: crash when using a null function reference Bram Moolenaar <Bram@vim.org> parents: 24860 diff changeset	3798 goto theend;
f67773e26cfa patch 8.2.2977: crash when using a null function reference Bram Moolenaar <Bram@vim.org> parents: 24860 diff changeset	3799 }
f67773e26cfa patch 8.2.2977: crash when using a null function reference Bram Moolenaar <Bram@vim.org> parents: 24860 diff changeset	3800 }
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3801 }
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3802 else
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3803 s = (char_u *)"";
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3804
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 19922 diff changeset	3805 CLEAR_FIELD(funcexe);
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3806 funcexe.firstline = curwin->w_cursor.lnum;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3807 funcexe.lastline = curwin->w_cursor.lnum;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3808 funcexe.evaluate = evaluate;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3809 funcexe.partial = pt;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3810 funcexe.selfdict = selfdict;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3811 funcexe.basetv = basetv;
21118 b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	3812 ret = get_func_tv(s, -1, rettv, arg, evalarg, &funcexe);
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3813
24878 f67773e26cfa patch 8.2.2977: crash when using a null function reference Bram Moolenaar <Bram@vim.org> parents: 24860 diff changeset	3814 theend:
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3815 // Clear the funcref afterwards, so that deleting it while
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3816 // evaluating the arguments is possible (see test55).
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3817 if (evaluate)
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3818 clear_tv(&functv);
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3819
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3820 return ret;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3821 }
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3822
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3823 /*
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3824 * Evaluate "->method()".
23709 a0c4d04a58c4 patch 8.2.2396: Vim9: no white space allowed before "->" Bram Moolenaar <Bram@vim.org> parents: 23679 diff changeset	3825 * "*arg" points to "method".
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3826 * Returns FAIL or OK. "*arg" is advanced to after the ')'.
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3827 */
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3828 static int
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3829 eval_lambda(
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3830 char_u **arg,
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3831 typval_T *rettv,
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	3832 evalarg_T *evalarg,
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3833 int verbose) // give error messages
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3834 {
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	3835 int evaluate = evalarg != NULL
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	3836 && (evalarg->eval_flags & EVAL_EVALUATE);
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3837 typval_T base = *rettv;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3838 int ret;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3839
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3840 rettv->v_type = VAR_UNKNOWN;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3841
23428 5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3842 if (**arg == '{')
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3843 {
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3844 // ->{lambda}()
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3845 ret = get_lambda_tv(arg, rettv, FALSE, evalarg);
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3846 }
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3847 else
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3848 {
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3849 // ->(lambda)()
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3850 ++*arg;
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3851 ret = eval1(arg, rettv, evalarg);
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3852 arg = skipwhite_and_linebreak(arg, evalarg);
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3853 if (**arg != ')')
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3854 {
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3855 emsg(_(e_missing_close));
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3856 ret = FAIL;
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3857 }
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3858 ++*arg;
5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	3859 }
18851 3cf9529b3a4a patch 8.1.2412: crash when evaluating expression with error Bram Moolenaar <Bram@vim.org> parents: 18777 diff changeset	3860 if (ret != OK)
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3861 return FAIL;
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3862 else if (**arg != '(')
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3863 {
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3864 if (verbose)
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3865 {
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3866 if (skipwhite(arg) == '(')
19760 9daed26b788b patch 8.2.0436: no warnings for incorrect printf arguments Bram Moolenaar <Bram@vim.org> parents: 19568 diff changeset	3867 emsg(_(e_nowhitespace));
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3868 else
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	3869 semsg(_(e_missing_paren), "lambda");
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3870 }
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3871 clear_tv(rettv);
18225 6c3a8312486d patch 8.1.2107: various memory leaks reported by asan Bram Moolenaar <Bram@vim.org> parents: 18080 diff changeset	3872 ret = FAIL;
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3873 }
18225 6c3a8312486d patch 8.1.2107: various memory leaks reported by asan Bram Moolenaar <Bram@vim.org> parents: 18080 diff changeset	3874 else
21118 b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	3875 ret = call_func_rettv(arg, evalarg, rettv, evaluate, NULL, &base);
18225 6c3a8312486d patch 8.1.2107: various memory leaks reported by asan Bram Moolenaar <Bram@vim.org> parents: 18080 diff changeset	3876
6c3a8312486d patch 8.1.2107: various memory leaks reported by asan Bram Moolenaar <Bram@vim.org> parents: 18080 diff changeset	3877 // Clear the funcref afterwards, so that deleting it while
6c3a8312486d patch 8.1.2107: various memory leaks reported by asan Bram Moolenaar <Bram@vim.org> parents: 18080 diff changeset	3878 // evaluating the arguments is possible (see test55).
6c3a8312486d patch 8.1.2107: various memory leaks reported by asan Bram Moolenaar <Bram@vim.org> parents: 18080 diff changeset	3879 if (evaluate)
6c3a8312486d patch 8.1.2107: various memory leaks reported by asan Bram Moolenaar <Bram@vim.org> parents: 18080 diff changeset	3880 clear_tv(&base);
6c3a8312486d patch 8.1.2107: various memory leaks reported by asan Bram Moolenaar <Bram@vim.org> parents: 18080 diff changeset	3881
6c3a8312486d patch 8.1.2107: various memory leaks reported by asan Bram Moolenaar <Bram@vim.org> parents: 18080 diff changeset	3882 return ret;
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3883 }
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3884
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3885 /*
17612 e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3886 * Evaluate "->method()".
23709 a0c4d04a58c4 patch 8.2.2396: Vim9: no white space allowed before "->" Bram Moolenaar <Bram@vim.org> parents: 23679 diff changeset	3887 * "*arg" points to "method".
17612 e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3888 * Returns FAIL or OK. "*arg" is advanced to after the ')'.
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3889 */
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3890 static int
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3891 eval_method(
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3892 char_u **arg,
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3893 typval_T *rettv,
21118 b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	3894 evalarg_T *evalarg,
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3895 int verbose) // give error messages
17612 e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3896 {
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3897 char_u *name;
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3898 long len;
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3899 char_u *alias;
17612 e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3900 typval_T base = *rettv;
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3901 int ret;
21118 b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	3902 int evaluate = evalarg != NULL
b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	3903 && (evalarg->eval_flags & EVAL_EVALUATE);
17612 e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3904
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3905 rettv->v_type = VAR_UNKNOWN;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3906
17612 e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3907 name = *arg;
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3908 len = get_name_len(arg, &alias, evaluate, TRUE);
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3909 if (alias != NULL)
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3910 name = alias;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3911
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3912 if (len <= 0)
17612 e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3913 {
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3914 if (verbose)
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3915 emsg(_("E260: Missing name after ->"));
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3916 ret = FAIL;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3917 }
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3918 else
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3919 {
21630 3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	3920 arg = skipwhite(arg);
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3921 if (**arg != '(')
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3922 {
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3923 if (verbose)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	3924 semsg(_(e_missing_paren), name);
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3925 ret = FAIL;
e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3926 }
17661 da7890e3359b patch 8.1.1828: not strict enough checking syntax of method invocation Bram Moolenaar <Bram@vim.org> parents: 17646 diff changeset	3927 else if (VIM_ISWHITE((*arg)[-1]))
da7890e3359b patch 8.1.1828: not strict enough checking syntax of method invocation Bram Moolenaar <Bram@vim.org> parents: 17646 diff changeset	3928 {
da7890e3359b patch 8.1.1828: not strict enough checking syntax of method invocation Bram Moolenaar <Bram@vim.org> parents: 17646 diff changeset	3929 if (verbose)
19760 9daed26b788b patch 8.2.0436: no warnings for incorrect printf arguments Bram Moolenaar <Bram@vim.org> parents: 19568 diff changeset	3930 emsg(_(e_nowhitespace));
17661 da7890e3359b patch 8.1.1828: not strict enough checking syntax of method invocation Bram Moolenaar <Bram@vim.org> parents: 17646 diff changeset	3931 ret = FAIL;
da7890e3359b patch 8.1.1828: not strict enough checking syntax of method invocation Bram Moolenaar <Bram@vim.org> parents: 17646 diff changeset	3932 }
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3933 else
21118 b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	3934 ret = eval_func(arg, evalarg, name, len, rettv,
20397 c225be44692a patch 8.2.0753: Vim9: expressions are evaluated in the discovery phase Bram Moolenaar <Bram@vim.org> parents: 20392 diff changeset	3935 evaluate ? EVAL_EVALUATE : 0, &base);
17646 e5397617d6ca patch 8.1.1820: using expr->FuncRef() does not work Bram Moolenaar <Bram@vim.org> parents: 17638 diff changeset	3936 }
17612 e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3937
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3938 // Clear the funcref afterwards, so that deleting it while
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	3939 // evaluating the arguments is possible (see test55).
17612 e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3940 if (evaluate)
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3941 clear_tv(&base);
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3942
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3943 return ret;
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3944 }
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3945
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	3946 /*
829 dc8197342755 updated for version 7.0d04 vimboss parents: 826 diff changeset	3947 * Evaluate an "[expr]" or "[expr:expr]" index. Also "dict.key".
dc8197342755 updated for version 7.0d04 vimboss parents: 826 diff changeset	3948 * "*arg" points to the '[' or '.'.
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	3949 * Returns FAIL or OK. "*arg" is advanced to after the ']'.
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	3950 */
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	3951 static int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	3952 eval_index(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	3953 char_u **arg,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	3954 typval_T *rettv,
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	3955 evalarg_T *evalarg,
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	3956 int verbose) // give error messages
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	3957 {
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	3958 int evaluate = evalarg != NULL
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	3959 && (evalarg->eval_flags & EVAL_EVALUATE);
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	3960 int empty1 = FALSE, empty2 = FALSE;
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	3961 typval_T var1, var2;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3962 int range = FALSE;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3963 char_u *key = NULL;
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	3964 int keylen = -1;
23414 9bd3873b13e2 patch 8.2.2250: Vim9: sublist is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23338 diff changeset	3965 int vim9 = in_vim9script();
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	3966
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	3967 if (check_can_index(rettv, evaluate, verbose) == FAIL)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	3968 return FAIL;
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	3969
7046 fd409a0800fd commit https://github.com/vim/vim/commit/0a38dd29d6f65aa601162542a5ab0ba7f308fc8e Christian Brabandt <cb@256bit.org> parents: 7042 diff changeset	3970 init_tv(&var1);
fd409a0800fd commit https://github.com/vim/vim/commit/0a38dd29d6f65aa601162542a5ab0ba7f308fc8e Christian Brabandt <cb@256bit.org> parents: 7042 diff changeset	3971 init_tv(&var2);
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3972 if (**arg == '.')
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3973 {
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3974 /*
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3975 * dict.name
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3976 */
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3977 key = *arg + 1;
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	3978 for (keylen = 0; eval_isdictc(key[keylen]); ++keylen)
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3979 ;
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	3980 if (keylen == 0)
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3981 return FAIL;
22244 9f6b8fdea159 patch 8.2.1671: Vim9: stray error for missing white space Bram Moolenaar <Bram@vim.org> parents: 22202 diff changeset	3982 *arg = key + keylen;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3983 }
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3984 else
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3985 {
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3986 /*
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3987 * something[idx]
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3988 *
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3989 * Get the (first) variable from inside the [].
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3990 */
21142 165cea61e974 patch 8.2.1122: Vim9: line continuation in dict member not recognized Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	3991 arg = skipwhite_and_linebreak(arg + 1, evalarg);
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3992 if (**arg == ':')
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	3993 empty1 = TRUE;
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	3994 else if (eval1(arg, &var1, evalarg) == FAIL) // recursive!
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	3995 return FAIL;
23414 9bd3873b13e2 patch 8.2.2250: Vim9: sublist is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23338 diff changeset	3996 else if (vim9 && **arg == ':')
9bd3873b13e2 patch 8.2.2250: Vim9: sublist is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23338 diff changeset	3997 {
23446 b1dbbc81a011 patch 8.2.2266: Vim9: it can be hard to see where white space is missing Bram Moolenaar <Bram@vim.org> parents: 23428 diff changeset	3998 semsg(_(e_white_space_required_before_and_after_str_at_str),
b1dbbc81a011 patch 8.2.2266: Vim9: it can be hard to see where white space is missing Bram Moolenaar <Bram@vim.org> parents: 23428 diff changeset	3999 ":", *arg);
23414 9bd3873b13e2 patch 8.2.2250: Vim9: sublist is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23338 diff changeset	4000 clear_tv(&var1);
9bd3873b13e2 patch 8.2.2250: Vim9: sublist is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23338 diff changeset	4001 return FAIL;
9bd3873b13e2 patch 8.2.2250: Vim9: sublist is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23338 diff changeset	4002 }
23827 7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4003 else if (evaluate)
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	4004 {
23827 7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4005 #ifdef FEAT_FLOAT
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4006 // allow for indexing with float
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4007 if (vim9 && rettv->v_type == VAR_DICT
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4008 && var1.v_type == VAR_FLOAT)
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4009 {
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4010 var1.vval.v_string = typval_tostring(&var1, TRUE);
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4011 var1.v_type = VAR_STRING;
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4012 }
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4013 #endif
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4014 if (tv_get_string_chk(&var1) == NULL)
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4015 {
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4016 // not a number or string
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4017 clear_tv(&var1);
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4018 return FAIL;
7e0d8f1cae7d patch 8.2.2455: Vim9: key type for literal dict and indexing is inconsistent Bram Moolenaar <Bram@vim.org> parents: 23709 diff changeset	4019 }
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	4020 }
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4021
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4022 /*
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4023 * Get the second variable from inside the [:].
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4024 */
21142 165cea61e974 patch 8.2.1122: Vim9: line continuation in dict member not recognized Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	4025 arg = skipwhite_and_linebreak(arg, evalarg);
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4026 if (**arg == ':')
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4027 {
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4028 range = TRUE;
23414 9bd3873b13e2 patch 8.2.2250: Vim9: sublist is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23338 diff changeset	4029 ++*arg;
23416 108039938e3c patch 8.2.2251: test failures in legacy script Bram Moolenaar <Bram@vim.org> parents: 23414 diff changeset	4030 if (vim9 && !IS_WHITE_OR_NUL(arg) && arg != ']')
23414 9bd3873b13e2 patch 8.2.2250: Vim9: sublist is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23338 diff changeset	4031 {
23446 b1dbbc81a011 patch 8.2.2266: Vim9: it can be hard to see where white space is missing Bram Moolenaar <Bram@vim.org> parents: 23428 diff changeset	4032 semsg(_(e_white_space_required_before_and_after_str_at_str),
b1dbbc81a011 patch 8.2.2266: Vim9: it can be hard to see where white space is missing Bram Moolenaar <Bram@vim.org> parents: 23428 diff changeset	4033 ":", *arg - 1);
23414 9bd3873b13e2 patch 8.2.2250: Vim9: sublist is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23338 diff changeset	4034 if (!empty1)
9bd3873b13e2 patch 8.2.2250: Vim9: sublist is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23338 diff changeset	4035 clear_tv(&var1);
9bd3873b13e2 patch 8.2.2250: Vim9: sublist is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23338 diff changeset	4036 return FAIL;
9bd3873b13e2 patch 8.2.2250: Vim9: sublist is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23338 diff changeset	4037 }
9bd3873b13e2 patch 8.2.2250: Vim9: sublist is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23338 diff changeset	4038 arg = skipwhite_and_linebreak(arg, evalarg);
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4039 if (**arg == ']')
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4040 empty2 = TRUE;
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	4041 else if (eval1(arg, &var2, evalarg) == FAIL) // recursive!
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4042 {
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	4043 if (!empty1)
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	4044 clear_tv(&var1);
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	4045 return FAIL;
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	4046 }
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	4047 else if (evaluate && tv_get_string_chk(&var2) == NULL)
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	4048 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4049 // not a number or string
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	4050 if (!empty1)
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	4051 clear_tv(&var1);
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	4052 clear_tv(&var2);
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4053 return FAIL;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4054 }
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4055 }
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4056
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4057 // Check for the ']'.
21142 165cea61e974 patch 8.2.1122: Vim9: line continuation in dict member not recognized Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	4058 arg = skipwhite_and_linebreak(arg, evalarg);
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4059 if (**arg != ']')
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4060 {
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	4061 if (verbose)
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	4062 emsg(_(e_missbrac));
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4063 clear_tv(&var1);
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4064 if (range)
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4065 clear_tv(&var2);
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4066 return FAIL;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4067 }
21837 2b941fbab4d9 patch 8.2.1468: Vim9: invalid error for missing white space Bram Moolenaar <Bram@vim.org> parents: 21833 diff changeset	4068 arg = arg + 1; // skip over the ']'
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4069 }
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4070
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4071 if (evaluate)
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4072 {
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4073 int res = eval_index_inner(rettv, range,
23604 1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4074 empty1 ? NULL : &var1, empty2 ? NULL : &var2, FALSE,
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4075 key, keylen, verbose);
23604 1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4076
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4077 if (!empty1)
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	4078 clear_tv(&var1);
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4079 if (range)
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4080 clear_tv(&var2);
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4081 return res;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4082 }
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4083 return OK;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4084 }
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4085
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4086 /*
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4087 * Check if "rettv" can have an [index] or [sli:ce]
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4088 */
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4089 int
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4090 check_can_index(typval_T *rettv, int evaluate, int verbose)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4091 {
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4092 switch (rettv->v_type)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4093 {
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4094 case VAR_FUNC:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4095 case VAR_PARTIAL:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4096 if (verbose)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4097 emsg(_("E695: Cannot index a Funcref"));
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4098 return FAIL;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4099 case VAR_FLOAT:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4100 #ifdef FEAT_FLOAT
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4101 if (verbose)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4102 emsg(_(e_float_as_string));
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4103 return FAIL;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4104 #endif
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4105 case VAR_BOOL:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4106 case VAR_SPECIAL:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4107 case VAR_JOB:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4108 case VAR_CHANNEL:
24606 a4fda40e0bb9 patch 8.2.2842: Vim9: skip argument to searchpair() is not compiled Bram Moolenaar <Bram@vim.org> parents: 24553 diff changeset	4109 case VAR_INSTR:
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4110 if (verbose)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4111 emsg(_(e_cannot_index_special_variable));
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4112 return FAIL;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4113 case VAR_UNKNOWN:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4114 case VAR_ANY:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4115 case VAR_VOID:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4116 if (evaluate)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4117 {
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4118 emsg(_(e_cannot_index_special_variable));
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4119 return FAIL;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4120 }
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4121 // FALLTHROUGH
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4122
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4123 case VAR_STRING:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4124 case VAR_LIST:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4125 case VAR_DICT:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4126 case VAR_BLOB:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4127 break;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4128 case VAR_NUMBER:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4129 if (in_vim9script())
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4130 emsg(_(e_cannot_index_number));
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4131 break;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4132 }
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4133 return OK;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4134 }
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4135
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4136 /*
23604 1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4137 * slice() function
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4138 */
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4139 void
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4140 f_slice(typval_T argvars, typval_T rettv)
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4141 {
25302 4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25284 diff changeset	4142 if (in_vim9script()
25384 e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25374 diff changeset	4143 && ((argvars[0].v_type != VAR_STRING
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Bram Moolenaar <Bram@vim.org> parents: 25374 diff changeset	4144 && argvars[0].v_type != VAR_LIST
25302 4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25284 diff changeset	4145 && argvars[0].v_type != VAR_BLOB
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25284 diff changeset	4146 && 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: 25284 diff changeset	4147 \|\| check_for_number_arg(argvars, 1) == FAIL
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25284 diff changeset	4148 \|\| check_for_opt_number_arg(argvars, 2) == FAIL))
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25284 diff changeset	4149 return;
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25284 diff changeset	4150
23604 1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4151 if (check_can_index(argvars, TRUE, FALSE) == OK)
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4152 {
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4153 copy_tv(argvars, rettv);
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4154 eval_index_inner(rettv, TRUE, argvars + 1,
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4155 argvars[2].v_type == VAR_UNKNOWN ? NULL : argvars + 2,
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4156 TRUE, NULL, 0, FALSE);
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4157 }
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4158 }
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4159
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4160 /*
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4161 * Apply index or range to "rettv".
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4162 * "var1" is the first index, NULL for [:expr].
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4163 * "var2" is the second index, NULL for [expr] and [expr: ]
23604 1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4164 * "exclusive" is TRUE for slice(): second index is exclusive, use character
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4165 * index for string.
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4166 * Alternatively, "key" is not NULL, then key[keylen] is the dict index.
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4167 */
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4168 int
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4169 eval_index_inner(
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4170 typval_T *rettv,
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4171 int is_range,
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4172 typval_T *var1,
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4173 typval_T *var2,
23604 1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4174 int exclusive,
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4175 char_u *key,
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4176 int keylen,
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4177 int verbose)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4178 {
23604 1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4179 varnumber_T n1, n2 = 0;
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4180 long len;
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4181
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4182 n1 = 0;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4183 if (var1 != NULL && rettv->v_type != VAR_DICT)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4184 n1 = tv_get_number(var1);
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4185
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4186 if (is_range)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4187 {
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4188 if (rettv->v_type == VAR_DICT)
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4189 {
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4190 if (verbose)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4191 emsg(_(e_cannot_slice_dictionary));
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4192 return FAIL;
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	4193 }
23604 1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4194 if (var2 != NULL)
1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4195 n2 = tv_get_number(var2);
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4196 else
23604 1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4197 n2 = VARNUM_MAX;
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4198 }
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4199
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4200 switch (rettv->v_type)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4201 {
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4202 case VAR_UNKNOWN:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4203 case VAR_ANY:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4204 case VAR_VOID:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4205 case VAR_FUNC:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4206 case VAR_PARTIAL:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4207 case VAR_FLOAT:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4208 case VAR_BOOL:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4209 case VAR_SPECIAL:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4210 case VAR_JOB:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4211 case VAR_CHANNEL:
24606 a4fda40e0bb9 patch 8.2.2842: Vim9: skip argument to searchpair() is not compiled Bram Moolenaar <Bram@vim.org> parents: 24553 diff changeset	4212 case VAR_INSTR:
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4213 break; // not evaluating, skipping over subscript
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4214
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4215 case VAR_NUMBER:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4216 case VAR_STRING:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4217 {
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4218 char_u *s = tv_get_string(rettv);
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4219
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4220 len = (long)STRLEN(s);
23604 1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4221 if (in_vim9script() \|\| exclusive)
21826 ccad66ac6c3e patch 8.2.1462: Vim9: string slice not supported yet Bram Moolenaar <Bram@vim.org> parents: 21823 diff changeset	4222 {
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4223 if (is_range)
23604 1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4224 s = string_slice(s, n1, n2, exclusive);
21826 ccad66ac6c3e patch 8.2.1462: Vim9: string slice not supported yet Bram Moolenaar <Bram@vim.org> parents: 21823 diff changeset	4225 else
ccad66ac6c3e patch 8.2.1462: Vim9: string slice not supported yet Bram Moolenaar <Bram@vim.org> parents: 21823 diff changeset	4226 s = char_from_string(s, n1);
ccad66ac6c3e patch 8.2.1462: Vim9: string slice not supported yet Bram Moolenaar <Bram@vim.org> parents: 21823 diff changeset	4227 }
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4228 else if (is_range)
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4229 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4230 // The resulting variable is a substring. If the indexes
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4231 // are out of range the result is empty.
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4232 if (n1 < 0)
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4233 {
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4234 n1 = len + n1;
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4235 if (n1 < 0)
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4236 n1 = 0;
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4237 }
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4238 if (n2 < 0)
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4239 n2 = len + n2;
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4240 else if (n2 >= len)
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4241 n2 = len;
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4242 if (n1 >= len \|\| n2 < 0 \|\| n1 > n2)
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4243 s = NULL;
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4244 else
20751 d9a2e5dcfd9f patch 8.2.0928: many type casts are used for vim_strnsave() Bram Moolenaar <Bram@vim.org> parents: 20731 diff changeset	4245 s = vim_strnsave(s + n1, n2 - n1 + 1);
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4246 }
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4247 else
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4248 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4249 // The resulting variable is a string of a single
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4250 // character. If the index is too big or negative the
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4251 // result is empty.
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4252 if (n1 >= len \|\| n1 < 0)
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4253 s = NULL;
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4254 else
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4255 s = vim_strnsave(s + n1, 1);
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4256 }
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	4257 clear_tv(rettv);
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	4258 rettv->v_type = VAR_STRING;
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	4259 rettv->vval.v_string = s;
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4260 }
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4261 break;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4262
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4263 case VAR_BLOB:
24432 aa150abca273 patch 8.2.2756: Vim9: blob index and slice not implemented yet Bram Moolenaar <Bram@vim.org> parents: 24426 diff changeset	4264 blob_slice_or_index(rettv->vval.v_blob, is_range, n1, n2,
aa150abca273 patch 8.2.2756: Vim9: blob index and slice not implemented yet Bram Moolenaar <Bram@vim.org> parents: 24426 diff changeset	4265 exclusive, rettv);
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4266 break;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4267
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4268 case VAR_LIST:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4269 if (var1 == NULL)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4270 n1 = 0;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4271 if (var2 == NULL)
23604 1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4272 n2 = VARNUM_MAX;
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4273 if (list_slice_or_index(rettv->vval.v_list,
23604 1816ea68c022 patch 8.2.2344: using inclusive index for slice is not always desired Bram Moolenaar <Bram@vim.org> parents: 23600 diff changeset	4274 is_range, n1, n2, exclusive, rettv, verbose) == FAIL)
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4275 return FAIL;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4276 break;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4277
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4278 case VAR_DICT:
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4279 {
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4280 dictitem_T *item;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4281 typval_T tmp;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4282
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4283 if (key == NULL)
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4284 {
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4285 key = tv_get_string_chk(var1);
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4286 if (key == NULL)
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4287 return FAIL;
1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4288 }
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4289
26329 8afd7aa25ab6 patch 8.2.3695: confusing error for missing key Bram Moolenaar <Bram@vim.org> parents: 26238 diff changeset	4290 item = dict_find(rettv->vval.v_dict, key, keylen);
8afd7aa25ab6 patch 8.2.3695: confusing error for missing key Bram Moolenaar <Bram@vim.org> parents: 26238 diff changeset	4291
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4292 if (item == NULL)
26329 8afd7aa25ab6 patch 8.2.3695: confusing error for missing key Bram Moolenaar <Bram@vim.org> parents: 26238 diff changeset	4293 {
8afd7aa25ab6 patch 8.2.3695: confusing error for missing key Bram Moolenaar <Bram@vim.org> parents: 26238 diff changeset	4294 if (verbose)
8afd7aa25ab6 patch 8.2.3695: confusing error for missing key Bram Moolenaar <Bram@vim.org> parents: 26238 diff changeset	4295 {
8afd7aa25ab6 patch 8.2.3695: confusing error for missing key Bram Moolenaar <Bram@vim.org> parents: 26238 diff changeset	4296 if (keylen > 0)
8afd7aa25ab6 patch 8.2.3695: confusing error for missing key Bram Moolenaar <Bram@vim.org> parents: 26238 diff changeset	4297 key[keylen] = NUL;
8afd7aa25ab6 patch 8.2.3695: confusing error for missing key Bram Moolenaar <Bram@vim.org> parents: 26238 diff changeset	4298 semsg(_(e_dictkey), key);
8afd7aa25ab6 patch 8.2.3695: confusing error for missing key Bram Moolenaar <Bram@vim.org> parents: 26238 diff changeset	4299 }
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4300 return FAIL;
26329 8afd7aa25ab6 patch 8.2.3695: confusing error for missing key Bram Moolenaar <Bram@vim.org> parents: 26238 diff changeset	4301 }
21833 e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4302
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4303 copy_tv(&item->di_tv, &tmp);
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4304 clear_tv(rettv);
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4305 *rettv = tmp;
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4306 }
e3f9528bddda patch 8.2.1466: Vim9: cannot index or slice a variable with type "any" Bram Moolenaar <Bram@vim.org> parents: 21831 diff changeset	4307 break;
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4308 }
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4309 return OK;
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4310 }
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4311
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4312 /*
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19888 diff changeset	4313 * Return the function name of partial "pt".
9723 80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4314 */
80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4315 char_u *
80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4316 partial_name(partial_T *pt)
80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4317 {
24618 4aebea72c397 patch 8.2.2848: crash whn calling partial Bram Moolenaar <Bram@vim.org> parents: 24614 diff changeset	4318 if (pt != NULL)
4aebea72c397 patch 8.2.2848: crash whn calling partial Bram Moolenaar <Bram@vim.org> parents: 24614 diff changeset	4319 {
4aebea72c397 patch 8.2.2848: crash whn calling partial Bram Moolenaar <Bram@vim.org> parents: 24614 diff changeset	4320 if (pt->pt_name != NULL)
4aebea72c397 patch 8.2.2848: crash whn calling partial Bram Moolenaar <Bram@vim.org> parents: 24614 diff changeset	4321 return pt->pt_name;
4aebea72c397 patch 8.2.2848: crash whn calling partial Bram Moolenaar <Bram@vim.org> parents: 24614 diff changeset	4322 if (pt->pt_func != NULL)
4aebea72c397 patch 8.2.2848: crash whn calling partial Bram Moolenaar <Bram@vim.org> parents: 24614 diff changeset	4323 return pt->pt_func->uf_name;
4aebea72c397 patch 8.2.2848: crash whn calling partial Bram Moolenaar <Bram@vim.org> parents: 24614 diff changeset	4324 }
20158 94f05de75e9f patch 8.2.0634: crash with null partial and blob Bram Moolenaar <Bram@vim.org> parents: 20156 diff changeset	4325 return (char_u *)"";
9723 80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4326 }
80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4327
8855 b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4328 static void
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4329 partial_free(partial_T *pt)
8855 b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4330 {
b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4331 int i;
b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4332
b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4333 for (i = 0; i < pt->pt_argc; ++i)
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4334 clear_tv(&pt->pt_argv[i]);
8855 b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4335 vim_free(pt->pt_argv);
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4336 dict_unref(pt->pt_dict);
9723 80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4337 if (pt->pt_name != NULL)
80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4338 {
80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4339 func_unref(pt->pt_name);
80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4340 vim_free(pt->pt_name);
80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4341 }
80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4342 else
80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4343 func_ptr_unref(pt->pt_func);
20257 683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4344
24860 594edca79708 patch 8.2.2968: Vim9: memory leak Bram Moolenaar <Bram@vim.org> parents: 24852 diff changeset	4345 // "out_up" is no longer used, decrement refcount on partial that owns it.
594edca79708 patch 8.2.2968: Vim9: memory leak Bram Moolenaar <Bram@vim.org> parents: 24852 diff changeset	4346 partial_unref(pt->pt_outer.out_up_partial);
594edca79708 patch 8.2.2968: Vim9: memory leak Bram Moolenaar <Bram@vim.org> parents: 24852 diff changeset	4347
22541 7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4348 // Decrease the reference count for the context of a closure. If down
7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4349 // to the minimum it may be time to free it.
20257 683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4350 if (pt->pt_funcstack != NULL)
683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4351 {
22541 7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4352 --pt->pt_funcstack->fs_refcount;
7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4353 funcstack_check_refcount(pt->pt_funcstack);
20257 683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4354 }
683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4355
8855 b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4356 vim_free(pt);
b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4357 }
b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4358
b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4359 /*
b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4360 * Unreference a closure: decrement the reference count and free it when it
b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4361 * becomes zero.
b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4362 */
b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4363 void
b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4364 partial_unref(partial_T *pt)
b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4365 {
22541 7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4366 if (pt != NULL)
7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4367 {
7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4368 if (--pt->pt_refcount <= 0)
7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4369 partial_free(pt);
7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4370
7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4371 // If the reference count goes down to one, the funcstack may be the
7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4372 // only reference and can be freed if no other partials reference it.
7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4373 else if (pt->pt_refcount == 1 && pt->pt_funcstack != NULL)
7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4374 funcstack_check_refcount(pt->pt_funcstack);
7d6ba4204f66 patch 8.2.1819: Vim9: Memory leak when using a closure Bram Moolenaar <Bram@vim.org> parents: 22529 diff changeset	4375 }
8855 b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4376 }
b76195a1e38e commit https://github.com/vim/vim/commit/ddecc25947dbdd689d5bcaed32f298a08abdd497 Christian Brabandt <cb@256bit.org> parents: 8839 diff changeset	4377
80 d2796c60ca6f updated for version 7.0032 vimboss parents: 76 diff changeset	4378 /*
7712 bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	4379 * Return the next (unique) copy ID.
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	4380 * Used for serializing nested structures.
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	4381 */
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	4382 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	4383 get_copyID(void)
7712 bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	4384 {
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	4385 current_copyID += COPYID_INC;
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	4386 return current_copyID;
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	4387 }
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	4388
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	4389 /*
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4390 * Garbage collection for lists and dictionaries.
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4391 *
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4392 * We use reference counts to be able to free most items right away when they
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4393 * are no longer used. But for composite items it's possible that it becomes
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4394 * unused while the reference count is > 0: When there is a recursive
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4395 * reference. Example:
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4396 * :let l = [1, 2, 3]
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4397 * :let d = {9: l}
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4398 * :let l[1] = d
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4399 *
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4400 * Since this is quite unusual we handle this with garbage collection: every
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4401 * once in a while find out which lists and dicts are not referenced from any
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4402 * variable.
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4403 *
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4404 * Here is a good reference text about garbage collection (refers to Python
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4405 * but it applies to all reference-counting mechanisms):
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4406 * http://python.ca/nas/python/gc/
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4407 */
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4408
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4409 /*
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4410 * Do garbage collection for lists and dicts.
9108 d319453f62b3 commit https://github.com/vim/vim/commit/574860b5ee9da281c875dad07a607454e135eaee Christian Brabandt <cb@256bit.org> parents: 9104 diff changeset	4411 * When "testing" is TRUE this is called from test_garbagecollect_now().
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4412 * Return TRUE if some memory was freed.
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4413 */
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4414 int
8881 ed0b39dd7fd6 commit https://github.com/vim/vim/commit/ebf7dfa6f121c82f97d2adca3d45fbaba9ad8f7e Christian Brabandt <cb@256bit.org> parents: 8877 diff changeset	4415 garbage_collect(int testing)
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4416 {
1891 7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4417 int copyID;
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4418 int abort = FALSE;
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4419 buf_T *buf;
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4420 win_T *wp;
6588 1ffe91b5e514 updated for version 7.4.620 Bram Moolenaar <bram@vim.org> parents: 6577 diff changeset	4421 int did_free = FALSE;
819 23f82b5d2814 updated for version 7.0c10 vimboss parents: 818 diff changeset	4422 tabpage_T *tp;
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4423
8881 ed0b39dd7fd6 commit https://github.com/vim/vim/commit/ebf7dfa6f121c82f97d2adca3d45fbaba9ad8f7e Christian Brabandt <cb@256bit.org> parents: 8877 diff changeset	4424 if (!testing)
ed0b39dd7fd6 commit https://github.com/vim/vim/commit/ebf7dfa6f121c82f97d2adca3d45fbaba9ad8f7e Christian Brabandt <cb@256bit.org> parents: 8877 diff changeset	4425 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4426 // Only do this once.
8881 ed0b39dd7fd6 commit https://github.com/vim/vim/commit/ebf7dfa6f121c82f97d2adca3d45fbaba9ad8f7e Christian Brabandt <cb@256bit.org> parents: 8877 diff changeset	4427 want_garbage_collect = FALSE;
ed0b39dd7fd6 commit https://github.com/vim/vim/commit/ebf7dfa6f121c82f97d2adca3d45fbaba9ad8f7e Christian Brabandt <cb@256bit.org> parents: 8877 diff changeset	4428 may_garbage_collect = FALSE;
ed0b39dd7fd6 commit https://github.com/vim/vim/commit/ebf7dfa6f121c82f97d2adca3d45fbaba9ad8f7e Christian Brabandt <cb@256bit.org> parents: 8877 diff changeset	4429 garbage_collect_at_exit = FALSE;
ed0b39dd7fd6 commit https://github.com/vim/vim/commit/ebf7dfa6f121c82f97d2adca3d45fbaba9ad8f7e Christian Brabandt <cb@256bit.org> parents: 8877 diff changeset	4430 }
958 e88950f0d4f6 updated for version 7.0-084 vimboss parents: 956 diff changeset	4431
19001 1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4432 // The execution stack can grow big, limit the size.
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4433 if (exestack.ga_maxlen - exestack.ga_len > 500)
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4434 {
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4435 size_t new_len;
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4436 char_u *pp;
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4437 int n;
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4438
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4439 // Keep 150% of the current size, with a minimum of the growth size.
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4440 n = exestack.ga_len / 2;
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4441 if (n < exestack.ga_growsize)
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4442 n = exestack.ga_growsize;
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4443
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4444 // Don't make it bigger though.
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4445 if (exestack.ga_len + n < exestack.ga_maxlen)
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4446 {
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4447 new_len = exestack.ga_itemsize * (exestack.ga_len + n);
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4448 pp = vim_realloc(exestack.ga_data, new_len);
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4449 if (pp == NULL)
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4450 return FAIL;
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4451 exestack.ga_maxlen = exestack.ga_len + n;
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4452 exestack.ga_data = pp;
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4453 }
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4454 }
1ebfb46710cd patch 8.2.0061: the execute stack can grow big and never shrinks Bram Moolenaar <Bram@vim.org> parents: 18968 diff changeset	4455
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4456 // We advance by two because we add one for items referenced through
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4457 // previous_funccal.
7712 bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	4458 copyID = get_copyID();
1891 7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4459
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4460 /*
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4461 * 1. Go through all accessible variables and mark all lists and dicts
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4462 * with copyID.
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4463 */
1891 7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4464
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4465 // Don't free variables in the previous_funccal list unless they are only
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4466 // referenced through previous_funccal. This must be first, because if
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4467 // the item is referenced elsewhere the funccal must not be freed.
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	4468 abort = abort \|\| set_ref_in_previous_funccal(copyID);
1891 7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4469
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4470 // script-local variables
17885 5e2d8840da11 patch 8.1.1939: code for handling v: variables in generic eval file Bram Moolenaar <Bram@vim.org> parents: 17873 diff changeset	4471 abort = abort \|\| garbage_collect_scriptvars(copyID);
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4472
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4473 // buffer-local variables
9649 fd9727ae3c49 commit https://github.com/vim/vim/commit/2932359000b2f918d5fade79ea4d124d5943cd07 Christian Brabandt <cb@256bit.org> parents: 9636 diff changeset	4474 FOR_ALL_BUFFERS(buf)
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4475 abort = abort \|\| set_ref_in_item(&buf->b_bufvar.di_tv, copyID,
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4476 NULL, NULL);
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4477
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4478 // window-local variables
819 23f82b5d2814 updated for version 7.0c10 vimboss parents: 818 diff changeset	4479 FOR_ALL_TAB_WINDOWS(tp, wp)
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4480 abort = abort \|\| set_ref_in_item(&wp->w_winvar.di_tv, copyID,
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4481 NULL, NULL);
4309 bdab73bf24a8 updated for version 7.3.904 Bram Moolenaar <bram@vim.org> parents: 4297 diff changeset	4482 if (aucmd_win != NULL)
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4483 abort = abort \|\| set_ref_in_item(&aucmd_win->w_winvar.di_tv, copyID,
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4484 NULL, NULL);
18763 49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name Bram Moolenaar <Bram@vim.org> parents: 18713 diff changeset	4485 #ifdef FEAT_PROP_POPUP
19888 435726a03481 patch 8.2.0500: using the same loop in many places Bram Moolenaar <Bram@vim.org> parents: 19874 diff changeset	4486 FOR_ALL_POPUPWINS(wp)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: 16768 diff changeset	4487 abort = abort \|\| set_ref_in_item(&wp->w_winvar.di_tv, copyID,
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: 16768 diff changeset	4488 NULL, NULL);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: 16768 diff changeset	4489 FOR_ALL_TABPAGES(tp)
19888 435726a03481 patch 8.2.0500: using the same loop in many places Bram Moolenaar <Bram@vim.org> parents: 19874 diff changeset	4490 FOR_ALL_POPUPWINS_IN_TAB(tp, wp)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: 16768 diff changeset	4491 abort = abort \|\| set_ref_in_item(&wp->w_winvar.di_tv, copyID,
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: 16768 diff changeset	4492 NULL, NULL);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: 16768 diff changeset	4493 #endif
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4494
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4495 // tabpage-local variables
9649 fd9727ae3c49 commit https://github.com/vim/vim/commit/2932359000b2f918d5fade79ea4d124d5943cd07 Christian Brabandt <cb@256bit.org> parents: 9636 diff changeset	4496 FOR_ALL_TABPAGES(tp)
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4497 abort = abort \|\| set_ref_in_item(&tp->tp_winvar.di_tv, copyID,
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4498 NULL, NULL);
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4499 // global variables
17922 4d63d47d87ef patch 8.1.1957: more code can be moved to evalvars.c Bram Moolenaar <Bram@vim.org> parents: 17893 diff changeset	4500 abort = abort \|\| garbage_collect_globvars(copyID);
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4501
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4502 // function-local variables
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	4503 abort = abort \|\| set_ref_in_call_stack(copyID);
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4504
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4505 // named functions (matters for closures)
9735 8037eb704e93 commit https://github.com/vim/vim/commit/bc7ce675b2d1c9fb58c067eff3edd59abc30aba4 Christian Brabandt <cb@256bit.org> parents: 9731 diff changeset	4506 abort = abort \|\| set_ref_in_functions(copyID);
8037eb704e93 commit https://github.com/vim/vim/commit/bc7ce675b2d1c9fb58c067eff3edd59abc30aba4 Christian Brabandt <cb@256bit.org> parents: 9731 diff changeset	4507
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4508 // function call arguments, if v:testing is set.
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	4509 abort = abort \|\| set_ref_in_func_args(copyID);
8881 ed0b39dd7fd6 commit https://github.com/vim/vim/commit/ebf7dfa6f121c82f97d2adca3d45fbaba9ad8f7e Christian Brabandt <cb@256bit.org> parents: 8877 diff changeset	4510
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4511 // v: vars
17885 5e2d8840da11 patch 8.1.1939: code for handling v: variables in generic eval file Bram Moolenaar <Bram@vim.org> parents: 17873 diff changeset	4512 abort = abort \|\| garbage_collect_vimvars(copyID);
1733 5a7384b9ca66 updated for version 7.2-031 vimboss parents: 1730 diff changeset	4513
17151 ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17085 diff changeset	4514 // callbacks in buffers
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17085 diff changeset	4515 abort = abort \|\| set_ref_in_buffers(copyID);
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17085 diff changeset	4516
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3435 diff changeset	4517 #ifdef FEAT_LUA
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4518 abort = abort \|\| set_ref_in_lua(copyID);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3435 diff changeset	4519 #endif
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3435 diff changeset	4520
3618 c052f3b79b99 updated for version 7.3.569 Bram Moolenaar <bram@vim.org> parents: 3600 diff changeset	4521 #ifdef FEAT_PYTHON
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4522 abort = abort \|\| set_ref_in_python(copyID);
3618 c052f3b79b99 updated for version 7.3.569 Bram Moolenaar <bram@vim.org> parents: 3600 diff changeset	4523 #endif
c052f3b79b99 updated for version 7.3.569 Bram Moolenaar <bram@vim.org> parents: 3600 diff changeset	4524
c052f3b79b99 updated for version 7.3.569 Bram Moolenaar <bram@vim.org> parents: 3600 diff changeset	4525 #ifdef FEAT_PYTHON3
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4526 abort = abort \|\| set_ref_in_python3(copyID);
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4527 #endif
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4528
8493 caed4b2d305f commit https://github.com/vim/vim/commit/509ce2a558e7e0c03242e32e844255af52f1c821 Christian Brabandt <cb@256bit.org> parents: 8491 diff changeset	4529 #ifdef FEAT_JOB_CHANNEL
8877 50e40f322e78 commit https://github.com/vim/vim/commit/3780bb923a688e0051a9a23474eeb38a8acb695a Christian Brabandt <cb@256bit.org> parents: 8870 diff changeset	4530 abort = abort \|\| set_ref_in_channel(copyID);
9058 87c2e43a4a12 commit https://github.com/vim/vim/commit/b8d4905592fc26fcd09180d7d6bfefd899f2f6c6 Christian Brabandt <cb@256bit.org> parents: 9052 diff changeset	4531 abort = abort \|\| set_ref_in_job(copyID);
7931 2679e636e862 commit https://github.com/vim/vim/commit/4b6a6dcbe7bd13170c4884cc17acb1eac2c633d1 Christian Brabandt <cb@256bit.org> parents: 7895 diff changeset	4532 #endif
9052 3a6b66c02d6d commit https://github.com/vim/vim/commit/3266c85a44a637862b0ed6e531680c6ab2897ab5 Christian Brabandt <cb@256bit.org> parents: 9027 diff changeset	4533 #ifdef FEAT_NETBEANS_INTG
3a6b66c02d6d commit https://github.com/vim/vim/commit/3266c85a44a637862b0ed6e531680c6ab2897ab5 Christian Brabandt <cb@256bit.org> parents: 9027 diff changeset	4534 abort = abort \|\| set_ref_in_nb_channel(copyID);
3a6b66c02d6d commit https://github.com/vim/vim/commit/3266c85a44a637862b0ed6e531680c6ab2897ab5 Christian Brabandt <cb@256bit.org> parents: 9027 diff changeset	4535 #endif
7931 2679e636e862 commit https://github.com/vim/vim/commit/4b6a6dcbe7bd13170c4884cc17acb1eac2c633d1 Christian Brabandt <cb@256bit.org> parents: 7895 diff changeset	4536
9153 c2fe86f2bda1 commit https://github.com/vim/vim/commit/e3188e261569ae512fb1ae2653b57fdd9e259ca3 Christian Brabandt <cb@256bit.org> parents: 9127 diff changeset	4537 #ifdef FEAT_TIMERS
c2fe86f2bda1 commit https://github.com/vim/vim/commit/e3188e261569ae512fb1ae2653b57fdd9e259ca3 Christian Brabandt <cb@256bit.org> parents: 9127 diff changeset	4538 abort = abort \|\| set_ref_in_timer(copyID);
c2fe86f2bda1 commit https://github.com/vim/vim/commit/e3188e261569ae512fb1ae2653b57fdd9e259ca3 Christian Brabandt <cb@256bit.org> parents: 9127 diff changeset	4539 #endif
c2fe86f2bda1 commit https://github.com/vim/vim/commit/e3188e261569ae512fb1ae2653b57fdd9e259ca3 Christian Brabandt <cb@256bit.org> parents: 9127 diff changeset	4540
11412 84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11323 diff changeset	4541 #ifdef FEAT_QUICKFIX
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11323 diff changeset	4542 abort = abort \|\| set_ref_in_quickfix(copyID);
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11323 diff changeset	4543 #endif
84baca75b7f2 patch 8.0.0590: cannot add a context to locations Christian Brabandt <cb@256bit.org> parents: 11323 diff changeset	4544
11804 5630978ae089 patch 8.0.0784: job of terminal may be garbage collected Christian Brabandt <cb@256bit.org> parents: 11418 diff changeset	4545 #ifdef FEAT_TERMINAL
5630978ae089 patch 8.0.0784: job of terminal may be garbage collected Christian Brabandt <cb@256bit.org> parents: 11418 diff changeset	4546 abort = abort \|\| set_ref_in_term(copyID);
5630978ae089 patch 8.0.0784: job of terminal may be garbage collected Christian Brabandt <cb@256bit.org> parents: 11418 diff changeset	4547 #endif
5630978ae089 patch 8.0.0784: job of terminal may be garbage collected Christian Brabandt <cb@256bit.org> parents: 11418 diff changeset	4548
18763 49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name Bram Moolenaar <Bram@vim.org> parents: 18713 diff changeset	4549 #ifdef FEAT_PROP_POPUP
17151 ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17085 diff changeset	4550 abort = abort \|\| set_ref_in_popups(copyID);
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17085 diff changeset	4551 #endif
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17085 diff changeset	4552
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4553 if (!abort)
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4554 {
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4555 /*
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4556 * 2. Free lists and dictionaries that are not referenced.
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4557 */
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4558 did_free = free_unref_items(copyID);
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4559
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4560 /*
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4561 * 3. Check if any funccal can be freed now.
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	4562 * This may call us back recursively.
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4563 */
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	4564 free_unref_funccal(copyID, testing);
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4565 }
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4566 else if (p_verbose > 0)
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4567 {
15543 dd725a8ab112 patch 8.1.0779: argument for message functions is inconsistent Bram Moolenaar <Bram@vim.org> parents: 15517 diff changeset	4568 verb_msg(_("Not enough memory to set references, garbage collection aborted!"));
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4569 }
1891 7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4570
7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4571 return did_free;
7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4572 }
7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4573
7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4574 /*
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4575 * Free lists, dictionaries, channels and jobs that are no longer referenced.
1891 7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4576 */
7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4577 static int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	4578 free_unref_items(int copyID)
1891 7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4579 {
7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4580 int did_free = FALSE;
7a4ad3fb109d updated for version 7.2-188 vimboss parents: 1880 diff changeset	4581
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4582 // Let all "free" functions know that we are here. This means no
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4583 // dictionaries, lists, channels or jobs are to be freed, because we will
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4584 // do that here.
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4585 in_free_unref_items = TRUE;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4586
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4587 /*
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4588 * PASS 1: free the contents of the items. We don't free the items
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4589 * themselves yet, so that it is possible to decrement refcount counters
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4590 */
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4591
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4592 // Go through the list of dicts and free items without the copyID.
9556 afaff1d283d3 commit https://github.com/vim/vim/commit/cd52459c387785796713826c63174cdeed295dd4 Christian Brabandt <cb@256bit.org> parents: 9527 diff changeset	4593 did_free \|= dict_free_nonref(copyID);
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4594
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4595 // Go through the list of lists and free items without the copyID.
9560 1e68dfd7931b commit https://github.com/vim/vim/commit/da861d631d7e22654faee2789286c685ad548911 Christian Brabandt <cb@256bit.org> parents: 9556 diff changeset	4596 did_free \|= list_free_nonref(copyID);
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4597
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4598 #ifdef FEAT_JOB_CHANNEL
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4599 // Go through the list of jobs and free items without the copyID. This
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4600 // must happen before doing channels, because jobs refer to channels, but
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4601 // the reference from the channel to the job isn't tracked.
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4602 did_free \|= free_unused_jobs_contents(copyID, COPYID_MASK);
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4603
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4604 // Go through the list of channels and free items without the copyID.
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4605 did_free \|= free_unused_channels_contents(copyID, COPYID_MASK);
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4606 #endif
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4607
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4608 /*
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4609 * PASS 2: free the items themselves.
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4610 */
9556 afaff1d283d3 commit https://github.com/vim/vim/commit/cd52459c387785796713826c63174cdeed295dd4 Christian Brabandt <cb@256bit.org> parents: 9527 diff changeset	4611 dict_free_items(copyID);
9560 1e68dfd7931b commit https://github.com/vim/vim/commit/da861d631d7e22654faee2789286c685ad548911 Christian Brabandt <cb@256bit.org> parents: 9556 diff changeset	4612 list_free_items(copyID);
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4613
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4614 #ifdef FEAT_JOB_CHANNEL
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4615 // Go through the list of jobs and free items without the copyID. This
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4616 // must happen before doing channels, because jobs refer to channels, but
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4617 // the reference from the channel to the job isn't tracked.
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4618 free_unused_jobs(copyID, COPYID_MASK);
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4619
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4620 // Go through the list of channels and free items without the copyID.
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4621 free_unused_channels(copyID, COPYID_MASK);
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4622 #endif
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4623
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4624 in_free_unref_items = FALSE;
7957 b74549818500 commit https://github.com/vim/vim/commit/835dc636a5350f610b62f110227d2363b5b2880a Christian Brabandt <cb@256bit.org> parents: 7955 diff changeset	4625
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4626 return did_free;
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4627 }
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4628
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4629 /*
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4630 * Mark all lists and dicts referenced through hashtab "ht" with "copyID".
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4631 * "list_stack" is used to add lists to be marked. Can be NULL.
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4632 *
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4633 * Returns TRUE if setting references failed somehow.
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4634 */
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4635 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	4636 set_ref_in_ht(hashtab_T ht, int copyID, list_stack_T *list_stack)
364 5332dd13733c updated for version 7.0094 vimboss parents: 359 diff changeset	4637 {
5332dd13733c updated for version 7.0094 vimboss parents: 359 diff changeset	4638 int todo;
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4639 int abort = FALSE;
364 5332dd13733c updated for version 7.0094 vimboss parents: 359 diff changeset	4640 hashitem_T *hi;
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4641 hashtab_T *cur_ht;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4642 ht_stack_T *ht_stack = NULL;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4643 ht_stack_T *tempitem;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4644
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4645 cur_ht = ht;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4646 for (;;)
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4647 {
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4648 if (!abort)
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4649 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4650 // Mark each item in the hashtab. If the item contains a hashtab
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4651 // it is added to ht_stack, if it contains a list it is added to
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4652 // list_stack.
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4653 todo = (int)cur_ht->ht_used;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4654 for (hi = cur_ht->ht_array; todo > 0; ++hi)
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4655 if (!HASHITEM_EMPTY(hi))
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4656 {
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4657 --todo;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4658 abort = abort \|\| set_ref_in_item(&HI2DI(hi)->di_tv, copyID,
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4659 &ht_stack, list_stack);
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4660 }
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4661 }
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4662
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4663 if (ht_stack == NULL)
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4664 break;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4665
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4666 // take an item from the stack
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4667 cur_ht = ht_stack->ht;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4668 tempitem = ht_stack;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4669 ht_stack = ht_stack->prev;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4670 free(tempitem);
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4671 }
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4672
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4673 return abort;
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4674 }
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4675
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4676 /*
17168 1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4677 * Mark a dict and its items with "copyID".
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4678 * Returns TRUE if setting references failed somehow.
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4679 */
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4680 int
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4681 set_ref_in_dict(dict_T *d, int copyID)
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4682 {
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4683 if (d != NULL && d->dv_copyID != copyID)
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4684 {
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4685 d->dv_copyID = copyID;
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4686 return set_ref_in_ht(&d->dv_hashtab, copyID, NULL);
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4687 }
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4688 return FALSE;
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4689 }
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4690
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4691 /*
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4692 * Mark a list and its items with "copyID".
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4693 * Returns TRUE if setting references failed somehow.
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4694 */
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4695 int
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4696 set_ref_in_list(list_T *ll, int copyID)
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4697 {
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4698 if (ll != NULL && ll->lv_copyID != copyID)
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4699 {
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4700 ll->lv_copyID = copyID;
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4701 return set_ref_in_list_items(ll, copyID, NULL);
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4702 }
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4703 return FALSE;
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4704 }
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4705
1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4706 /*
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4707 * Mark all lists and dicts referenced through list "l" with "copyID".
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4708 * "ht_stack" is used to add hashtabs to be marked. Can be NULL.
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4709 *
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4710 * Returns TRUE if setting references failed somehow.
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4711 */
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4712 int
17168 1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4713 set_ref_in_list_items(list_T l, int copyID, ht_stack_T *ht_stack)
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4714 {
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4715 listitem_T *li;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4716 int abort = FALSE;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4717 list_T *cur_l;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4718 list_stack_T *list_stack = NULL;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4719 list_stack_T *tempitem;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4720
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4721 cur_l = l;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4722 for (;;)
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4723 {
19201 e7b4fff348dd patch 8.2.0159: non-materialized range() list causes problems Bram Moolenaar <Bram@vim.org> parents: 19191 diff changeset	4724 if (!abort && cur_l->lv_first != &range_list_item)
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4725 // Mark each item in the list. If the item contains a hashtab
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4726 // it is added to ht_stack, if it contains a list it is added to
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4727 // list_stack.
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4728 for (li = cur_l->lv_first; !abort && li != NULL; li = li->li_next)
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4729 abort = abort \|\| set_ref_in_item(&li->li_tv, copyID,
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4730 ht_stack, &list_stack);
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4731 if (list_stack == NULL)
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4732 break;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4733
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4734 // take an item from the stack
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4735 cur_l = list_stack->list;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4736 tempitem = list_stack;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4737 list_stack = list_stack->prev;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4738 free(tempitem);
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4739 }
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4740
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4741 return abort;
371 4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4742 }
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4743
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4744 /*
4b9fef49d7ff updated for version 7.0095 vimboss parents: 364 diff changeset	4745 * Mark all lists and dicts referenced through typval "tv" with "copyID".
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4746 * "list_stack" is used to add lists to be marked. Can be NULL.
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4747 * "ht_stack" is used to add hashtabs to be marked. Can be NULL.
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4748 *
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4749 * Returns TRUE if setting references failed somehow.
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4750 */
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4751 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	4752 set_ref_in_item(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	4753 typval_T *tv,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	4754 int copyID,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	4755 ht_stack_T **ht_stack,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	4756 list_stack_T **list_stack)
364 5332dd13733c updated for version 7.0094 vimboss parents: 359 diff changeset	4757 {
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4758 int abort = FALSE;
364 5332dd13733c updated for version 7.0094 vimboss parents: 359 diff changeset	4759
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4760 if (tv->v_type == VAR_DICT)
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4761 {
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4762 dict_T *dd = tv->vval.v_dict;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4763
7943 e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4764 if (dd != NULL && dd->dv_copyID != copyID)
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4765 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4766 // Didn't see this dict yet.
7943 e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4767 dd->dv_copyID = copyID;
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4768 if (ht_stack == NULL)
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4769 {
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4770 abort = set_ref_in_ht(&dd->dv_hashtab, copyID, list_stack);
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4771 }
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4772 else
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4773 {
21915 2559dc02bd64 patch 8.2.1507: using malloc() directly Bram Moolenaar <Bram@vim.org> parents: 21899 diff changeset	4774 ht_stack_T *newitem = ALLOC_ONE(ht_stack_T);
2559dc02bd64 patch 8.2.1507: using malloc() directly Bram Moolenaar <Bram@vim.org> parents: 21899 diff changeset	4775
7943 e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4776 if (newitem == NULL)
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4777 abort = TRUE;
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4778 else
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4779 {
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4780 newitem->ht = &dd->dv_hashtab;
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4781 newitem->prev = *ht_stack;
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4782 *ht_stack = newitem;
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4783 }
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4784 }
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4785 }
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4786 }
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4787 else if (tv->v_type == VAR_LIST)
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4788 {
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4789 list_T *ll = tv->vval.v_list;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4790
7943 e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4791 if (ll != NULL && ll->lv_copyID != copyID)
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4792 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4793 // Didn't see this list yet.
7943 e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4794 ll->lv_copyID = copyID;
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4795 if (list_stack == NULL)
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4796 {
17168 1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 17151 diff changeset	4797 abort = set_ref_in_list_items(ll, copyID, ht_stack);
7943 e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4798 }
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4799 else
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4800 {
21915 2559dc02bd64 patch 8.2.1507: using malloc() directly Bram Moolenaar <Bram@vim.org> parents: 21899 diff changeset	4801 list_stack_T *newitem = ALLOC_ONE(list_stack_T);
2559dc02bd64 patch 8.2.1507: using malloc() directly Bram Moolenaar <Bram@vim.org> parents: 21899 diff changeset	4802
7943 e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4803 if (newitem == NULL)
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4804 abort = TRUE;
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4805 else
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4806 {
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4807 newitem->list = ll;
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4808 newitem->prev = *list_stack;
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4809 *list_stack = newitem;
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4810 }
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4811 }
e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	4812 }
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4813 }
9686 8c2553beff0f commit https://github.com/vim/vim/commit/1e96d9bf98f9ab84d5af7f98d6a961d91b17364f Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	4814 else if (tv->v_type == VAR_FUNC)
8c2553beff0f commit https://github.com/vim/vim/commit/1e96d9bf98f9ab84d5af7f98d6a961d91b17364f Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	4815 {
9723 80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4816 abort = set_ref_in_func(tv->vval.v_string, NULL, copyID);
9686 8c2553beff0f commit https://github.com/vim/vim/commit/1e96d9bf98f9ab84d5af7f98d6a961d91b17364f Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	4817 }
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4818 else if (tv->v_type == VAR_PARTIAL)
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4819 {
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4820 partial_T *pt = tv->vval.v_partial;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4821 int i;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4822
20295 bc2c9ea94ec1 patch 8.2.0703: Vim9: closure cannot store value in outer context Bram Moolenaar <Bram@vim.org> parents: 20257 diff changeset	4823 if (pt != NULL && pt->pt_copyID != copyID)
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4824 {
20295 bc2c9ea94ec1 patch 8.2.0703: Vim9: closure cannot store value in outer context Bram Moolenaar <Bram@vim.org> parents: 20257 diff changeset	4825 // Didn't see this partial yet.
bc2c9ea94ec1 patch 8.2.0703: Vim9: closure cannot store value in outer context Bram Moolenaar <Bram@vim.org> parents: 20257 diff changeset	4826 pt->pt_copyID = copyID;
bc2c9ea94ec1 patch 8.2.0703: Vim9: closure cannot store value in outer context Bram Moolenaar <Bram@vim.org> parents: 20257 diff changeset	4827
9723 80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	4828 abort = set_ref_in_func(pt->pt_name, pt->pt_func, copyID);
9686 8c2553beff0f commit https://github.com/vim/vim/commit/1e96d9bf98f9ab84d5af7f98d6a961d91b17364f Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	4829
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4830 if (pt->pt_dict != NULL)
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4831 {
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4832 typval_T dtv;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4833
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4834 dtv.v_type = VAR_DICT;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4835 dtv.vval.v_dict = pt->pt_dict;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4836 set_ref_in_item(&dtv, copyID, ht_stack, list_stack);
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4837 }
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4838
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4839 for (i = 0; i < pt->pt_argc; ++i)
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4840 abort = abort \|\| set_ref_in_item(&pt->pt_argv[i], copyID,
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4841 ht_stack, list_stack);
20257 683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4842 if (pt->pt_funcstack != NULL)
683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4843 {
683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4844 typval_T *stack = pt->pt_funcstack->fs_ga.ga_data;
683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4845
683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4846 for (i = 0; i < pt->pt_funcstack->fs_ga.ga_len; ++i)
683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4847 abort = abort \|\| set_ref_in_item(stack + i, copyID,
683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4848 ht_stack, list_stack);
683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4849 }
683c2da4982b patch 8.2.0684: Vim9: memory leak when using lambda Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	4850
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4851 }
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4852 }
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4853 #ifdef FEAT_JOB_CHANNEL
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4854 else if (tv->v_type == VAR_JOB)
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4855 {
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4856 job_T *job = tv->vval.v_job;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4857 typval_T dtv;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4858
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4859 if (job != NULL && job->jv_copyID != copyID)
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4860 {
8870 30988ffb7498 commit https://github.com/vim/vim/commit/0239acb11fe4bfe9b525ea90b782759da5eb7704 Christian Brabandt <cb@256bit.org> parents: 8863 diff changeset	4861 job->jv_copyID = copyID;
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4862 if (job->jv_channel != NULL)
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4863 {
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4864 dtv.v_type = VAR_CHANNEL;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4865 dtv.vval.v_channel = job->jv_channel;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4866 set_ref_in_item(&dtv, copyID, ht_stack, list_stack);
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4867 }
16872 a836d122231a patch 8.1.1437: code to handle callbacks is duplicated Bram Moolenaar <Bram@vim.org> parents: 16825 diff changeset	4868 if (job->jv_exit_cb.cb_partial != NULL)
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4869 {
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4870 dtv.v_type = VAR_PARTIAL;
16872 a836d122231a patch 8.1.1437: code to handle callbacks is duplicated Bram Moolenaar <Bram@vim.org> parents: 16825 diff changeset	4871 dtv.vval.v_partial = job->jv_exit_cb.cb_partial;
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4872 set_ref_in_item(&dtv, copyID, ht_stack, list_stack);
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4873 }
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4874 }
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4875 }
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4876 else if (tv->v_type == VAR_CHANNEL)
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4877 {
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4878 channel_T *ch =tv->vval.v_channel;
10259 a09db7a4afe0 commit https://github.com/vim/vim/commit/dc0ccaee68ca24d10050117fbec757ad33590a17 Christian Brabandt <cb@256bit.org> parents: 10235 diff changeset	4879 ch_part_T part;
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4880 typval_T dtv;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4881 jsonq_T *jq;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4882 cbq_T *cq;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4883
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4884 if (ch != NULL && ch->ch_copyID != copyID)
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4885 {
8870 30988ffb7498 commit https://github.com/vim/vim/commit/0239acb11fe4bfe9b525ea90b782759da5eb7704 Christian Brabandt <cb@256bit.org> parents: 8863 diff changeset	4886 ch->ch_copyID = copyID;
10259 a09db7a4afe0 commit https://github.com/vim/vim/commit/dc0ccaee68ca24d10050117fbec757ad33590a17 Christian Brabandt <cb@256bit.org> parents: 10235 diff changeset	4887 for (part = PART_SOCK; part < PART_COUNT; ++part)
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4888 {
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4889 for (jq = ch->ch_part[part].ch_json_head.jq_next; jq != NULL;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4890 jq = jq->jq_next)
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4891 set_ref_in_item(jq->jq_value, copyID, ht_stack, list_stack);
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4892 for (cq = ch->ch_part[part].ch_cb_head.cq_next; cq != NULL;
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4893 cq = cq->cq_next)
16872 a836d122231a patch 8.1.1437: code to handle callbacks is duplicated Bram Moolenaar <Bram@vim.org> parents: 16825 diff changeset	4894 if (cq->cq_callback.cb_partial != NULL)
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4895 {
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4896 dtv.v_type = VAR_PARTIAL;
16872 a836d122231a patch 8.1.1437: code to handle callbacks is duplicated Bram Moolenaar <Bram@vim.org> parents: 16825 diff changeset	4897 dtv.vval.v_partial = cq->cq_callback.cb_partial;
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4898 set_ref_in_item(&dtv, copyID, ht_stack, list_stack);
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4899 }
16872 a836d122231a patch 8.1.1437: code to handle callbacks is duplicated Bram Moolenaar <Bram@vim.org> parents: 16825 diff changeset	4900 if (ch->ch_part[part].ch_callback.cb_partial != NULL)
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4901 {
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4902 dtv.v_type = VAR_PARTIAL;
16872 a836d122231a patch 8.1.1437: code to handle callbacks is duplicated Bram Moolenaar <Bram@vim.org> parents: 16825 diff changeset	4903 dtv.vval.v_partial =
a836d122231a patch 8.1.1437: code to handle callbacks is duplicated Bram Moolenaar <Bram@vim.org> parents: 16825 diff changeset	4904 ch->ch_part[part].ch_callback.cb_partial;
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4905 set_ref_in_item(&dtv, copyID, ht_stack, list_stack);
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4906 }
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4907 }
16872 a836d122231a patch 8.1.1437: code to handle callbacks is duplicated Bram Moolenaar <Bram@vim.org> parents: 16825 diff changeset	4908 if (ch->ch_callback.cb_partial != NULL)
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4909 {
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4910 dtv.v_type = VAR_PARTIAL;
16872 a836d122231a patch 8.1.1437: code to handle callbacks is duplicated Bram Moolenaar <Bram@vim.org> parents: 16825 diff changeset	4911 dtv.vval.v_partial = ch->ch_callback.cb_partial;
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4912 set_ref_in_item(&dtv, copyID, ht_stack, list_stack);
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4913 }
16872 a836d122231a patch 8.1.1437: code to handle callbacks is duplicated Bram Moolenaar <Bram@vim.org> parents: 16825 diff changeset	4914 if (ch->ch_close_cb.cb_partial != NULL)
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4915 {
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4916 dtv.v_type = VAR_PARTIAL;
16872 a836d122231a patch 8.1.1437: code to handle callbacks is duplicated Bram Moolenaar <Bram@vim.org> parents: 16825 diff changeset	4917 dtv.vval.v_partial = ch->ch_close_cb.cb_partial;
8863 e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4918 set_ref_in_item(&dtv, copyID, ht_stack, list_stack);
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4919 }
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4920 }
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4921 }
e1b84109506a commit https://github.com/vim/vim/commit/107e1eef1df3b786ad3ad49fbdb9e058649303b5 Christian Brabandt <cb@256bit.org> parents: 8861 diff changeset	4922 #endif
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 6549 diff changeset	4923 return abort;
364 5332dd13733c updated for version 7.0094 vimboss parents: 359 diff changeset	4924 }
5332dd13733c updated for version 7.0094 vimboss parents: 359 diff changeset	4925
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	4926 /*
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4927 * Return a string with the string representation of a variable.
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4928 * If the memory is allocated "tofree" is set to it, otherwise NULL.
80 d2796c60ca6f updated for version 7.0032 vimboss parents: 76 diff changeset	4929 * "numbuf" is used for a number.
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	4930 * When "copyID" is not NULL replace recursive lists and dicts with "...".
11973 aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	4931 * When both "echo_style" and "composite_val" are FALSE, put quotes around
23229 b545334ae654 patch 8.2.2160: various typos Bram Moolenaar <Bram@vim.org> parents: 23191 diff changeset	4932 * strings as "string()", otherwise does not put quotes around strings, as
11973 aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	4933 * ":echo" displays values.
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4934 * When "restore_copyID" is FALSE, repeated items in dictionaries and lists
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4935 * are replaced with "...".
1360 8d09c1eed8a5 updated for version 7.1-074 vimboss parents: 1341 diff changeset	4936 * May return NULL.
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4937 */
9556 afaff1d283d3 commit https://github.com/vim/vim/commit/cd52459c387785796713826c63174cdeed295dd4 Christian Brabandt <cb@256bit.org> parents: 9527 diff changeset	4938 char_u *
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4939 echo_string_core(
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	4940 typval_T *tv,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	4941 char_u **tofree,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	4942 char_u *numbuf,
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4943 int copyID,
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4944 int echo_style,
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4945 int restore_copyID,
11973 aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	4946 int composite_val)
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4947 {
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	4948 static int recurse = 0;
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	4949 char_u *r = NULL;
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	4950
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	4951 if (recurse >= DICT_MAXNEST)
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	4952 {
5973 99d8f2d72dcd updated for version 7.4.327 Bram Moolenaar <bram@vim.org> parents: 5964 diff changeset	4953 if (!did_echo_string_emsg)
99d8f2d72dcd updated for version 7.4.327 Bram Moolenaar <bram@vim.org> parents: 5964 diff changeset	4954 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4955 // Only give this message once for a recursive call to avoid
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4956 // flooding the user with errors. And stop iterating over lists
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	4957 // and dicts.
5973 99d8f2d72dcd updated for version 7.4.327 Bram Moolenaar <bram@vim.org> parents: 5964 diff changeset	4958 did_echo_string_emsg = TRUE;
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	4959 emsg(_("E724: variable nested too deep for displaying"));
5973 99d8f2d72dcd updated for version 7.4.327 Bram Moolenaar <bram@vim.org> parents: 5964 diff changeset	4960 }
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	4961 *tofree = NULL;
5973 99d8f2d72dcd updated for version 7.4.327 Bram Moolenaar <bram@vim.org> parents: 5964 diff changeset	4962 return (char_u *)"{E724}";
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	4963 }
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	4964 ++recurse;
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	4965
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4966 switch (tv->v_type)
dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4967 {
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4968 case VAR_STRING:
11973 aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	4969 if (echo_style && !composite_val)
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4970 {
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4971 *tofree = NULL;
11973 aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	4972 r = tv->vval.v_string;
aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	4973 if (r == NULL)
aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	4974 r = (char_u *)"";
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4975 }
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4976 else
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4977 {
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4978 *tofree = string_quote(tv->vval.v_string, FALSE);
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4979 r = *tofree;
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4980 }
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4981 break;
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4982
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	4983 case VAR_FUNC:
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4984 if (echo_style)
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4985 {
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4986 *tofree = NULL;
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4987 r = tv->vval.v_string;
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4988 }
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4989 else
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4990 {
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4991 *tofree = string_quote(tv->vval.v_string, TRUE);
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4992 r = *tofree;
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	4993 }
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	4994 break;
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	4995
8538 c337c813c64d commit https://github.com/vim/vim/commit/1735bc988c546cc962c5f94792815b4d7cb79710 Christian Brabandt <cb@256bit.org> parents: 8536 diff changeset	4996 case VAR_PARTIAL:
8710 af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	4997 {
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	4998 partial_T *pt = tv->vval.v_partial;
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	4999 char_u *fname = string_quote(pt == NULL ? NULL
9723 80ac9cf77c9b commit https://github.com/vim/vim/commit/437bafe4c8a83ed71ee006eda7f54b65a90f0d4c Christian Brabandt <cb@256bit.org> parents: 9717 diff changeset	5000 : partial_name(pt), FALSE);
8710 af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5001 garray_T ga;
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5002 int i;
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5003 char_u *tf;
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5004
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5005 ga_init2(&ga, 1, 100);
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5006 ga_concat(&ga, (char_u *)"function(");
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5007 if (fname != NULL)
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5008 {
26472 cc95e10e1cf2 patch 8.2.3766: converting a funcref to a string leaves out "g:" Bram Moolenaar <Bram@vim.org> parents: 26441 diff changeset	5009 // When using uf_name prepend "g:" for a global function.
26474 9c84f7c6082d patch 8.2.3767: crash when using NULL partial Bram Moolenaar <Bram@vim.org> parents: 26472 diff changeset	5010 if (pt != NULL && pt->pt_name == NULL && fname[0] == '\''
26472 cc95e10e1cf2 patch 8.2.3766: converting a funcref to a string leaves out "g:" Bram Moolenaar <Bram@vim.org> parents: 26441 diff changeset	5011 && vim_isupper(fname[1]))
cc95e10e1cf2 patch 8.2.3766: converting a funcref to a string leaves out "g:" Bram Moolenaar <Bram@vim.org> parents: 26441 diff changeset	5012 {
cc95e10e1cf2 patch 8.2.3766: converting a funcref to a string leaves out "g:" Bram Moolenaar <Bram@vim.org> parents: 26441 diff changeset	5013 ga_concat(&ga, (char_u *)"'g:");
cc95e10e1cf2 patch 8.2.3766: converting a funcref to a string leaves out "g:" Bram Moolenaar <Bram@vim.org> parents: 26441 diff changeset	5014 ga_concat(&ga, fname + 1);
cc95e10e1cf2 patch 8.2.3766: converting a funcref to a string leaves out "g:" Bram Moolenaar <Bram@vim.org> parents: 26441 diff changeset	5015 }
cc95e10e1cf2 patch 8.2.3766: converting a funcref to a string leaves out "g:" Bram Moolenaar <Bram@vim.org> parents: 26441 diff changeset	5016 else
cc95e10e1cf2 patch 8.2.3766: converting a funcref to a string leaves out "g:" Bram Moolenaar <Bram@vim.org> parents: 26441 diff changeset	5017 ga_concat(&ga, fname);
8710 af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5018 vim_free(fname);
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5019 }
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5020 if (pt != NULL && pt->pt_argc > 0)
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5021 {
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5022 ga_concat(&ga, (char_u *)", [");
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5023 for (i = 0; i < pt->pt_argc; ++i)
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5024 {
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5025 if (i > 0)
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5026 ga_concat(&ga, (char_u *)", ");
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5027 ga_concat(&ga,
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5028 tv2string(&pt->pt_argv[i], &tf, numbuf, copyID));
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5029 vim_free(tf);
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5030 }
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5031 ga_concat(&ga, (char_u *)"]");
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5032 }
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5033 if (pt != NULL && pt->pt_dict != NULL)
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5034 {
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5035 typval_T dtv;
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5036
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5037 ga_concat(&ga, (char_u *)", ");
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5038 dtv.v_type = VAR_DICT;
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5039 dtv.vval.v_dict = pt->pt_dict;
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5040 ga_concat(&ga, tv2string(&dtv, &tf, numbuf, copyID));
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5041 vim_free(tf);
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5042 }
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5043 ga_concat(&ga, (char_u *)")");
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5044
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5045 *tofree = ga.ga_data;
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5046 r = *tofree;
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5047 break;
af3cb5c068fd commit https://github.com/vim/vim/commit/24c77a1e3a2ad510582116229462b482d69b4b8e Christian Brabandt <cb@256bit.org> parents: 8708 diff changeset	5048 }
8538 c337c813c64d commit https://github.com/vim/vim/commit/1735bc988c546cc962c5f94792815b4d7cb79710 Christian Brabandt <cb@256bit.org> parents: 8536 diff changeset	5049
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	5050 case VAR_BLOB:
15466 435fcefd2c8e patch 8.1.0741: viminfo with Blob is not tested Bram Moolenaar <Bram@vim.org> parents: 15464 diff changeset	5051 r = blob2string(tv->vval.v_blob, tofree, numbuf);
15454 1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	5052 break;
1d2b5c016f17 patch 8.1.0735: cannot handle binary data Bram Moolenaar <Bram@vim.org> parents: 15219 diff changeset	5053
56 dbf53ece2e23 updated for version 7.0029 vimboss parents: 51 diff changeset	5054 case VAR_LIST:
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5055 if (tv->vval.v_list == NULL)
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5056 {
20126 831b1ea43020 patch 8.2.0618: echoing a null list results in no output Bram Moolenaar <Bram@vim.org> parents: 20111 diff changeset	5057 // NULL list is equivalent to empty list.
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5058 *tofree = NULL;
20126 831b1ea43020 patch 8.2.0618: echoing a null list results in no output Bram Moolenaar <Bram@vim.org> parents: 20111 diff changeset	5059 r = (char_u *)"[]";
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5060 }
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5061 else if (copyID != 0 && tv->vval.v_list->lv_copyID == copyID
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5062 && tv->vval.v_list->lv_len > 0)
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5063 {
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5064 *tofree = NULL;
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5065 r = (char_u *)"[...]";
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5066 }
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5067 else
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5068 {
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5069 int old_copyID = tv->vval.v_list->lv_copyID;
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5070
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5071 tv->vval.v_list->lv_copyID = copyID;
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5072 *tofree = list2string(tv, copyID, restore_copyID);
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5073 if (restore_copyID)
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5074 tv->vval.v_list->lv_copyID = old_copyID;
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5075 r = *tofree;
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5076 }
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5077 break;
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5078
100 1f3902f3eb5c updated for version 7.0038 vimboss parents: 97 diff changeset	5079 case VAR_DICT:
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5080 if (tv->vval.v_dict == NULL)
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5081 {
20128 0b35a7ffceb2 patch 8.2.0619: null dict is not handled like an empty dict Bram Moolenaar <Bram@vim.org> parents: 20126 diff changeset	5082 // NULL dict is equivalent to empty dict.
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5083 *tofree = NULL;
20128 0b35a7ffceb2 patch 8.2.0619: null dict is not handled like an empty dict Bram Moolenaar <Bram@vim.org> parents: 20126 diff changeset	5084 r = (char_u *)"{}";
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5085 }
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5086 else if (copyID != 0 && tv->vval.v_dict->dv_copyID == copyID
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5087 && tv->vval.v_dict->dv_hashtab.ht_used != 0)
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5088 {
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5089 *tofree = NULL;
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5090 r = (char_u *)"{...}";
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5091 }
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5092 else
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5093 {
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5094 int old_copyID = tv->vval.v_dict->dv_copyID;
20128 0b35a7ffceb2 patch 8.2.0619: null dict is not handled like an empty dict Bram Moolenaar <Bram@vim.org> parents: 20126 diff changeset	5095
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5096 tv->vval.v_dict->dv_copyID = copyID;
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5097 *tofree = dict2string(tv, copyID, restore_copyID);
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5098 if (restore_copyID)
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5099 tv->vval.v_dict->dv_copyID = old_copyID;
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5100 r = *tofree;
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5101 }
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5102 break;
1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5103
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5104 case VAR_NUMBER:
7943 e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	5105 case VAR_UNKNOWN:
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19888 diff changeset	5106 case VAR_ANY:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	5107 case VAR_VOID:
11973 aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	5108 *tofree = NULL;
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	5109 r = tv_get_string_buf(tv, numbuf);
11973 aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	5110 break;
aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	5111
7957 b74549818500 commit https://github.com/vim/vim/commit/835dc636a5350f610b62f110227d2363b5b2880a Christian Brabandt <cb@256bit.org> parents: 7955 diff changeset	5112 case VAR_JOB:
8041 c6443e78cf2d commit https://github.com/vim/vim/commit/7707344ddec9069b495b2a5ed41f2104466fc88b Christian Brabandt <cb@256bit.org> parents: 8031 diff changeset	5113 case VAR_CHANNEL:
24818 fcab26a7fd4d patch 8.2.2947: build failure without the channel feature Bram Moolenaar <Bram@vim.org> parents: 24812 diff changeset	5114 #ifdef FEAT_JOB_CHANNEL
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5115 *tofree = NULL;
24812 8fdf839af1f4 patch 8.2.2944: Vim9: no error when using job or channel as a string Bram Moolenaar <Bram@vim.org> parents: 24780 diff changeset	5116 r = tv->v_type == VAR_JOB ? job_to_string_buf(tv, numbuf)
8fdf839af1f4 patch 8.2.2944: Vim9: no error when using job or channel as a string Bram Moolenaar <Bram@vim.org> parents: 24780 diff changeset	5117 : channel_to_string_buf(tv, numbuf);
11973 aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	5118 if (composite_val)
aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	5119 {
aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	5120 *tofree = string_quote(r, FALSE);
aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	5121 r = *tofree;
aec3df2af27c patch 8.0.0867: job and channel in a dict value not quoted Christian Brabandt <cb@256bit.org> parents: 11848 diff changeset	5122 }
24818 fcab26a7fd4d patch 8.2.2947: build failure without the channel feature Bram Moolenaar <Bram@vim.org> parents: 24812 diff changeset	5123 #endif
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5124 break;
634 1c586ee8dd45 updated for version 7.0183 vimboss parents: 630 diff changeset	5125
24606 a4fda40e0bb9 patch 8.2.2842: Vim9: skip argument to searchpair() is not compiled Bram Moolenaar <Bram@vim.org> parents: 24553 diff changeset	5126 case VAR_INSTR:
a4fda40e0bb9 patch 8.2.2842: Vim9: skip argument to searchpair() is not compiled Bram Moolenaar <Bram@vim.org> parents: 24553 diff changeset	5127 *tofree = NULL;
a4fda40e0bb9 patch 8.2.2842: Vim9: skip argument to searchpair() is not compiled Bram Moolenaar <Bram@vim.org> parents: 24553 diff changeset	5128 r = (char_u *)"instructions";
a4fda40e0bb9 patch 8.2.2842: Vim9: skip argument to searchpair() is not compiled Bram Moolenaar <Bram@vim.org> parents: 24553 diff changeset	5129 break;
a4fda40e0bb9 patch 8.2.2842: Vim9: skip argument to searchpair() is not compiled Bram Moolenaar <Bram@vim.org> parents: 24553 diff changeset	5130
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	5131 case VAR_FLOAT:
7957 b74549818500 commit https://github.com/vim/vim/commit/835dc636a5350f610b62f110227d2363b5b2880a Christian Brabandt <cb@256bit.org> parents: 7955 diff changeset	5132 #ifdef FEAT_FLOAT
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	5133 *tofree = NULL;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	5134 vim_snprintf((char *)numbuf, NUMBUFLEN, "%g", tv->vval.v_float);
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	5135 r = numbuf;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	5136 break;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	5137 #endif
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	5138
19102 ba9f50bfda83 patch 8.2.0111: VAR_SPECIAL is also used for booleans Bram Moolenaar <Bram@vim.org> parents: 19087 diff changeset	5139 case VAR_BOOL:
7712 bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	5140 case VAR_SPECIAL:
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	5141 *tofree = NULL;
7730 80ce794827c4 commit https://github.com/vim/vim/commit/17a13437c9414a8693369a97f3be2fc8ad48c12e Christian Brabandt <cb@256bit.org> parents: 7720 diff changeset	5142 r = (char_u *)get_var_special_name(tv->vval.v_number);
7712 bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7705 diff changeset	5143 break;
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5144 }
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5145
5973 99d8f2d72dcd updated for version 7.4.327 Bram Moolenaar <bram@vim.org> parents: 5964 diff changeset	5146 if (--recurse == 0)
99d8f2d72dcd updated for version 7.4.327 Bram Moolenaar <bram@vim.org> parents: 5964 diff changeset	5147 did_echo_string_emsg = FALSE;
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5148 return r;
97 d4f3db33d782 updated for version 7.0037 vimboss parents: 92 diff changeset	5149 }
d4f3db33d782 updated for version 7.0037 vimboss parents: 92 diff changeset	5150
d4f3db33d782 updated for version 7.0037 vimboss parents: 92 diff changeset	5151 /*
d4f3db33d782 updated for version 7.0037 vimboss parents: 92 diff changeset	5152 * Return a string with the string representation of a variable.
d4f3db33d782 updated for version 7.0037 vimboss parents: 92 diff changeset	5153 * If the memory is allocated "tofree" is set to it, otherwise NULL.
d4f3db33d782 updated for version 7.0037 vimboss parents: 92 diff changeset	5154 * "numbuf" is used for a number.
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5155 * Does not put quotes around strings, as ":echo" displays values.
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5156 * When "copyID" is not NULL replace recursive lists and dicts with "...".
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5157 * May return NULL.
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5158 */
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	5159 char_u *
9157 e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5160 echo_string(
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5161 typval_T *tv,
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5162 char_u **tofree,
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5163 char_u *numbuf,
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5164 int copyID)
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5165 {
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5166 return echo_string_core(tv, tofree, numbuf, copyID, TRUE, FALSE, FALSE);
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5167 }
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5168
e316b83892c1 commit https://github.com/vim/vim/commit/18dfb4404a618c52ee7138630a2381aed4d66eaf Christian Brabandt <cb@256bit.org> parents: 9153 diff changeset	5169 /*
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5170 * Convert the specified byte index of line 'lnum' in buffer 'buf' to a
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5171 * character index. Works only for loaded buffers. Returns -1 on failure.
23600 f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5172 * The index of the first byte and the first character is zero.
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5173 */
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5174 int
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5175 buf_byteidx_to_charidx(buf_T *buf, int lnum, int byteidx)
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5176 {
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5177 char_u *str;
23600 f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5178 char_u *t;
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5179 int count;
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5180
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5181 if (buf == NULL \|\| buf->b_ml.ml_mfp == NULL)
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5182 return -1;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5183
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5184 if (lnum > buf->b_ml.ml_line_count)
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5185 lnum = buf->b_ml.ml_line_count;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5186
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5187 str = ml_get_buf(buf, lnum, FALSE);
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5188 if (str == NULL)
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5189 return -1;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5190
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5191 if (*str == NUL)
23600 f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5192 return 0;
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5193
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5194 // count the number of characters
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5195 t = str;
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5196 for (count = 0; *t != NUL && t <= str + byteidx; count++)
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5197 t += mb_ptr2len(t);
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5198
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5199 // In insert mode, when the cursor is at the end of a non-empty line,
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5200 // byteidx points to the NUL character immediately past the end of the
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5201 // string. In this case, add one to the character count.
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5202 if (*t == NUL && byteidx != 0 && t == str + byteidx)
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5203 count++;
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5204
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5205 return count - 1;
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5206 }
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5207
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5208 /*
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5209 * Convert the specified character index of line 'lnum' in buffer 'buf' to a
23600 f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5210 * byte index. Works only for loaded buffers. Returns -1 on failure.
f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5211 * The index of the first byte and the first character is zero.
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5212 */
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5213 int
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5214 buf_charidx_to_byteidx(buf_T *buf, int lnum, int charidx)
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5215 {
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5216 char_u *str;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5217 char_u *t;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5218
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5219 if (buf == NULL \|\| buf->b_ml.ml_mfp == NULL)
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5220 return -1;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5221
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5222 if (lnum > buf->b_ml.ml_line_count)
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5223 lnum = buf->b_ml.ml_line_count;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5224
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5225 str = ml_get_buf(buf, lnum, FALSE);
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5226 if (str == NULL)
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5227 return -1;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5228
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5229 // Convert the character offset to a byte offset
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5230 t = str;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5231 while (*t != NUL && --charidx > 0)
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5232 t += mb_ptr2len(t);
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5233
23600 f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5234 return t - str;
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5235 }
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5236
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5237 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5238 * Translate a String variable into a position.
685 d7e33248b9c8 updated for version 7.0206 vimboss parents: 681 diff changeset	5239 * Returns NULL when there is an error.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5240 */
9571 5eaa708ab50d commit https://github.com/vim/vim/commit/73dad1e64cb42842d8259cb1a255a6fa59822f76 Christian Brabandt <cb@256bit.org> parents: 9562 diff changeset	5241 pos_T *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5242 var2fpos(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5243 typval_T *varp,
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5244 int dollar_lnum, // TRUE when $ is last line
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5245 int *fnum, // set to fnum for '0, 'A, etc.
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5246 int charcol) // return character column
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5247 {
700 c78d973dce9e updated for version 7.0211 vimboss parents: 697 diff changeset	5248 char_u *name;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5249 static pos_T pos;
700 c78d973dce9e updated for version 7.0211 vimboss parents: 697 diff changeset	5250 pos_T *pp;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5251
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5252 // Argument can be [lnum, col, coladd].
685 d7e33248b9c8 updated for version 7.0206 vimboss parents: 681 diff changeset	5253 if (varp->v_type == VAR_LIST)
d7e33248b9c8 updated for version 7.0206 vimboss parents: 681 diff changeset	5254 {
d7e33248b9c8 updated for version 7.0206 vimboss parents: 681 diff changeset	5255 list_T *l;
d7e33248b9c8 updated for version 7.0206 vimboss parents: 681 diff changeset	5256 int len;
705 69e8006af734 updated for version 7.0212 vimboss parents: 700 diff changeset	5257 int error = FALSE;
1317 45bae37de037 updated for version 7.1-031 vimboss parents: 1311 diff changeset	5258 listitem_T *li;
685 d7e33248b9c8 updated for version 7.0206 vimboss parents: 681 diff changeset	5259
d7e33248b9c8 updated for version 7.0206 vimboss parents: 681 diff changeset	5260 l = varp->vval.v_list;
d7e33248b9c8 updated for version 7.0206 vimboss parents: 681 diff changeset	5261 if (l == NULL)
d7e33248b9c8 updated for version 7.0206 vimboss parents: 681 diff changeset	5262 return NULL;
d7e33248b9c8 updated for version 7.0206 vimboss parents: 681 diff changeset	5263
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5264 // Get the line number
705 69e8006af734 updated for version 7.0212 vimboss parents: 700 diff changeset	5265 pos.lnum = list_find_nr(l, 0L, &error);
69e8006af734 updated for version 7.0212 vimboss parents: 700 diff changeset	5266 if (error \|\| pos.lnum <= 0 \|\| pos.lnum > curbuf->b_ml.ml_line_count)
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5267 return NULL; // invalid line number
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5268 if (charcol)
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5269 len = (long)mb_charlen(ml_get(pos.lnum));
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5270 else
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5271 len = (long)STRLEN(ml_get(pos.lnum));
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5272
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5273 // Get the column number
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5274 // We accept "$" for the column number: last column.
1317 45bae37de037 updated for version 7.1-031 vimboss parents: 1311 diff changeset	5275 li = list_find(l, 1L);
45bae37de037 updated for version 7.1-031 vimboss parents: 1311 diff changeset	5276 if (li != NULL && li->li_tv.v_type == VAR_STRING
45bae37de037 updated for version 7.1-031 vimboss parents: 1311 diff changeset	5277 && li->li_tv.vval.v_string != NULL
45bae37de037 updated for version 7.1-031 vimboss parents: 1311 diff changeset	5278 && STRCMP(li->li_tv.vval.v_string, "$") == 0)
21899 8fe86125dcba patch 8.2.1499: Vim9: error when using "$" with col() Bram Moolenaar <Bram@vim.org> parents: 21889 diff changeset	5279 {
1317 45bae37de037 updated for version 7.1-031 vimboss parents: 1311 diff changeset	5280 pos.col = len + 1;
21899 8fe86125dcba patch 8.2.1499: Vim9: error when using "$" with col() Bram Moolenaar <Bram@vim.org> parents: 21889 diff changeset	5281 }
8fe86125dcba patch 8.2.1499: Vim9: error when using "$" with col() Bram Moolenaar <Bram@vim.org> parents: 21889 diff changeset	5282 else
8fe86125dcba patch 8.2.1499: Vim9: error when using "$" with col() Bram Moolenaar <Bram@vim.org> parents: 21889 diff changeset	5283 {
8fe86125dcba patch 8.2.1499: Vim9: error when using "$" with col() Bram Moolenaar <Bram@vim.org> parents: 21889 diff changeset	5284 pos.col = list_find_nr(l, 1L, &error);
8fe86125dcba patch 8.2.1499: Vim9: error when using "$" with col() Bram Moolenaar <Bram@vim.org> parents: 21889 diff changeset	5285 if (error)
8fe86125dcba patch 8.2.1499: Vim9: error when using "$" with col() Bram Moolenaar <Bram@vim.org> parents: 21889 diff changeset	5286 return NULL;
8fe86125dcba patch 8.2.1499: Vim9: error when using "$" with col() Bram Moolenaar <Bram@vim.org> parents: 21889 diff changeset	5287 }
1317 45bae37de037 updated for version 7.1-031 vimboss parents: 1311 diff changeset	5288
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5289 // Accept a position up to the NUL after the line.
826 1cdd2661f34c updated for version 7.0d01 vimboss parents: 819 diff changeset	5290 if (pos.col == 0 \|\| (int)pos.col > len + 1)
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5291 return NULL; // invalid column number
705 69e8006af734 updated for version 7.0212 vimboss parents: 700 diff changeset	5292 --pos.col;
69e8006af734 updated for version 7.0212 vimboss parents: 700 diff changeset	5293
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5294 // Get the virtual offset. Defaults to zero.
705 69e8006af734 updated for version 7.0212 vimboss parents: 700 diff changeset	5295 pos.coladd = list_find_nr(l, 2L, &error);
69e8006af734 updated for version 7.0212 vimboss parents: 700 diff changeset	5296 if (error)
69e8006af734 updated for version 7.0212 vimboss parents: 700 diff changeset	5297 pos.coladd = 0;
69e8006af734 updated for version 7.0212 vimboss parents: 700 diff changeset	5298
685 d7e33248b9c8 updated for version 7.0206 vimboss parents: 681 diff changeset	5299 return &pos;
d7e33248b9c8 updated for version 7.0206 vimboss parents: 681 diff changeset	5300 }
d7e33248b9c8 updated for version 7.0206 vimboss parents: 681 diff changeset	5301
24250 01b274c3f69b patch 8.2.2666: Vim9: not enough function arguments checked for string Bram Moolenaar <Bram@vim.org> parents: 24240 diff changeset	5302 if (in_vim9script() && check_for_string_arg(varp, 0) == FAIL)
01b274c3f69b patch 8.2.2666: Vim9: not enough function arguments checked for string Bram Moolenaar <Bram@vim.org> parents: 24240 diff changeset	5303 return NULL;
01b274c3f69b patch 8.2.2666: Vim9: not enough function arguments checked for string Bram Moolenaar <Bram@vim.org> parents: 24240 diff changeset	5304
15211 de63593896b3 patch 8.1.0615: get_tv function names are not consistent Bram Moolenaar <Bram@vim.org> parents: 15146 diff changeset	5305 name = tv_get_string_chk(varp);
323 03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	5306 if (name == NULL)
03b3684919e3 updated for version 7.0084 vimboss parents: 315 diff changeset	5307 return NULL;
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5308 if (name[0] == '.') // cursor
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5309 {
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5310 pos = curwin->w_cursor;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5311 if (charcol)
23600 f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5312 pos.col = buf_byteidx_to_charidx(curbuf, pos.lnum, pos.col);
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5313 return &pos;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5314 }
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5315 if (name[0] == 'v' && name[1] == NUL) // Visual start
1609 1324b7b755f3 updated for version 7.1-322 vimboss parents: 1591 diff changeset	5316 {
1324b7b755f3 updated for version 7.1-322 vimboss parents: 1591 diff changeset	5317 if (VIsual_active)
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5318 pos = VIsual;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5319 else
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5320 pos = curwin->w_cursor;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5321 if (charcol)
23600 f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5322 pos.col = buf_byteidx_to_charidx(curbuf, pos.lnum, pos.col);
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5323 return &pos;
1609 1324b7b755f3 updated for version 7.1-322 vimboss parents: 1591 diff changeset	5324 }
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5325 if (name[0] == '\'') // mark
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5326 {
4043 80b041b994d1 updated for version 7.3.776 Bram Moolenaar <bram@vim.org> parents: 3986 diff changeset	5327 pp = getmark_buf_fnum(curbuf, name[1], FALSE, fnum);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5328 if (pp == NULL \|\| pp == (pos_T *)-1 \|\| pp->lnum <= 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5329 return NULL;
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5330 if (charcol)
23600 f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5331 pp->col = buf_byteidx_to_charidx(curbuf, pp->lnum, pp->col);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5332 return pp;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5333 }
705 69e8006af734 updated for version 7.0212 vimboss parents: 700 diff changeset	5334
69e8006af734 updated for version 7.0212 vimboss parents: 700 diff changeset	5335 pos.coladd = 0;
69e8006af734 updated for version 7.0212 vimboss parents: 700 diff changeset	5336
1317 45bae37de037 updated for version 7.1-031 vimboss parents: 1311 diff changeset	5337 if (name[0] == 'w' && dollar_lnum)
666 0137e7c3d31b updated for version 7.0196 vimboss parents: 659 diff changeset	5338 {
0137e7c3d31b updated for version 7.0196 vimboss parents: 659 diff changeset	5339 pos.col = 0;
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5340 if (name[1] == '0') // "w0": first visible line
666 0137e7c3d31b updated for version 7.0196 vimboss parents: 659 diff changeset	5341 {
671 83a006f81bac updated for version 7.0199 vimboss parents: 667 diff changeset	5342 update_topline();
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5343 // In silent Ex mode topline is zero, but that's not a valid line
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5344 // number; use one instead.
11313 327a04a762f6 patch 8.0.0542: getpos() can return a negative line number Christian Brabandt <cb@256bit.org> parents: 11181 diff changeset	5345 pos.lnum = curwin->w_topline > 0 ? curwin->w_topline : 1;
666 0137e7c3d31b updated for version 7.0196 vimboss parents: 659 diff changeset	5346 return &pos;
0137e7c3d31b updated for version 7.0196 vimboss parents: 659 diff changeset	5347 }
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5348 else if (name[1] == '$') // "w$": last visible line
666 0137e7c3d31b updated for version 7.0196 vimboss parents: 659 diff changeset	5349 {
671 83a006f81bac updated for version 7.0199 vimboss parents: 667 diff changeset	5350 validate_botline();
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5351 // In silent Ex mode botline is zero, return zero then.
11313 327a04a762f6 patch 8.0.0542: getpos() can return a negative line number Christian Brabandt <cb@256bit.org> parents: 11181 diff changeset	5352 pos.lnum = curwin->w_botline > 0 ? curwin->w_botline - 1 : 0;
666 0137e7c3d31b updated for version 7.0196 vimboss parents: 659 diff changeset	5353 return &pos;
0137e7c3d31b updated for version 7.0196 vimboss parents: 659 diff changeset	5354 }
0137e7c3d31b updated for version 7.0196 vimboss parents: 659 diff changeset	5355 }
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5356 else if (name[0] == '$') // last column or line
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5357 {
1317 45bae37de037 updated for version 7.1-031 vimboss parents: 1311 diff changeset	5358 if (dollar_lnum)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5359 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5360 pos.lnum = curbuf->b_ml.ml_line_count;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5361 pos.col = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5362 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5363 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5364 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5365 pos.lnum = curwin->w_cursor.lnum;
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5366 if (charcol)
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5367 pos.col = (colnr_T)mb_charlen(ml_get_curline());
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5368 else
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5369 pos.col = (colnr_T)STRLEN(ml_get_curline());
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5370 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5371 return &pos;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5372 }
25216 9ead67e3c696 patch 8.2.3144: Vim9: no error when using an invalid value for a line number Bram Moolenaar <Bram@vim.org> parents: 25206 diff changeset	5373 if (in_vim9script())
9ead67e3c696 patch 8.2.3144: Vim9: no error when using an invalid value for a line number Bram Moolenaar <Bram@vim.org> parents: 25206 diff changeset	5374 semsg(_(e_invalid_value_for_line_number_str), name);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5375 return NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5376 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5377
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5378 /*
709 ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5379 * Convert list in "arg" into a position and optional file number.
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5380 * When "fnump" is NULL there is no file number, only 3 items.
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5381 * Note that the column is passed on as-is, the caller may want to decrement
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5382 * it to use 1 for the first column.
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5383 * Return FAIL when conversion is not possible, doesn't check the position for
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5384 * validity.
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5385 */
9571 5eaa708ab50d commit https://github.com/vim/vim/commit/73dad1e64cb42842d8259cb1a255a6fa59822f76 Christian Brabandt <cb@256bit.org> parents: 9562 diff changeset	5386 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5387 list2fpos(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5388 typval_T *arg,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5389 pos_T *posp,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5390 int *fnump,
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5391 colnr_T *curswantp,
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5392 int charcol)
709 ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5393 {
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5394 list_T *l = arg->vval.v_list;
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5395 long i = 0;
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5396 long n;
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5397
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5398 // List must be: [fnum, lnum, col, coladd, curswant], where "fnum" is only
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5399 // there when "fnump" isn't NULL; "coladd" and "curswant" are optional.
915 d87865573d80 updated for version 7.0-041 vimboss parents: 914 diff changeset	5400 if (arg->v_type != VAR_LIST
d87865573d80 updated for version 7.0-041 vimboss parents: 914 diff changeset	5401 \|\| l == NULL
d87865573d80 updated for version 7.0-041 vimboss parents: 914 diff changeset	5402 \|\| l->lv_len < (fnump == NULL ? 2 : 3)
5938 ccac0aa34eea updated for version 7.4.310 Bram Moolenaar <bram@vim.org> parents: 5930 diff changeset	5403 \|\| l->lv_len > (fnump == NULL ? 4 : 5))
709 ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5404 return FAIL;
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5405
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5406 if (fnump != NULL)
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5407 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5408 n = list_find_nr(l, i++, NULL); // fnum
709 ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5409 if (n < 0)
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5410 return FAIL;
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5411 if (n == 0)
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5412 n = curbuf->b_fnum; // current buffer
709 ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5413 *fnump = n;
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5414 }
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5415
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5416 n = list_find_nr(l, i++, NULL); // lnum
709 ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5417 if (n < 0)
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5418 return FAIL;
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5419 posp->lnum = n;
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5420
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5421 n = list_find_nr(l, i++, NULL); // col
709 ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5422 if (n < 0)
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5423 return FAIL;
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5424 // If character position is specified, then convert to byte position
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5425 if (charcol)
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5426 {
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5427 buf_T *buf;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5428
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5429 // Get the text for the specified line in a loaded buffer
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5430 buf = buflist_findnr(fnump == NULL ? curbuf->b_fnum : *fnump);
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5431 if (buf == NULL \|\| buf->b_ml.ml_mfp == NULL)
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5432 return FAIL;
87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5433
23600 f4347a61ed38 patch 8.2.2342: "char" functions may return wrong column in Insert mode Bram Moolenaar <Bram@vim.org> parents: 23563 diff changeset	5434 n = buf_charidx_to_byteidx(buf, posp->lnum, n) + 1;
23563 87671ccc6c6b patch 8.2.2324: not easy to get mark en cursor posotion by character count Bram Moolenaar <Bram@vim.org> parents: 23553 diff changeset	5435 }
709 ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5436 posp->col = n;
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5437
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5438 n = list_find_nr(l, i, NULL); // off
709 ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5439 if (n < 0)
915 d87865573d80 updated for version 7.0-041 vimboss parents: 914 diff changeset	5440 posp->coladd = 0;
d87865573d80 updated for version 7.0-041 vimboss parents: 914 diff changeset	5441 else
d87865573d80 updated for version 7.0-041 vimboss parents: 914 diff changeset	5442 posp->coladd = n;
709 ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5443
5938 ccac0aa34eea updated for version 7.4.310 Bram Moolenaar <bram@vim.org> parents: 5930 diff changeset	5444 if (curswantp != NULL)
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5445 *curswantp = list_find_nr(l, i + 1, NULL); // curswant
5938 ccac0aa34eea updated for version 7.4.310 Bram Moolenaar <bram@vim.org> parents: 5930 diff changeset	5446
709 ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5447 return OK;
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5448 }
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5449
ecee28dd16d2 updated for version 7.0213 vimboss parents: 705 diff changeset	5450 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5451 * Get the length of an environment variable name.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5452 * Advance "arg" to the first character after the name.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5453 * Return 0 for error.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5454 */
17873 d50a5faa75bd patch 8.1.1933: the eval.c file is too big Bram Moolenaar <Bram@vim.org> parents: 17833 diff changeset	5455 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5456 get_env_len(char_u **arg)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5457 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5458 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5459 int len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5460
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5461 for (p = arg; vim_isIDc(p); ++p)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5462 ;
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5463 if (p == *arg) // no name found
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5464 return 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5465
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5466 len = (int)(p - *arg);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5467 *arg = p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5468 return len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5469 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5470
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5471 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5472 * Get the length of the name of a function or internal variable.
21630 3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	5473 * "arg" is advanced to after the name.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5474 * Return 0 if something is wrong.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5475 */
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	5476 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5477 get_id_len(char_u **arg)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5478 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5479 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5480 int len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5481
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5482 // Find the end of the name.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5483 for (p = arg; eval_isnamec(p); ++p)
7611 9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5484 {
9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5485 if (*p == ':')
9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5486 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5487 // "s:" is start of "s:var", but "n:" is not and can be used in
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5488 // slice "[n:]". Also "xx:" is not a namespace.
7611 9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5489 len = (int)(p - *arg);
9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5490 if ((len == 1 && vim_strchr(NAMESPACE_CHAR, **arg) == NULL)
9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5491 \|\| len > 1)
9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5492 break;
9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5493 }
9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5494 }
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5495 if (p == *arg) // no name found
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5496 return 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5497
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5498 len = (int)(p - *arg);
21630 3c6c52fbc8ea patch 8.2.1365: Vim9: no error for missing white space around operator Bram Moolenaar <Bram@vim.org> parents: 21622 diff changeset	5499 *arg = p;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5500
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5501 return len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5502 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5503
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5504 /*
124 f455396f3c3f updated for version 7.0043 vimboss parents: 121 diff changeset	5505 * Get the length of the name of a variable or function.
f455396f3c3f updated for version 7.0043 vimboss parents: 121 diff changeset	5506 * Only the name is recognized, does not handle ".key" or "[idx]".
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5507 * "arg" is advanced to the first non-white character after the name.
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5508 * Return -1 if curly braces expansion failed.
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5509 * Return 0 if something else is wrong.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5510 * If the name contains 'magic' {}'s, expand them and return the
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5511 * expanded name in an allocated string via 'alias' - caller must free.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5512 */
17873 d50a5faa75bd patch 8.1.1933: the eval.c file is too big Bram Moolenaar <Bram@vim.org> parents: 17833 diff changeset	5513 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5514 get_name_len(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5515 char_u **arg,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5516 char_u **alias,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5517 int evaluate,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5518 int verbose)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5519 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5520 int len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5521 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5522 char_u *expr_start;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5523 char_u *expr_end;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5524
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5525 *alias = NULL; // default to no alias
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5526
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5527 if ((arg)[0] == K_SPECIAL && (arg)[1] == KS_EXTRA
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5528 && (*arg)[2] == (int)KE_SNR)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5529 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5530 // hard coded <SNR>, already translated
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5531 *arg += 3;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5532 return get_id_len(arg) + 3;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5533 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5534 len = eval_fname_script(*arg);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5535 if (len > 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5536 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5537 // literal "<SID>", "s:" or "<SNR>"
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5538 *arg += len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5539 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5540
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5541 /*
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5542 * Find the end of the name; check for {} construction.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5543 */
271 8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	5544 p = find_name_end(*arg, &expr_start, &expr_end,
8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	5545 len > 0 ? 0 : FNE_CHECK_START);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5546 if (expr_start != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5547 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5548 char_u *temp_string;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5549
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5550 if (!evaluate)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5551 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5552 len += (int)(p - *arg);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5553 *arg = skipwhite(p);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5554 return len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5555 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5556
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5557 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5558 * Include any <SID> etc in the expanded string:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5559 * Thus the -len here.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5560 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5561 temp_string = make_expanded_name(*arg - len, expr_start, expr_end, p);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5562 if (temp_string == NULL)
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5563 return -1;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5564 *alias = temp_string;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5565 *arg = skipwhite(p);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5566 return (int)STRLEN(temp_string);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5567 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5568
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5569 len += get_id_len(arg);
15464 3faa7cc8207c patch 8.1.0740: Tcl test fails Bram Moolenaar <Bram@vim.org> parents: 15460 diff changeset	5570 // Only give an error when there is something, otherwise it will be
3faa7cc8207c patch 8.1.0740: Tcl test fails Bram Moolenaar <Bram@vim.org> parents: 15460 diff changeset	5571 // reported at a higher level.
3faa7cc8207c patch 8.1.0740: Tcl test fails Bram Moolenaar <Bram@vim.org> parents: 15460 diff changeset	5572 if (len == 0 && verbose && **arg != NUL)
25064 8f2262c72178 patch 8.2.3069: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25054 diff changeset	5573 semsg(_(e_invalid_expression_str), *arg);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5574
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5575 return len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5576 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5577
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5578 /*
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5579 * Find the end of a variable or function name, taking care of magic braces.
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5580 * If "expr_start" is not NULL then "expr_start" and "expr_end" are set to the
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5581 * start and end of the first magic braces item.
271 8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	5582 * "flags" can have FNE_INCL_BR and FNE_CHECK_START.
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5583 * Return a pointer to just after the name. Equal to "arg" if there is no
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5584 * valid name.
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5585 */
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	5586 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5587 find_name_end(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5588 char_u *arg,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5589 char_u **expr_start,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5590 char_u **expr_end,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5591 int flags)
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5592 {
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5593 int mb_nest = 0;
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5594 int br_nest = 0;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5595 char_u *p;
7611 9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5596 int len;
21279 8d1d11afd8c8 patch 8.2.1190: Vim9: checking for Vim9 syntax is spread out Bram Moolenaar <Bram@vim.org> parents: 21277 diff changeset	5597 int vim9script = in_vim9script();
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5598
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5599 if (expr_start != NULL)
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5600 {
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5601 *expr_start = NULL;
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5602 *expr_end = NULL;
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5603 }
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5604
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5605 // Quick check for valid starting character.
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20061 diff changeset	5606 if ((flags & FNE_CHECK_START) && !eval_isnamec1(*arg)
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20061 diff changeset	5607 && (*arg != '{' \|\| vim9script))
271 8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	5608 return arg;
8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	5609
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5610 for (p = arg; *p != NUL
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5611 && (eval_isnamec(*p)
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20061 diff changeset	5612 \|\| (*p == '{' && !vim9script)
21447 369cde0d5771 patch 8.2.1274: Vim9: no error for missing white space at script level Bram Moolenaar <Bram@vim.org> parents: 21443 diff changeset	5613 \|\| ((flags & FNE_INCL_BR) && (*p == '['
21512 81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5614 \|\| (*p == '.' && eval_isdictc(p[1]))))
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5615 \|\| mb_nest != 0
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 10964 diff changeset	5616 \|\| br_nest != 0); MB_PTR_ADV(p))
468 0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5617 {
0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5618 if (*p == '\'')
0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5619 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5620 // skip over 'string' to avoid counting [ and ] inside it.
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 10964 diff changeset	5621 for (p = p + 1; p != NUL && p != '\''; MB_PTR_ADV(p))
468 0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5622 ;
0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5623 if (*p == NUL)
0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5624 break;
0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5625 }
0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5626 else if (*p == '"')
0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5627 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5628 // skip over "str\"ing" to avoid counting [ and ] inside it.
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 10964 diff changeset	5629 for (p = p + 1; p != NUL && p != '"'; MB_PTR_ADV(p))
468 0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5630 if (*p == '\\' && p[1] != NUL)
0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5631 ++p;
0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5632 if (*p == NUL)
0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5633 break;
0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5634 }
7611 9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5635 else if (br_nest == 0 && mb_nest == 0 && *p == ':')
9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5636 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5637 // "s:" is start of "s:var", but "n:" is not and can be used in
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5638 // slice "[n:]". Also "xx:" is not a namespace. But {ns}: is.
7611 9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5639 len = (int)(p - arg);
9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5640 if ((len == 1 && vim_strchr(NAMESPACE_CHAR, *arg) == NULL)
7627 d9ec7d22494d commit https://github.com/vim/vim/commit/4119cf80e1e534057680f9543e73edf7967c2440 Christian Brabandt <cb@256bit.org> parents: 7615 diff changeset	5641 \|\| (len > 1 && p[-1] != '}'))
7611 9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5642 break;
9c420b8db435 commit https://github.com/vim/vim/commit/9bbf63dbf8286fadc0cd6b3428010abb67b1b64d Christian Brabandt <cb@256bit.org> parents: 7605 diff changeset	5643 }
468 0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5644
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5645 if (mb_nest == 0)
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5646 {
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5647 if (*p == '[')
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5648 ++br_nest;
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5649 else if (*p == ']')
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5650 --br_nest;
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5651 }
468 0a60be12e47e updated for version 7.0125 vimboss parents: 464 diff changeset	5652
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20061 diff changeset	5653 if (br_nest == 0 && !vim9script)
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5654 {
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5655 if (*p == '{')
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5656 {
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5657 mb_nest++;
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5658 if (expr_start != NULL && *expr_start == NULL)
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5659 *expr_start = p;
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5660 }
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5661 else if (*p == '}')
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5662 {
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5663 mb_nest--;
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5664 if (expr_start != NULL && mb_nest == 0 && *expr_end == NULL)
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5665 *expr_end = p;
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5666 }
7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	5667 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5668 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5669
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5670 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5671 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5672
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5673 /*
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5674 * Expands out the 'magic' {}'s in a variable/function name.
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5675 * Note that this can call itself recursively, to deal with
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5676 * constructs like foo{bar}{baz}{bam}
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5677 * The four pointer arguments point to "foo{expre}ss{ion}bar"
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5678 * "in_start" ^
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5679 * "expr_start" ^
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5680 * "expr_end" ^
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5681 * "in_end" ^
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5682 *
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5683 * Returns a new allocated string, which the caller must free.
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5684 * Returns NULL for failure.
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5685 */
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5686 static char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5687 make_expanded_name(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5688 char_u *in_start,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5689 char_u *expr_start,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5690 char_u *expr_end,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5691 char_u *in_end)
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5692 {
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5693 char_u c1;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5694 char_u *retval = NULL;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5695 char_u *temp_result;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5696
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5697 if (expr_end == NULL \|\| in_end == NULL)
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5698 return NULL;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5699 *expr_start = NUL;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5700 *expr_end = NUL;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5701 c1 = *in_end;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5702 *in_end = NUL;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5703
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	5704 temp_result = eval_to_string(expr_start + 1, FALSE);
3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20992 diff changeset	5705 if (temp_result != NULL)
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5706 {
16764 ef00b6bc186b patch 8.1.1384: using "int" for alloc() often results in compiler warnings Bram Moolenaar <Bram@vim.org> parents: 16706 diff changeset	5707 retval = alloc(STRLEN(temp_result) + (expr_start - in_start)
ef00b6bc186b patch 8.1.1384: using "int" for alloc() often results in compiler warnings Bram Moolenaar <Bram@vim.org> parents: 16706 diff changeset	5708 + (in_end - expr_end) + 1);
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5709 if (retval != NULL)
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5710 {
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5711 STRCPY(retval, in_start);
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5712 STRCAT(retval, temp_result);
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5713 STRCAT(retval, expr_end + 1);
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5714 }
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5715 }
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5716 vim_free(temp_result);
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5717
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5718 *in_end = c1; // put char back for error messages
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5719 *expr_start = '{';
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5720 *expr_end = '}';
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5721
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5722 if (retval != NULL)
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5723 {
271 8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	5724 temp_result = find_name_end(retval, &expr_start, &expr_end, 0);
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5725 if (expr_start != NULL)
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5726 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5727 // Further expansion!
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5728 temp_result = make_expanded_name(retval, expr_start,
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5729 expr_end, temp_result);
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5730 vim_free(retval);
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5731 retval = temp_result;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5732 }
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5733 }
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5734
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5735 return retval;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5736 }
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5737
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5738 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5739 * Return TRUE if character "c" can be used in a variable or function name.
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5740 * Does not include '{' or '}' for magic braces.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5741 */
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	5742 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5743 eval_isnamec(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5744 {
21512 81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5745 return ASCII_ISALNUM(c) \|\| c == '_' \|\| c == ':' \|\| c == AUTOLOAD_CHAR;
271 8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	5746 }
8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	5747
8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	5748 /*
8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	5749 * Return TRUE if character "c" can be used as the first character in a
8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	5750 * variable or function name (excluding '{' and '}').
8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	5751 */
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	5752 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5753 eval_isnamec1(int c)
271 8d34af900bae updated for version 7.0072 vimboss parents: 266 diff changeset	5754 {
21512 81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5755 return ASCII_ISALPHA(c) \|\| c == '_';
81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5756 }
81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5757
81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5758 /*
81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5759 * Return TRUE if character "c" can be used as the first character of a
81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5760 * dictionary key.
81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5761 */
81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5762 int
81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5763 eval_isdictc(int c)
81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5764 {
81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5765 return ASCII_ISALNUM(c) \|\| c == '_';
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5766 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5767
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	5768 /*
17612 e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	5769 * Handle:
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	5770 * - expr[expr], expr[expr:expr] subscript
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	5771 * - ".name" lookup
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	5772 * - function call with Funcref variable: func(expr)
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	5773 * - method call: var->method()
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	5774 *
e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	5775 * Can all be combined in any order: dict.func(expr)[idx]['func'](expr)->len()
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5776 */
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	5777 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5778 handle_subscript(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5779 char_u **arg,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5780 typval_T *rettv,
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	5781 evalarg_T *evalarg,
21032 f80e822a310d patch 8.2.1067: expression "!expr->func()" does not work Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	5782 int verbose) // give error messages
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5783 {
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	5784 int evaluate = evalarg != NULL
d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	5785 && (evalarg->eval_flags & EVAL_EVALUATE);
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5786 int ret = OK;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5787 dict_T *selfdict = NULL;
21142 165cea61e974 patch 8.2.1122: Vim9: line continuation in dict member not recognized Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	5788 int check_white = TRUE;
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5789 int getnext;
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5790 char_u *p;
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5791
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5792 while (ret == OK)
21142 165cea61e974 patch 8.2.1122: Vim9: line continuation in dict member not recognized Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	5793 {
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5794 // When at the end of the line and ".name" or "->{" or "->X" follows in
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5795 // the next line then consume the line break.
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5796 p = eval_next_non_blank(*arg, evalarg, &getnext);
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5797 if (getnext
21512 81c47a694479 patch 8.2.1306: checking for first character of dict key is inconsistent Bram Moolenaar <Bram@vim.org> parents: 21461 diff changeset	5798 && ((rettv->v_type == VAR_DICT && *p == '.' && eval_isdictc(p[1]))
24852 3c8bd1d392d1 patch 8.2.2964: Vim9: hang when using space after -> Bram Moolenaar <Bram@vim.org> parents: 24818 diff changeset	5799 \|\| (p[0] == '-' && p[1] == '>' && (p[2] == '{'
3c8bd1d392d1 patch 8.2.2964: Vim9: hang when using space after -> Bram Moolenaar <Bram@vim.org> parents: 24818 diff changeset	5800 \|\| ASCII_ISALPHA(in_vim9script() ? *skipwhite(p + 2)
3c8bd1d392d1 patch 8.2.2964: Vim9: hang when using space after -> Bram Moolenaar <Bram@vim.org> parents: 24818 diff changeset	5801 : p[2])))))
21142 165cea61e974 patch 8.2.1122: Vim9: line continuation in dict member not recognized Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	5802 {
165cea61e974 patch 8.2.1122: Vim9: line continuation in dict member not recognized Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	5803 *arg = eval_next_line(evalarg);
21865 c16af87df654 patch 8.2.1482: Vim9: crash when using a nested lambda Bram Moolenaar <Bram@vim.org> parents: 21861 diff changeset	5804 p = *arg;
21142 165cea61e974 patch 8.2.1122: Vim9: line continuation in dict member not recognized Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	5805 check_white = FALSE;
165cea61e974 patch 8.2.1122: Vim9: line continuation in dict member not recognized Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	5806 }
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5807
24112 0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5808 if (rettv->v_type == VAR_ANY)
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5809 {
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5810 char_u *exp_name;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5811 int cc;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5812 int idx;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5813 ufunc_T *ufunc;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5814 type_T *type;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5815
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5816 // Found script from "import * as {name}", script item name must
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5817 // follow.
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5818 if (**arg != '.')
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5819 {
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5820 if (verbose)
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5821 semsg(_(e_expected_str_but_got_str), "'.'", *arg);
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5822 ret = FAIL;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5823 break;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5824 }
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5825 ++*arg;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5826 if (IS_WHITE_OR_NUL(**arg))
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5827 {
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5828 if (verbose)
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5829 emsg(_(e_no_white_space_allowed_after_dot));
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5830 ret = FAIL;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5831 break;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5832 }
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5833
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5834 // isolate the name
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5835 exp_name = *arg;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5836 while (eval_isnamec(**arg))
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5837 ++*arg;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5838 cc = **arg;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5839 **arg = NUL;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5840
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5841 idx = find_exported(rettv->vval.v_number, exp_name, &ufunc, &type,
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5842 evalarg->eval_cctx, verbose);
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5843 **arg = cc;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5844 arg = skipwhite(arg);
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5845
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5846 if (idx < 0 && ufunc == NULL)
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5847 {
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5848 ret = FAIL;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5849 break;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5850 }
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5851 if (idx >= 0)
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5852 {
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5853 scriptitem_T *si = SCRIPT_ITEM(rettv->vval.v_number);
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5854 svar_T sv = ((svar_T )si->sn_var_vals.ga_data) + idx;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5855
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5856 copy_tv(sv->sv_tv, rettv);
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5857 }
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5858 else
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5859 {
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5860 rettv->v_type = VAR_FUNC;
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5861 rettv->vval.v_string = vim_strsave(ufunc->uf_name);
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5862 }
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5863 }
0346a59ed5bf patch 8.2.2597: Vim9: "import * as" does not work at script level Bram Moolenaar <Bram@vim.org> parents: 24063 diff changeset	5864
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5865 if ((**arg == '(' && (!evaluate \|\| rettv->v_type == VAR_FUNC
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5866 \|\| rettv->v_type == VAR_PARTIAL))
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5867 && (!check_white \|\| !VIM_ISWHITE((arg - 1))))
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5868 {
21118 b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	5869 ret = call_func_rettv(arg, evalarg, rettv, evaluate,
b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	5870 selfdict, NULL);
17674 06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	5871
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	5872 // Stop the expression evaluation when immediately aborting on
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	5873 // error, or when an interrupt occurred or an exception was thrown
06c3e15ad84d patch 8.1.1834: cannot use a lambda as a method Bram Moolenaar <Bram@vim.org> parents: 17661 diff changeset	5874 // but not caught.
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5875 if (aborting())
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5876 {
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5877 if (ret == OK)
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5878 clear_tv(rettv);
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5879 ret = FAIL;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5880 }
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5881 dict_unref(selfdict);
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5882 selfdict = NULL;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5883 }
21552 cbc570e66d11 patch 8.2.1326: Vim9: skipping over white space after list Bram Moolenaar <Bram@vim.org> parents: 21546 diff changeset	5884 else if (p[0] == '-' && p[1] == '>')
17612 e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	5885 {
24632 9e72076e31f8 patch 8.2.2855: white space after "->" does not give E274 Bram Moolenaar <Bram@vim.org> parents: 24618 diff changeset	5886 if (in_vim9script())
9e72076e31f8 patch 8.2.2855: white space after "->" does not give E274 Bram Moolenaar <Bram@vim.org> parents: 24618 diff changeset	5887 *arg = skipwhite(p + 2);
9e72076e31f8 patch 8.2.2855: white space after "->" does not give E274 Bram Moolenaar <Bram@vim.org> parents: 24618 diff changeset	5888 else
9e72076e31f8 patch 8.2.2855: white space after "->" does not give E274 Bram Moolenaar <Bram@vim.org> parents: 24618 diff changeset	5889 *arg = p + 2;
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	5890 if (ret == OK)
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	5891 {
24632 9e72076e31f8 patch 8.2.2855: white space after "->" does not give E274 Bram Moolenaar <Bram@vim.org> parents: 24618 diff changeset	5892 if (VIM_ISWHITE(**arg))
9e72076e31f8 patch 8.2.2855: white space after "->" does not give E274 Bram Moolenaar <Bram@vim.org> parents: 24618 diff changeset	5893 {
9e72076e31f8 patch 8.2.2855: white space after "->" does not give E274 Bram Moolenaar <Bram@vim.org> parents: 24618 diff changeset	5894 emsg(_(e_nowhitespace));
9e72076e31f8 patch 8.2.2855: white space after "->" does not give E274 Bram Moolenaar <Bram@vim.org> parents: 24618 diff changeset	5895 ret = FAIL;
9e72076e31f8 patch 8.2.2855: white space after "->" does not give E274 Bram Moolenaar <Bram@vim.org> parents: 24618 diff changeset	5896 }
9e72076e31f8 patch 8.2.2855: white space after "->" does not give E274 Bram Moolenaar <Bram@vim.org> parents: 24618 diff changeset	5897 else if ((arg == '{' && !in_vim9script()) \|\| arg == '(')
23428 5807e3958e38 patch 8.2.2257: Vim9: using -> for lambda is ambiguous Bram Moolenaar <Bram@vim.org> parents: 23416 diff changeset	5898 // expr->{lambda}() or expr->(lambda)()
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	5899 ret = eval_lambda(arg, rettv, evalarg, verbose);
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	5900 else
117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	5901 // expr->name()
21118 b0baa80cb53f patch 8.2.1110: Vim9: line continuation does not work in function arguments Bram Moolenaar <Bram@vim.org> parents: 21104 diff changeset	5902 ret = eval_method(arg, rettv, evalarg, verbose);
17763 117c7795a979 patch 8.1.1878: negative float before method not parsed correctly Bram Moolenaar <Bram@vim.org> parents: 17674 diff changeset	5903 }
17612 e259d11e2900 patch 8.1.1803: all builtin functions are global Bram Moolenaar <Bram@vim.org> parents: 17606 diff changeset	5904 }
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5905 // "." is ".name" lookup when we found a dict or when evaluating and
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5906 // scriptversion is at least 2, where string concatenation is "..".
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5907 else if (**arg == '['
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5908 \|\| (**arg == '.' && (rettv->v_type == VAR_DICT
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5909 \|\| (!evaluate
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5910 && (*arg)[1] != '.'
25622 15b54e0a576b patch 8.2.3347: check for legacy script is incomplete Bram Moolenaar <Bram@vim.org> parents: 25620 diff changeset	5911 && !in_old_script(2)))))
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5912 {
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5913 dict_unref(selfdict);
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5914 if (rettv->v_type == VAR_DICT)
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5915 {
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5916 selfdict = rettv->vval.v_dict;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5917 if (selfdict != NULL)
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5918 ++selfdict->dv_refcount;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5919 }
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5920 else
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5921 selfdict = NULL;
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	5922 if (eval_index(arg, rettv, evalarg, verbose) == FAIL)
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5923 {
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5924 clear_tv(rettv);
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5925 ret = FAIL;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5926 }
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5927 }
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5928 else
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21148 diff changeset	5929 break;
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5930 }
8575 b5209a4e5baf commit https://github.com/vim/vim/commit/ab1fa3955f25dfdb7e329c3bd76e175c93c8cb5e Christian Brabandt <cb@256bit.org> parents: 8554 diff changeset	5931
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5932 // Turn "dict.Func" into a partial for "Func" bound to "dict".
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5933 // Don't do this when "Func" is already a partial that was bound
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5934 // explicitly (pt_auto is FALSE).
9104 2242a5766417 commit https://github.com/vim/vim/commit/1d429610bf9e99a6252be8abbc910d6667e4d1da Christian Brabandt <cb@256bit.org> parents: 9093 diff changeset	5935 if (selfdict != NULL
2242a5766417 commit https://github.com/vim/vim/commit/1d429610bf9e99a6252be8abbc910d6667e4d1da Christian Brabandt <cb@256bit.org> parents: 9093 diff changeset	5936 && (rettv->v_type == VAR_FUNC
2242a5766417 commit https://github.com/vim/vim/commit/1d429610bf9e99a6252be8abbc910d6667e4d1da Christian Brabandt <cb@256bit.org> parents: 9093 diff changeset	5937 \|\| (rettv->v_type == VAR_PARTIAL
2242a5766417 commit https://github.com/vim/vim/commit/1d429610bf9e99a6252be8abbc910d6667e4d1da Christian Brabandt <cb@256bit.org> parents: 9093 diff changeset	5938 && (rettv->vval.v_partial->pt_auto
2242a5766417 commit https://github.com/vim/vim/commit/1d429610bf9e99a6252be8abbc910d6667e4d1da Christian Brabandt <cb@256bit.org> parents: 9093 diff changeset	5939 \|\| rettv->vval.v_partial->pt_dict == NULL))))
9562 86af4a48c00a commit https://github.com/vim/vim/commit/a9b579f3d7463720a316e11e77a7a9fbb9267986 Christian Brabandt <cb@256bit.org> parents: 9560 diff changeset	5940 selfdict = make_partial(selfdict, rettv);
8575 b5209a4e5baf commit https://github.com/vim/vim/commit/ab1fa3955f25dfdb7e329c3bd76e175c93c8cb5e Christian Brabandt <cb@256bit.org> parents: 8554 diff changeset	5941
159 389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5942 dict_unref(selfdict);
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5943 return ret;
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5944 }
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5945
389c8abd5925 updated for version 7.0048 vimboss parents: 156 diff changeset	5946 /*
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5947 * Make a copy of an item.
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5948 * Lists and Dictionaries are also copied. A deep copy if "deep" is set.
165 e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5949 * For deepcopy() "copyID" is zero for a full copy or the ID for when a
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5950 * reference to an already copied list/dict can be used.
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5951 * Returns FAIL or OK.
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5952 */
9556 afaff1d283d3 commit https://github.com/vim/vim/commit/cd52459c387785796713826c63174cdeed295dd4 Christian Brabandt <cb@256bit.org> parents: 9527 diff changeset	5953 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5954 item_copy(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5955 typval_T *from,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5956 typval_T *to,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5957 int deep,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	5958 int copyID)
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5959 {
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5960 static int recurse = 0;
165 e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5961 int ret = OK;
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5962
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	5963 if (recurse >= DICT_MAXNEST)
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5964 {
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	5965 emsg(_("E698: variable nested too deep for making a copy"));
165 e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5966 return FAIL;
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5967 }
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5968 ++recurse;
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5969
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5970 switch (from->v_type)
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5971 {
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5972 case VAR_NUMBER:
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	5973 case VAR_FLOAT:
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5974 case VAR_STRING:
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5975 case VAR_FUNC:
8538 c337c813c64d commit https://github.com/vim/vim/commit/1735bc988c546cc962c5f94792815b4d7cb79710 Christian Brabandt <cb@256bit.org> parents: 8536 diff changeset	5976 case VAR_PARTIAL:
19102 ba9f50bfda83 patch 8.2.0111: VAR_SPECIAL is also used for booleans Bram Moolenaar <Bram@vim.org> parents: 19087 diff changeset	5977 case VAR_BOOL:
7862 d4fec9208e7e commit https://github.com/vim/vim/commit/155500077c80cdb5d9c63996000c011b66a676bf Christian Brabandt <cb@256bit.org> parents: 7856 diff changeset	5978 case VAR_SPECIAL:
7957 b74549818500 commit https://github.com/vim/vim/commit/835dc636a5350f610b62f110227d2363b5b2880a Christian Brabandt <cb@256bit.org> parents: 7955 diff changeset	5979 case VAR_JOB:
8041 c6443e78cf2d commit https://github.com/vim/vim/commit/7707344ddec9069b495b2a5ed41f2104466fc88b Christian Brabandt <cb@256bit.org> parents: 8031 diff changeset	5980 case VAR_CHANNEL:
24606 a4fda40e0bb9 patch 8.2.2842: Vim9: skip argument to searchpair() is not compiled Bram Moolenaar <Bram@vim.org> parents: 24553 diff changeset	5981 case VAR_INSTR:
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5982 copy_tv(from, to);
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5983 break;
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5984 case VAR_LIST:
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5985 to->v_type = VAR_LIST;
151 40a0699b6c62 updated for version 7.0046 vimboss parents: 142 diff changeset	5986 to->v_lock = 0;
165 e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5987 if (from->vval.v_list == NULL)
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5988 to->vval.v_list = NULL;
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5989 else if (copyID != 0 && from->vval.v_list->lv_copyID == copyID)
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5990 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	5991 // use the copy made earlier
165 e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5992 to->vval.v_list = from->vval.v_list->lv_copylist;
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5993 ++to->vval.v_list->lv_refcount;
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5994 }
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5995 else
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5996 to->vval.v_list = list_copy(from->vval.v_list, deep, copyID);
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5997 if (to->vval.v_list == NULL)
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	5998 ret = FAIL;
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	5999 break;
15496 f1c33409e908 patch 8.1.0756: copy() does not make a copy of a Blob Bram Moolenaar <Bram@vim.org> parents: 15490 diff changeset	6000 case VAR_BLOB:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6001 ret = blob_copy(from->vval.v_blob, to);
15496 f1c33409e908 patch 8.1.0756: copy() does not make a copy of a Blob Bram Moolenaar <Bram@vim.org> parents: 15490 diff changeset	6002 break;
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	6003 case VAR_DICT:
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	6004 to->v_type = VAR_DICT;
151 40a0699b6c62 updated for version 7.0046 vimboss parents: 142 diff changeset	6005 to->v_lock = 0;
165 e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	6006 if (from->vval.v_dict == NULL)
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	6007 to->vval.v_dict = NULL;
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	6008 else if (copyID != 0 && from->vval.v_dict->dv_copyID == copyID)
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	6009 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6010 // use the copy made earlier
165 e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	6011 to->vval.v_dict = from->vval.v_dict->dv_copydict;
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	6012 ++to->vval.v_dict->dv_refcount;
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	6013 }
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	6014 else
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	6015 to->vval.v_dict = dict_copy(from->vval.v_dict, deep, copyID);
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	6016 if (to->vval.v_dict == NULL)
e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	6017 ret = FAIL;
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	6018 break;
7943 e875f0fbd9c0 commit https://github.com/vim/vim/commit/a03f23351588f04276469cd7742b7ec655bb604b Christian Brabandt <cb@256bit.org> parents: 7937 diff changeset	6019 case VAR_UNKNOWN:
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19888 diff changeset	6020 case VAR_ANY:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6021 case VAR_VOID:
19554 b38d73f36467 patch 8.2.0334: abort called when using test_void() Bram Moolenaar <Bram@vim.org> parents: 19477 diff changeset	6022 internal_error_no_abort("item_copy(UNKNOWN)");
165 e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	6023 ret = FAIL;
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	6024 }
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	6025 --recurse;
165 e943e5502fc9 updated for version 7.0050 vimboss parents: 163 diff changeset	6026 return ret;
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	6027 }
2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	6028
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6029 void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6030 echo_one(typval_T rettv, int with_space, int atstart, int *needclr)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6031 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6032 char_u *tofree;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6033 char_u numbuf[NUMBUFLEN];
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6034 char_u *p = echo_string(rettv, &tofree, numbuf, get_copyID());
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6035
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6036 if (*atstart)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6037 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6038 *atstart = FALSE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6039 // Call msg_start() after eval1(), evaluating the expression
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6040 // may cause a message to appear.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6041 if (with_space)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6042 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6043 // Mark the saved text as finishing the line, so that what
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6044 // follows is displayed on a new line when scrolling back
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6045 // at the more prompt.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6046 msg_sb_eol();
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6047 msg_start();
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6048 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6049 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6050 else if (with_space)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6051 msg_puts_attr(" ", echo_attr);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6052
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6053 if (p != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6054 for ( ; *p != NUL && !got_int; ++p)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6055 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6056 if (p == '\n' \|\| p == '\r' \|\| *p == TAB)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6057 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6058 if (p != TAB && needclr)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6059 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6060 // remove any text still there from the command
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6061 msg_clr_eos();
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6062 *needclr = FALSE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6063 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6064 msg_putchar_attr(*p, echo_attr);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6065 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6066 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6067 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6068 if (has_mbyte)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6069 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6070 int i = (*mb_ptr2len)(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6071
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6072 (void)msg_outtrans_len_attr(p, i, echo_attr);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6073 p += i - 1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6074 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6075 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6076 (void)msg_outtrans_len_attr(p, 1, echo_attr);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6077 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6078 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6079 vim_free(tofree);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6080 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6081
104 2b913f7eb9d2 updated for version 7.0039 vimboss parents: 100 diff changeset	6082 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6083 * ":echo expr1 ..." print each argument separated with a space, add a
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6084 * newline at the end.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6085 * ":echon expr1 ..." print each argument plain.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6086 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6087 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	6088 ex_echo(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6089 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6090 char_u *arg = eap->arg;
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	6091 typval_T rettv;
24614 07b3d21a8b4b patch 8.2.2846: Vim9: "echo Func()" does not give an error for using void Bram Moolenaar <Bram@vim.org> parents: 24606 diff changeset	6092 char_u *arg_start;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6093 int needclr = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6094 int atstart = TRUE;
15079 a527110d5f56 patch 8.1.0550: expression evaluation may repeat an error message Bram Moolenaar <Bram@vim.org> parents: 14968 diff changeset	6095 int did_emsg_before = did_emsg;
15456 f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	6096 int called_emsg_before = called_emsg;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	6097 evalarg_T evalarg;
7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	6098
21104 f8ec5a7a9cf6 patch 8.2.1103: Coverity reports an unnecessary NULL check Bram Moolenaar <Bram@vim.org> parents: 21098 diff changeset	6099 fill_evalarg_from_eap(&evalarg, eap, eap->skip);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6100
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6101 if (eap->skip)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6102 ++emsg_skip;
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	6103 while ((!ends_excmd2(eap->cmd, arg) \|\| *arg == '"') && !got_int)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6104 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6105 // If eval1() causes an error message the text from the command may
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6106 // still need to be cleared. E.g., "echo 22,44".
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	6107 need_clr_eos = needclr;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	6108
24614 07b3d21a8b4b patch 8.2.2846: Vim9: "echo Func()" does not give an error for using void Bram Moolenaar <Bram@vim.org> parents: 24606 diff changeset	6109 arg_start = arg;
20992 7ee565134d4a patch 8.2.1047: Vim9: script cannot use line continuation like :def function Bram Moolenaar <Bram@vim.org> parents: 20943 diff changeset	6110 if (eval1(&arg, &rettv, &evalarg) == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6111 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6112 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6113 * Report the invalid expression unless the expression evaluation
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6114 * has been cancelled due to an aborting error, an interrupt, or an
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6115 * exception.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6116 */
15456 f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	6117 if (!aborting() && did_emsg == did_emsg_before
f01eb1aed348 patch 8.1.0736: code for Blob not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 15454 diff changeset	6118 && called_emsg == called_emsg_before)
25064 8f2262c72178 patch 8.2.3069: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25054 diff changeset	6119 semsg(_(e_invalid_expression_str), arg_start);
1624 18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	6120 need_clr_eos = FALSE;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	6121 break;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	6122 }
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	6123 need_clr_eos = FALSE;
18ee39301b82 updated for version 7.2a vimboss parents: 1609 diff changeset	6124
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6125 if (!eap->skip)
24614 07b3d21a8b4b patch 8.2.2846: Vim9: "echo Func()" does not give an error for using void Bram Moolenaar <Bram@vim.org> parents: 24606 diff changeset	6126 {
07b3d21a8b4b patch 8.2.2846: Vim9: "echo Func()" does not give an error for using void Bram Moolenaar <Bram@vim.org> parents: 24606 diff changeset	6127 if (rettv.v_type == VAR_VOID)
07b3d21a8b4b patch 8.2.2846: Vim9: "echo Func()" does not give an error for using void Bram Moolenaar <Bram@vim.org> parents: 24606 diff changeset	6128 {
07b3d21a8b4b patch 8.2.2846: Vim9: "echo Func()" does not give an error for using void Bram Moolenaar <Bram@vim.org> parents: 24606 diff changeset	6129 semsg(_(e_expression_does_not_result_in_value_str), arg_start);
07b3d21a8b4b patch 8.2.2846: Vim9: "echo Func()" does not give an error for using void Bram Moolenaar <Bram@vim.org> parents: 24606 diff changeset	6130 break;
07b3d21a8b4b patch 8.2.2846: Vim9: "echo Func()" does not give an error for using void Bram Moolenaar <Bram@vim.org> parents: 24606 diff changeset	6131 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6132 echo_one(&rettv, eap->cmdidx == CMD_echo, &atstart, &needclr);
24614 07b3d21a8b4b patch 8.2.2846: Vim9: "echo Func()" does not give an error for using void Bram Moolenaar <Bram@vim.org> parents: 24606 diff changeset	6133 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19108 diff changeset	6134
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	6135 clear_tv(&rettv);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6136 arg = skipwhite(arg);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6137 }
25521 2063b858cad9 patch 8.2.3297: cannot use all commands inside a {} block Bram Moolenaar <Bram@vim.org> parents: 25495 diff changeset	6138 set_nextcmd(eap, arg);
21050 7a9daf73a724 patch 8.2.1076: Vim9: no line break allowed in :if expression Bram Moolenaar <Bram@vim.org> parents: 21048 diff changeset	6139 clear_evalarg(&evalarg, eap);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6140
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6141 if (eap->skip)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6142 --emsg_skip;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6143 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6144 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6145 // remove text that may still be there from the command
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6146 if (needclr)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6147 msg_clr_eos();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6148 if (eap->cmdidx == CMD_echo)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6149 msg_end();
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6150 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6151 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6152
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6153 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6154 * ":echohl {name}".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6155 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6156 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	6157 ex_echohl(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6158 {
12487 3f16cf18386c patch 8.0.1123: cannot define a toolbar for a window Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	6159 echo_attr = syn_name2attr(eap->arg);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6160 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6161
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6162 /*
17922 4d63d47d87ef patch 8.1.1957: more code can be moved to evalvars.c Bram Moolenaar <Bram@vim.org> parents: 17893 diff changeset	6163 * Returns the :echo attribute
4d63d47d87ef patch 8.1.1957: more code can be moved to evalvars.c Bram Moolenaar <Bram@vim.org> parents: 17893 diff changeset	6164 */
4d63d47d87ef patch 8.1.1957: more code can be moved to evalvars.c Bram Moolenaar <Bram@vim.org> parents: 17893 diff changeset	6165 int
4d63d47d87ef patch 8.1.1957: more code can be moved to evalvars.c Bram Moolenaar <Bram@vim.org> parents: 17893 diff changeset	6166 get_echo_attr(void)
4d63d47d87ef patch 8.1.1957: more code can be moved to evalvars.c Bram Moolenaar <Bram@vim.org> parents: 17893 diff changeset	6167 {
4d63d47d87ef patch 8.1.1957: more code can be moved to evalvars.c Bram Moolenaar <Bram@vim.org> parents: 17893 diff changeset	6168 return echo_attr;
4d63d47d87ef patch 8.1.1957: more code can be moved to evalvars.c Bram Moolenaar <Bram@vim.org> parents: 17893 diff changeset	6169 }
4d63d47d87ef patch 8.1.1957: more code can be moved to evalvars.c Bram Moolenaar <Bram@vim.org> parents: 17893 diff changeset	6170
4d63d47d87ef patch 8.1.1957: more code can be moved to evalvars.c Bram Moolenaar <Bram@vim.org> parents: 17893 diff changeset	6171 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6172 * ":execute expr1 ..." execute the result of an expression.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6173 * ":echomsg expr1 ..." Print a message
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6174 * ":echoerr expr1 ..." Print an error
24194 9f64c420f280 patch 8.2.2638: cannot write a message to the terminal from the GUI Bram Moolenaar <Bram@vim.org> parents: 24190 diff changeset	6175 * ":echoconsole expr1 ..." Print a message on stdout
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6176 * Each gets spaces around each argument and a newline at the end for
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6177 * echo commands
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6178 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6179 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	6180 ex_execute(exarg_T *eap)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6181 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6182 char_u *arg = eap->arg;
137 3e7d17e425b0 updated for version 7.0044 vimboss parents: 124 diff changeset	6183 typval_T rettv;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6184 int ret = OK;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6185 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6186 garray_T ga;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6187 int len;
25220 89b39ce243e2 patch 8.2.3146: Vim9: line number wrong for :execute argument Bram Moolenaar <Bram@vim.org> parents: 25216 diff changeset	6188 long start_lnum = SOURCING_LNUM;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6189
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6190 ga_init2(&ga, 1, 80);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6191
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6192 if (eap->skip)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6193 ++emsg_skip;
20061 6e6a75800884 patch 8.2.0586: Vim9: # comment not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 20059 diff changeset	6194 while (!ends_excmd2(eap->cmd, arg) \|\| *arg == '"')
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6195 {
21098 e88b0daa2fcb patch 8.2.1100: Vim9: cannot use line break in :execute argument Bram Moolenaar <Bram@vim.org> parents: 21096 diff changeset	6196 ret = eval1_emsg(&arg, &rettv, eap);
15478 051937ebaf22 patch 8.1.0747: map() with a bad expression doesn't give an error Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	6197 if (ret == FAIL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6198 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6199
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6200 if (!eap->skip)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6201 {
15219 dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict Bram Moolenaar <Bram@vim.org> parents: 15211 diff changeset	6202 char_u buf[NUMBUFLEN];
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict Bram Moolenaar <Bram@vim.org> parents: 15211 diff changeset	6203
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict Bram Moolenaar <Bram@vim.org> parents: 15211 diff changeset	6204 if (eap->cmdidx == CMD_execute)
19087 e3848b251a01 patch 8.2.0104: using channel or job with ":execute" has strange effects Bram Moolenaar <Bram@vim.org> parents: 19085 diff changeset	6205 {
e3848b251a01 patch 8.2.0104: using channel or job with ":execute" has strange effects Bram Moolenaar <Bram@vim.org> parents: 19085 diff changeset	6206 if (rettv.v_type == VAR_CHANNEL \|\| rettv.v_type == VAR_JOB)
e3848b251a01 patch 8.2.0104: using channel or job with ":execute" has strange effects Bram Moolenaar <Bram@vim.org> parents: 19085 diff changeset	6207 {
24614 07b3d21a8b4b patch 8.2.2846: Vim9: "echo Func()" does not give an error for using void Bram Moolenaar <Bram@vim.org> parents: 24606 diff changeset	6208 semsg(_(e_using_invalid_value_as_string_str),
07b3d21a8b4b patch 8.2.2846: Vim9: "echo Func()" does not give an error for using void Bram Moolenaar <Bram@vim.org> parents: 24606 diff changeset	6209 vartype_name(rettv.v_type));
19087 e3848b251a01 patch 8.2.0104: using channel or job with ":execute" has strange effects Bram Moolenaar <Bram@vim.org> parents: 19085 diff changeset	6210 p = NULL;
e3848b251a01 patch 8.2.0104: using channel or job with ":execute" has strange effects Bram Moolenaar <Bram@vim.org> parents: 19085 diff changeset	6211 }
e3848b251a01 patch 8.2.0104: using channel or job with ":execute" has strange effects Bram Moolenaar <Bram@vim.org> parents: 19085 diff changeset	6212 else
e3848b251a01 patch 8.2.0104: using channel or job with ":execute" has strange effects Bram Moolenaar <Bram@vim.org> parents: 19085 diff changeset	6213 p = tv_get_string_buf(&rettv, buf);
e3848b251a01 patch 8.2.0104: using channel or job with ":execute" has strange effects Bram Moolenaar <Bram@vim.org> parents: 19085 diff changeset	6214 }
15219 dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict Bram Moolenaar <Bram@vim.org> parents: 15211 diff changeset	6215 else
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict Bram Moolenaar <Bram@vim.org> parents: 15211 diff changeset	6216 p = tv_stringify(&rettv, buf);
19081 3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg" Bram Moolenaar <Bram@vim.org> parents: 19047 diff changeset	6217 if (p == NULL)
3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg" Bram Moolenaar <Bram@vim.org> parents: 19047 diff changeset	6218 {
3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg" Bram Moolenaar <Bram@vim.org> parents: 19047 diff changeset	6219 clear_tv(&rettv);
3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg" Bram Moolenaar <Bram@vim.org> parents: 19047 diff changeset	6220 ret = FAIL;
3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg" Bram Moolenaar <Bram@vim.org> parents: 19047 diff changeset	6221 break;
3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg" Bram Moolenaar <Bram@vim.org> parents: 19047 diff changeset	6222 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6223 len = (int)STRLEN(p);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6224 if (ga_grow(&ga, len + 2) == FAIL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6225 {
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	6226 clear_tv(&rettv);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6227 ret = FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6228 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6229 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6230 if (ga.ga_len)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6231 ((char_u *)(ga.ga_data))[ga.ga_len++] = ' ';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6232 STRCPY((char_u *)(ga.ga_data) + ga.ga_len, p);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6233 ga.ga_len += len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6234 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6235
71 7557b6ea0fb1 updated for version 7.0030 vimboss parents: 56 diff changeset	6236 clear_tv(&rettv);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6237 arg = skipwhite(arg);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6238 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6239
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6240 if (ret != FAIL && ga.ga_data != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6241 {
25220 89b39ce243e2 patch 8.2.3146: Vim9: line number wrong for :execute argument Bram Moolenaar <Bram@vim.org> parents: 25216 diff changeset	6242 // use the first line of continuation lines for messages
89b39ce243e2 patch 8.2.3146: Vim9: line number wrong for :execute argument Bram Moolenaar <Bram@vim.org> parents: 25216 diff changeset	6243 SOURCING_LNUM = start_lnum;
89b39ce243e2 patch 8.2.3146: Vim9: line number wrong for :execute argument Bram Moolenaar <Bram@vim.org> parents: 25216 diff changeset	6244
11161 404e98047f0b patch 8.0.0467: using g< after :for does not show the right output Christian Brabandt <cb@256bit.org> parents: 11129 diff changeset	6245 if (eap->cmdidx == CMD_echomsg \|\| eap->cmdidx == CMD_echoerr)
404e98047f0b patch 8.0.0467: using g< after :for does not show the right output Christian Brabandt <cb@256bit.org> parents: 11129 diff changeset	6246 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6247 // Mark the already saved text as finishing the line, so that what
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6248 // follows is displayed on a new line when scrolling back at the
3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6249 // more prompt.
11161 404e98047f0b patch 8.0.0467: using g< after :for does not show the right output Christian Brabandt <cb@256bit.org> parents: 11129 diff changeset	6250 msg_sb_eol();
404e98047f0b patch 8.0.0467: using g< after :for does not show the right output Christian Brabandt <cb@256bit.org> parents: 11129 diff changeset	6251 }
404e98047f0b patch 8.0.0467: using g< after :for does not show the right output Christian Brabandt <cb@256bit.org> parents: 11129 diff changeset	6252
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6253 if (eap->cmdidx == CMD_echomsg)
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 615 diff changeset	6254 {
15543 dd725a8ab112 patch 8.1.0779: argument for message functions is inconsistent Bram Moolenaar <Bram@vim.org> parents: 15517 diff changeset	6255 msg_attr(ga.ga_data, echo_attr);
625 81fe2ccc1207 updated for version 7.0179 vimboss parents: 615 diff changeset	6256 out_flush();
81fe2ccc1207 updated for version 7.0179 vimboss parents: 615 diff changeset	6257 }
24194 9f64c420f280 patch 8.2.2638: cannot write a message to the terminal from the GUI Bram Moolenaar <Bram@vim.org> parents: 24190 diff changeset	6258 else if (eap->cmdidx == CMD_echoconsole)
9f64c420f280 patch 8.2.2638: cannot write a message to the terminal from the GUI Bram Moolenaar <Bram@vim.org> parents: 24190 diff changeset	6259 {
9f64c420f280 patch 8.2.2638: cannot write a message to the terminal from the GUI Bram Moolenaar <Bram@vim.org> parents: 24190 diff changeset	6260 ui_write(ga.ga_data, (int)STRLEN(ga.ga_data), TRUE);
9f64c420f280 patch 8.2.2638: cannot write a message to the terminal from the GUI Bram Moolenaar <Bram@vim.org> parents: 24190 diff changeset	6261 ui_write((char_u *)"\r\n", 2, TRUE);
9f64c420f280 patch 8.2.2638: cannot write a message to the terminal from the GUI Bram Moolenaar <Bram@vim.org> parents: 24190 diff changeset	6262 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6263 else if (eap->cmdidx == CMD_echoerr)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6264 {
20142 fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20128 diff changeset	6265 int save_did_emsg = did_emsg;
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20128 diff changeset	6266
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6267 // We don't want to abort following commands, restore did_emsg.
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15466 diff changeset	6268 emsg(ga.ga_data);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6269 if (!force_abort)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6270 did_emsg = save_did_emsg;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6271 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6272 else if (eap->cmdidx == CMD_execute)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6273 do_cmdline((char_u *)ga.ga_data,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6274 eap->getline, eap->cookie, DOCMD_NOWAIT\|DOCMD_VERBOSE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6275 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6276
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6277 ga_clear(&ga);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6278
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6279 if (eap->skip)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6280 --emsg_skip;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6281
25521 2063b858cad9 patch 8.2.3297: cannot use all commands inside a {} block Bram Moolenaar <Bram@vim.org> parents: 25495 diff changeset	6282 set_nextcmd(eap, arg);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6283 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6284
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6285 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6286 * Skip over the name of an option: "&option", "&g:option" or "&l:option".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6287 * "arg" points to the "&" or '+' when called, to "option" when returning.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6288 * Returns NULL when no option name found. Otherwise pointer to the char
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6289 * after the option name.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6290 */
17873 d50a5faa75bd patch 8.1.1933: the eval.c file is too big Bram Moolenaar <Bram@vim.org> parents: 17833 diff changeset	6291 char_u *
26441 65ab0b035dd8 patch 8.2.3751: cannot assign a lambda to an option that takes a function Bram Moolenaar <Bram@vim.org> parents: 26329 diff changeset	6292 find_option_end(char_u *arg, int scope)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6293 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6294 char_u p = arg;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6295
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6296 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6297 if (*p == 'g' && p[1] == ':')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6298 {
26441 65ab0b035dd8 patch 8.2.3751: cannot assign a lambda to an option that takes a function Bram Moolenaar <Bram@vim.org> parents: 26329 diff changeset	6299 *scope = OPT_GLOBAL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6300 p += 2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6301 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6302 else if (*p == 'l' && p[1] == ':')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6303 {
26441 65ab0b035dd8 patch 8.2.3751: cannot assign a lambda to an option that takes a function Bram Moolenaar <Bram@vim.org> parents: 26329 diff changeset	6304 *scope = OPT_LOCAL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6305 p += 2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6306 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6307 else
26441 65ab0b035dd8 patch 8.2.3751: cannot assign a lambda to an option that takes a function Bram Moolenaar <Bram@vim.org> parents: 26329 diff changeset	6308 *scope = 0;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6309
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6310 if (!ASCII_ISALPHA(*p))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6311 return NULL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6312 *arg = p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6313
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6314 if (p[0] == 't' && p[1] == '_' && p[2] != NUL && p[3] != NUL)
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6315 p += 4; // termcap option
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6316 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6317 while (ASCII_ISALPHA(*p))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6318 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6319 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6320 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6321
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6322 /*
448 dd9db57ee7ce updated for version 7.0118 vimboss parents: 446 diff changeset	6323 * Display script name where an item was last set.
dd9db57ee7ce updated for version 7.0118 vimboss parents: 446 diff changeset	6324 * Should only be invoked when 'verbose' is non-zero.
dd9db57ee7ce updated for version 7.0118 vimboss parents: 446 diff changeset	6325 */
dd9db57ee7ce updated for version 7.0118 vimboss parents: 446 diff changeset	6326 void
14700 0a3b9ecf7cb8 patch 8.1.0362: cannot get the script line number when executing a function Christian Brabandt <cb@256bit.org> parents: 14439 diff changeset	6327 last_set_msg(sctx_T script_ctx)
448 dd9db57ee7ce updated for version 7.0118 vimboss parents: 446 diff changeset	6328 {
507 a1059cda45f2 updated for version 7.0142 vimboss parents: 505 diff changeset	6329 char_u *p;
a1059cda45f2 updated for version 7.0142 vimboss parents: 505 diff changeset	6330
14700 0a3b9ecf7cb8 patch 8.1.0362: cannot get the script line number when executing a function Christian Brabandt <cb@256bit.org> parents: 14439 diff changeset	6331 if (script_ctx.sc_sid != 0)
0a3b9ecf7cb8 patch 8.1.0362: cannot get the script line number when executing a function Christian Brabandt <cb@256bit.org> parents: 14439 diff changeset	6332 {
0a3b9ecf7cb8 patch 8.1.0362: cannot get the script line number when executing a function Christian Brabandt <cb@256bit.org> parents: 14439 diff changeset	6333 p = home_replace_save(NULL, get_scriptname(script_ctx.sc_sid));
507 a1059cda45f2 updated for version 7.0142 vimboss parents: 505 diff changeset	6334 if (p != NULL)
a1059cda45f2 updated for version 7.0142 vimboss parents: 505 diff changeset	6335 {
a1059cda45f2 updated for version 7.0142 vimboss parents: 505 diff changeset	6336 verbose_enter();
15543 dd725a8ab112 patch 8.1.0779: argument for message functions is inconsistent Bram Moolenaar <Bram@vim.org> parents: 15517 diff changeset	6337 msg_puts(_("\n\tLast set from "));
dd725a8ab112 patch 8.1.0779: argument for message functions is inconsistent Bram Moolenaar <Bram@vim.org> parents: 15517 diff changeset	6338 msg_puts((char *)p);
14700 0a3b9ecf7cb8 patch 8.1.0362: cannot get the script line number when executing a function Christian Brabandt <cb@256bit.org> parents: 14439 diff changeset	6339 if (script_ctx.sc_lnum > 0)
0a3b9ecf7cb8 patch 8.1.0362: cannot get the script line number when executing a function Christian Brabandt <cb@256bit.org> parents: 14439 diff changeset	6340 {
18939 25ebc35e104f patch 8.2.0030: "gF" does not work on output of "verbose command" Bram Moolenaar <Bram@vim.org> parents: 18851 diff changeset	6341 msg_puts(_(line_msg));
14700 0a3b9ecf7cb8 patch 8.1.0362: cannot get the script line number when executing a function Christian Brabandt <cb@256bit.org> parents: 14439 diff changeset	6342 msg_outnum((long)script_ctx.sc_lnum);
0a3b9ecf7cb8 patch 8.1.0362: cannot get the script line number when executing a function Christian Brabandt <cb@256bit.org> parents: 14439 diff changeset	6343 }
0a3b9ecf7cb8 patch 8.1.0362: cannot get the script line number when executing a function Christian Brabandt <cb@256bit.org> parents: 14439 diff changeset	6344 verbose_leave();
507 a1059cda45f2 updated for version 7.0142 vimboss parents: 505 diff changeset	6345 vim_free(p);
a1059cda45f2 updated for version 7.0142 vimboss parents: 505 diff changeset	6346 }
448 dd9db57ee7ce updated for version 7.0118 vimboss parents: 446 diff changeset	6347 }
dd9db57ee7ce updated for version 7.0118 vimboss parents: 446 diff changeset	6348 }
dd9db57ee7ce updated for version 7.0118 vimboss parents: 446 diff changeset	6349
17966 46f95606b9ec patch 8.1.1979: code for handling file names is spread out Bram Moolenaar <Bram@vim.org> parents: 17964 diff changeset	6350 #endif // FEAT_EVAL
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6351
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6352 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6353 * Perform a substitution on "str" with pattern "pat" and substitute "sub".
9589 bf204ab1ce7d commit https://github.com/vim/vim/commit/72ab729c3dcdea0fba44d8e676602c847e841bcd Christian Brabandt <cb@256bit.org> parents: 9587 diff changeset	6354 * When "sub" is NULL "expr" is used, must be a VAR_FUNC or VAR_PARTIAL.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6355 * "flags" can be "g" to do a global substitute.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6356 * Returns an allocated string, NULL for error.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6357 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6358 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	6359 do_string_sub(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	6360 char_u *str,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	6361 char_u *pat,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	6362 char_u *sub,
9589 bf204ab1ce7d commit https://github.com/vim/vim/commit/72ab729c3dcdea0fba44d8e676602c847e841bcd Christian Brabandt <cb@256bit.org> parents: 9587 diff changeset	6363 typval_T *expr,
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7788 diff changeset	6364 char_u *flags)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6365 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6366 int sublen;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6367 regmatch_T regmatch;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6368 int i;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6369 int do_all;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6370 char_u *tail;
6332 65e72747feca updated for version 7.4.499 Bram Moolenaar <bram@vim.org> parents: 6316 diff changeset	6371 char_u *end;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6372 garray_T ga;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6373 char_u *ret;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6374 char_u *save_cpo;
5623 d59544f3022b updated for version 7.4.158 Bram Moolenaar <bram@vim.org> parents: 5614 diff changeset	6375 char_u *zero_width = NULL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6376
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6377 // Make 'cpoptions' empty, so that the 'l' flag doesn't work here
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6378 save_cpo = p_cpo;
1672 fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	6379 p_cpo = empty_option;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6380
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6381 ga_init2(&ga, 1, 200);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6382
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6383 do_all = (flags[0] == 'g');
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6384
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6385 regmatch.rm_ic = p_ic;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6386 regmatch.regprog = vim_regcomp(pat, RE_MAGIC + RE_STRING);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6387 if (regmatch.regprog != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6388 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6389 tail = str;
6332 65e72747feca updated for version 7.4.499 Bram Moolenaar <bram@vim.org> parents: 6316 diff changeset	6390 end = str + STRLEN(str);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6391 while (vim_regexec_nl(&regmatch, str, (colnr_T)(tail - str)))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6392 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6393 // Skip empty match except for first match.
5623 d59544f3022b updated for version 7.4.158 Bram Moolenaar <bram@vim.org> parents: 5614 diff changeset	6394 if (regmatch.startp[0] == regmatch.endp[0])
d59544f3022b updated for version 7.4.158 Bram Moolenaar <bram@vim.org> parents: 5614 diff changeset	6395 {
d59544f3022b updated for version 7.4.158 Bram Moolenaar <bram@vim.org> parents: 5614 diff changeset	6396 if (zero_width == regmatch.startp[0])
d59544f3022b updated for version 7.4.158 Bram Moolenaar <bram@vim.org> parents: 5614 diff changeset	6397 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6398 // avoid getting stuck on a match with an empty string
18251 c8a53c0daeed patch 8.1.2120: some MB_ macros are more complicated than necessary Bram Moolenaar <Bram@vim.org> parents: 18225 diff changeset	6399 i = mb_ptr2len(tail);
5964 238f5027830c updated for version 7.4.323 Bram Moolenaar <bram@vim.org> parents: 5944 diff changeset	6400 mch_memmove((char_u *)ga.ga_data + ga.ga_len, tail,
238f5027830c updated for version 7.4.323 Bram Moolenaar <bram@vim.org> parents: 5944 diff changeset	6401 (size_t)i);
238f5027830c updated for version 7.4.323 Bram Moolenaar <bram@vim.org> parents: 5944 diff changeset	6402 ga.ga_len += i;
238f5027830c updated for version 7.4.323 Bram Moolenaar <bram@vim.org> parents: 5944 diff changeset	6403 tail += i;
5623 d59544f3022b updated for version 7.4.158 Bram Moolenaar <bram@vim.org> parents: 5614 diff changeset	6404 continue;
d59544f3022b updated for version 7.4.158 Bram Moolenaar <bram@vim.org> parents: 5614 diff changeset	6405 }
d59544f3022b updated for version 7.4.158 Bram Moolenaar <bram@vim.org> parents: 5614 diff changeset	6406 zero_width = regmatch.startp[0];
d59544f3022b updated for version 7.4.158 Bram Moolenaar <bram@vim.org> parents: 5614 diff changeset	6407 }
d59544f3022b updated for version 7.4.158 Bram Moolenaar <bram@vim.org> parents: 5614 diff changeset	6408
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6409 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6410 * Get some space for a temporary buffer to do the substitution
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6411 * into. It will contain:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6412 * - The text up to where the match is.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6413 * - The substituted text.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6414 * - The text after the match.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6415 */
9589 bf204ab1ce7d commit https://github.com/vim/vim/commit/72ab729c3dcdea0fba44d8e676602c847e841bcd Christian Brabandt <cb@256bit.org> parents: 9587 diff changeset	6416 sublen = vim_regsub(&regmatch, sub, expr, tail, FALSE, TRUE, FALSE);
6332 65e72747feca updated for version 7.4.499 Bram Moolenaar <bram@vim.org> parents: 6316 diff changeset	6417 if (ga_grow(&ga, (int)((end - tail) + sublen -
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6418 (regmatch.endp[0] - regmatch.startp[0]))) == FAIL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6419 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6420 ga_clear(&ga);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6421 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6422 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6423
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6424 // copy the text up to where the match is
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6425 i = (int)(regmatch.startp[0] - tail);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6426 mch_memmove((char_u *)ga.ga_data + ga.ga_len, tail, (size_t)i);
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6427 // add the substituted text
9589 bf204ab1ce7d commit https://github.com/vim/vim/commit/72ab729c3dcdea0fba44d8e676602c847e841bcd Christian Brabandt <cb@256bit.org> parents: 9587 diff changeset	6428 (void)vim_regsub(&regmatch, sub, expr, (char_u *)ga.ga_data
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6429 + ga.ga_len + i, TRUE, TRUE, FALSE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6430 ga.ga_len += i + sublen - 1;
5388 8ced827b2e8b updated for version 7.4.045 Bram Moolenaar <bram@vim.org> parents: 5378 diff changeset	6431 tail = regmatch.endp[0];
8ced827b2e8b updated for version 7.4.045 Bram Moolenaar <bram@vim.org> parents: 5378 diff changeset	6432 if (*tail == NUL)
8ced827b2e8b updated for version 7.4.045 Bram Moolenaar <bram@vim.org> parents: 5378 diff changeset	6433 break;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6434 if (!do_all)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6435 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6436 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6437
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6438 if (ga.ga_data != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6439 STRCPY((char *)ga.ga_data + ga.ga_len, tail);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6440
4805 66803af09906 updated for version 7.3.1149 Bram Moolenaar <bram@vim.org> parents: 4778 diff changeset	6441 vim_regfree(regmatch.regprog);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6442 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6443
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6444 ret = vim_strsave(ga.ga_data == NULL ? str : (char_u *)ga.ga_data);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6445 ga_clear(&ga);
1672 fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	6446 if (p_cpo == empty_option)
fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	6447 p_cpo = save_cpo;
fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	6448 else
23493 f8382c4e6551 patch 8.2.2289: Vim9: 'cpo' can become empty Bram Moolenaar <Bram@vim.org> parents: 23450 diff changeset	6449 {
18777 3a68dc2a1bc1 patch 8.1.2378: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	6450 // Darn, evaluating {sub} expression or {expr} changed the value.
23493 f8382c4e6551 patch 8.2.2289: Vim9: 'cpo' can become empty Bram Moolenaar <Bram@vim.org> parents: 23450 diff changeset	6451 // If it's still empty it was changed and restored, need to restore in
f8382c4e6551 patch 8.2.2289: Vim9: 'cpo' can become empty Bram Moolenaar <Bram@vim.org> parents: 23450 diff changeset	6452 // the complicated way.
f8382c4e6551 patch 8.2.2289: Vim9: 'cpo' can become empty Bram Moolenaar <Bram@vim.org> parents: 23450 diff changeset	6453 if (*p_cpo == NUL)
f8382c4e6551 patch 8.2.2289: Vim9: 'cpo' can become empty Bram Moolenaar <Bram@vim.org> parents: 23450 diff changeset	6454 set_option_value((char_u *)"cpo", 0L, save_cpo, 0);
1672 fddea6c03dee updated for version 7.2b-004 vimboss parents: 1668 diff changeset	6455 free_string_option(save_cpo);
23493 f8382c4e6551 patch 8.2.2289: Vim9: 'cpo' can become empty Bram Moolenaar <Bram@vim.org> parents: 23450 diff changeset	6456 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6457
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6458 return ret;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	6459 }

Mercurial > vim

annotate src/eval.c @ 26480:cf986610be6a v8.2.3770