vim: src/vim9compile.c annotate

annotate src/vim9compile.c @ 21196:f45ce1ce284c v8.2.1149

patch 8.2.1149: Vim9: :eval command not handled properly Commit: https://github.com/vim/vim/commit/007f9d6ed597bd212acb95be9d0767c97d2a1438 Author: Bram Moolenaar <Bram@vim.org> Date: Mon Jul 6 23:04:49 2020 +0200 patch 8.2.1149: Vim9: :eval command not handled properly Problem: Vim9: :eval command not handled properly. Solution: Compile the :eval command. (closes https://github.com/vim/vim/issues/6408)

author	Bram Moolenaar <Bram@vim.org>
date	Mon, 06 Jul 2020 23:15:04 +0200
parents	afed2045ffc9
children	1a4e22aa2eb3

rev	line source
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1 /* vi:set ts=8 sts=4 sw=4 noet:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3 * VIM - Vi IMproved by Bram Moolenaar
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5 * Do ":help uganda" in Vim to read copying and usage conditions.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6 * Do ":help credits" in Vim to see a list of people who contributed.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7 * See README.txt for an overview of the Vim source code.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	8 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	9
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	10 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	11 * vim9compile.c: :def and dealing with instructions
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	12 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	13
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	14 #define USING_FLOAT_STUFF
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	15 #include "vim.h"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	16
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	17 #if defined(FEAT_EVAL) \|\| defined(PROTO)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	18
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	19 #ifdef VMS
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	20 # include <float.h>
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	21 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	22
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	23 #define DEFINE_VIM9_GLOBALS
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	24 #include "vim9.h"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	25
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	26 // values for ctx_skip
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	27 typedef enum {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	28 SKIP_NOT, // condition is a constant, produce code
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	29 SKIP_YES, // condition is a constant, do NOT produce code
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	30 SKIP_UNKNOWN // condition is not a constant, produce code
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	31 } skip_T;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	32
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	33 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	34 * Chain of jump instructions where the end label needs to be set.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	35 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	36 typedef struct endlabel_S endlabel_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	37 struct endlabel_S {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	38 endlabel_T *el_next; // chain end_label locations
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	39 int el_end_label; // instruction idx where to set end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	40 };
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	41
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	42 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	43 * info specific for the scope of :if / elseif / else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	44 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	45 typedef struct {
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	46 int is_seen_else;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	47 int is_had_return; // every block ends in :return
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	48 int is_if_label; // instruction idx at IF or ELSEIF
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	49 endlabel_T *is_end_label; // instructions to set end label
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	50 } ifscope_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	51
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	52 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	53 * info specific for the scope of :while
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	54 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	55 typedef struct {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	56 int ws_top_label; // instruction idx at WHILE
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	57 endlabel_T *ws_end_label; // instructions to set end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	58 } whilescope_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	59
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	60 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	61 * info specific for the scope of :for
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	62 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	63 typedef struct {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	64 int fs_top_label; // instruction idx at FOR
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	65 endlabel_T *fs_end_label; // break instructions
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	66 } forscope_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	67
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	68 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	69 * info specific for the scope of :try
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	70 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	71 typedef struct {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	72 int ts_try_label; // instruction idx at TRY
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	73 endlabel_T *ts_end_label; // jump to :finally or :endtry
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	74 int ts_catch_label; // instruction idx of last CATCH
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	75 int ts_caught_all; // "catch" without argument encountered
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	76 } tryscope_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	77
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	78 typedef enum {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	79 NO_SCOPE,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	80 IF_SCOPE,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	81 WHILE_SCOPE,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	82 FOR_SCOPE,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	83 TRY_SCOPE,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	84 BLOCK_SCOPE
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	85 } scopetype_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	86
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	87 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	88 * Info for one scope, pointed to by "ctx_scope".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	89 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	90 typedef struct scope_S scope_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	91 struct scope_S {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	92 scope_T *se_outer; // scope containing this one
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	93 scopetype_T se_type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	94 int se_local_count; // ctx_locals.ga_len before scope
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	95 skip_T se_skip_save; // ctx_skip before the block
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	96 union {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	97 ifscope_T se_if;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	98 whilescope_T se_while;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	99 forscope_T se_for;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	100 tryscope_T se_try;
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	101 } se_u;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	102 };
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	103
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	104 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	105 * Entry for "ctx_locals". Used for arguments and local variables.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	106 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	107 typedef struct {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	108 char_u *lv_name;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	109 type_T *lv_type;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	110 int lv_idx; // index of the variable on the stack
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	111 int lv_from_outer; // when TRUE using ctx_outer scope
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	112 int lv_const; // when TRUE cannot be assigned to
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	113 int lv_arg; // when TRUE this is an argument
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	114 } lvar_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	115
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	116 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	117 * Context for compiling lines of Vim script.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	118 * Stores info about the local variables and condition stack.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	119 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	120 struct cctx_S {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	121 ufunc_T *ctx_ufunc; // current function
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	122 int ctx_lnum; // line number in current function
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	123 char_u *ctx_line_start; // start of current line or NULL
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	124 garray_T ctx_instr; // generated instructions
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	125
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	126 garray_T ctx_locals; // currently visible local variables
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	127 int ctx_locals_count; // total number of local variables
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	128
20247 e46e72aaff74 patch 8.2.0679: Vim9: incomplete support for closures Bram Moolenaar <Bram@vim.org> parents: 20244 diff changeset	129 int ctx_closure_count; // number of closures created in the
e46e72aaff74 patch 8.2.0679: Vim9: incomplete support for closures Bram Moolenaar <Bram@vim.org> parents: 20244 diff changeset	130 // function
e46e72aaff74 patch 8.2.0679: Vim9: incomplete support for closures Bram Moolenaar <Bram@vim.org> parents: 20244 diff changeset	131
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	132 garray_T ctx_imports; // imported items
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	133
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	134 skip_T ctx_skip;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	135 scope_T *ctx_scope; // current scope, NULL at toplevel
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	136 int ctx_had_return; // last seen statement was "return"
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	137
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	138 cctx_T *ctx_outer; // outer scope for lambda or nested
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	139 // function
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	140 int ctx_outer_used; // var in ctx_outer was used
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	141
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	142 garray_T ctx_type_stack; // type of each item on the stack
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	143 garray_T *ctx_type_list; // list of pointers to allocated types
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	144 };
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	145
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	146 static char e_var_notfound[] = N_("E1001: variable not found: %s");
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	147 static char e_syntax_at[] = N_("E1002: Syntax error at %s");
20355 fc2d76e0994c patch 8.2.0733: Vim9: assigning to dict or list argument does not work Bram Moolenaar <Bram@vim.org> parents: 20349 diff changeset	148 static char e_used_as_arg[] = N_("E1006: %s is used as an argument");
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	149 static char e_cannot_use_void[] = N_("E1031: Cannot use void value");
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	150
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	151 static void delete_def_function_contents(dfunc_T *dfunc);
19944 3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	152 static void arg_type_mismatch(type_T expected, type_T actual, int argidx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	153
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	154 /*
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	155 * Lookup variable "name" in the local scope and return it.
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	156 * Return NULL if not found.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	157 */
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	158 static lvar_T *
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	159 lookup_local(char_u name, size_t len, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	160 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	161 int idx;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	162 lvar_T *lvar;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	163
19392 5b6f420e7352 patch 8.2.0254: compiler warning for checking size_t to be negative Bram Moolenaar <Bram@vim.org> parents: 19388 diff changeset	164 if (len == 0)
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	165 return NULL;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	166
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	167 // Find local in current function scope.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	168 for (idx = 0; idx < cctx->ctx_locals.ga_len; ++idx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	169 {
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	170 lvar = ((lvar_T *)cctx->ctx_locals.ga_data) + idx;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	171 if (STRNCMP(name, lvar->lv_name, len) == 0
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	172 && STRLEN(lvar->lv_name) == len)
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	173 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	174 lvar->lv_from_outer = FALSE;
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	175 return lvar;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	176 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	177 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	178
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	179 // Find local in outer function scope.
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	180 if (cctx->ctx_outer != NULL)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	181 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	182 lvar = lookup_local(name, len, cctx->ctx_outer);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	183 if (lvar != NULL)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	184 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	185 // TODO: are there situations we should not mark the outer scope as
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	186 // used?
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	187 cctx->ctx_outer_used = TRUE;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	188 lvar->lv_from_outer = TRUE;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	189 return lvar;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	190 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	191 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	192
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	193 return NULL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	194 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	195
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	196 /*
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	197 * Lookup an argument in the current function and an enclosing function.
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	198 * Returns the argument index in "idxp"
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	199 * Returns the argument type in "type"
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	200 * Sets "gen_load_outer" to TRUE if found in outer scope.
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	201 * Returns OK when found, FAIL otherwise.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	202 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	203 static int
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	204 lookup_arg(
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	205 char_u *name,
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	206 size_t len,
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	207 int *idxp,
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	208 type_T **type,
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	209 int *gen_load_outer,
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	210 cctx_T *cctx)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	211 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	212 int idx;
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	213 char_u *va_name;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	214
19392 5b6f420e7352 patch 8.2.0254: compiler warning for checking size_t to be negative Bram Moolenaar <Bram@vim.org> parents: 19388 diff changeset	215 if (len == 0)
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	216 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	217 for (idx = 0; idx < cctx->ctx_ufunc->uf_args.ga_len; ++idx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	218 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	219 char_u *arg = FUNCARG(cctx->ctx_ufunc, idx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	220
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	221 if (STRNCMP(name, arg, len) == 0 && arg[len] == NUL)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	222 {
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	223 if (idxp != NULL)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	224 {
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	225 // Arguments are located above the frame pointer. One further
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	226 // if there is a vararg argument
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	227 *idxp = idx - (cctx->ctx_ufunc->uf_args.ga_len
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	228 + STACK_FRAME_SIZE)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	229 + (cctx->ctx_ufunc->uf_va_name != NULL ? -1 : 0);
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	230
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	231 if (cctx->ctx_ufunc->uf_arg_types != NULL)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	232 *type = cctx->ctx_ufunc->uf_arg_types[idx];
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	233 else
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	234 *type = &t_any;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	235 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	236 return OK;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	237 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	238 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	239
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	240 va_name = cctx->ctx_ufunc->uf_va_name;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	241 if (va_name != NULL
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	242 && STRNCMP(name, va_name, len) == 0 && va_name[len] == NUL)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	243 {
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	244 if (idxp != NULL)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	245 {
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	246 // varargs is always the last argument
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	247 *idxp = -STACK_FRAME_SIZE - 1;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	248 *type = cctx->ctx_ufunc->uf_va_type;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	249 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	250 return OK;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	251 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	252
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	253 if (cctx->ctx_outer != NULL)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	254 {
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	255 // Lookup the name for an argument of the outer function.
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	256 if (lookup_arg(name, len, idxp, type, gen_load_outer, cctx->ctx_outer)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	257 == OK)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	258 {
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	259 *gen_load_outer = TRUE;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	260 return OK;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	261 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	262 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	263
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	264 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	265 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	266
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	267 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	268 * Lookup a variable in the current script.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	269 * Returns OK or FAIL.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	270 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	271 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	272 lookup_script(char_u *name, size_t len)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	273 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	274 int cc;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	275 hashtab_T *ht = &SCRIPT_VARS(current_sctx.sc_sid);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	276 dictitem_T *di;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	277
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	278 cc = name[len];
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	279 name[len] = NUL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	280 di = find_var_in_ht(ht, 0, name, TRUE);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	281 name[len] = cc;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	282 return di == NULL ? FAIL: OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	283 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	284
19623 2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	285 /*
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	286 * Check if "p[len]" is already defined, either in script "import_sid" or in
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	287 * compilation context "cctx".
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	288 * Return FAIL and give an error if it defined.
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	289 */
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	290 int
21194 afed2045ffc9 patch 8.2.1148: warning for using int instead of size_t Bram Moolenaar <Bram@vim.org> parents: 21188 diff changeset	291 check_defined(char_u p, size_t len, cctx_T cctx)
19623 2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	292 {
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	293 if (lookup_script(p, len) == OK
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	294 \|\| (cctx != NULL
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	295 && (lookup_local(p, len, cctx) != NULL
19623 2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	296 \|\| find_imported(p, len, cctx) != NULL)))
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	297 {
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	298 semsg("E1073: imported name already defined: %s", p);
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	299 return FAIL;
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	300 }
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	301 return OK;
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	302 }
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	303
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	304 /*
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	305 * Allocate memory for a type_T and add the pointer to type_gap, so that it can
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	306 * be freed later.
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	307 */
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	308 static type_T *
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	309 alloc_type(garray_T *type_gap)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	310 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	311 type_T *type;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	312
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	313 if (ga_grow(type_gap, 1) == FAIL)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	314 return NULL;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	315 type = ALLOC_CLEAR_ONE(type_T);
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	316 if (type != NULL)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	317 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	318 ((type_T **)type_gap->ga_data)[type_gap->ga_len] = type;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	319 ++type_gap->ga_len;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	320 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	321 return type;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	322 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	323
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	324 static type_T *
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	325 get_list_type(type_T member_type, garray_T type_gap)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	326 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	327 type_T *type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	328
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	329 // recognize commonly used types
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	330 if (member_type->tt_type == VAR_ANY)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	331 return &t_list_any;
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	332 if (member_type->tt_type == VAR_VOID
1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	333 \|\| member_type->tt_type == VAR_UNKNOWN)
19467 f41e46f02c8c patch 8.2.0291: Vim9: assigning [] to list<string> doesn't work Bram Moolenaar <Bram@vim.org> parents: 19461 diff changeset	334 return &t_list_empty;
19521 860b39ed0e0b patch 8.2.0318: Vim9: types not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19509 diff changeset	335 if (member_type->tt_type == VAR_BOOL)
860b39ed0e0b patch 8.2.0318: Vim9: types not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19509 diff changeset	336 return &t_list_bool;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	337 if (member_type->tt_type == VAR_NUMBER)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	338 return &t_list_number;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	339 if (member_type->tt_type == VAR_STRING)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	340 return &t_list_string;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	341
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	342 // Not a common type, create a new entry.
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	343 type = alloc_type(type_gap);
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	344 if (type == NULL)
19818 c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	345 return &t_any;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	346 type->tt_type = VAR_LIST;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	347 type->tt_member = member_type;
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	348 type->tt_argcount = 0;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	349 type->tt_args = NULL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	350 return type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	351 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	352
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	353 static type_T *
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	354 get_dict_type(type_T member_type, garray_T type_gap)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	355 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	356 type_T *type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	357
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	358 // recognize commonly used types
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	359 if (member_type->tt_type == VAR_ANY)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	360 return &t_dict_any;
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	361 if (member_type->tt_type == VAR_VOID
1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	362 \|\| member_type->tt_type == VAR_UNKNOWN)
19467 f41e46f02c8c patch 8.2.0291: Vim9: assigning [] to list<string> doesn't work Bram Moolenaar <Bram@vim.org> parents: 19461 diff changeset	363 return &t_dict_empty;
19521 860b39ed0e0b patch 8.2.0318: Vim9: types not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19509 diff changeset	364 if (member_type->tt_type == VAR_BOOL)
860b39ed0e0b patch 8.2.0318: Vim9: types not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19509 diff changeset	365 return &t_dict_bool;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	366 if (member_type->tt_type == VAR_NUMBER)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	367 return &t_dict_number;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	368 if (member_type->tt_type == VAR_STRING)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	369 return &t_dict_string;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	370
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	371 // Not a common type, create a new entry.
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	372 type = alloc_type(type_gap);
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	373 if (type == NULL)
19818 c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	374 return &t_any;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	375 type->tt_type = VAR_DICT;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	376 type->tt_member = member_type;
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	377 type->tt_argcount = 0;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	378 type->tt_args = NULL;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	379 return type;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	380 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	381
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	382 /*
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	383 * Allocate a new type for a function.
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	384 */
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	385 static type_T *
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	386 alloc_func_type(type_T ret_type, int argcount, garray_T type_gap)
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	387 {
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	388 type_T *type = alloc_type(type_gap);
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	389
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	390 if (type == NULL)
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	391 return &t_any;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	392 type->tt_type = VAR_FUNC;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	393 type->tt_member = ret_type;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	394 type->tt_argcount = argcount;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	395 type->tt_args = NULL;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	396 return type;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	397 }
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	398
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	399 /*
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	400 * Get a function type, based on the return type "ret_type".
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	401 * If "argcount" is -1 or 0 a predefined type can be used.
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	402 * If "argcount" > 0 always create a new type, so that arguments can be added.
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	403 */
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	404 static type_T *
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	405 get_func_type(type_T ret_type, int argcount, garray_T type_gap)
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	406 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	407 // recognize commonly used types
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	408 if (argcount <= 0)
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	409 {
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	410 if (ret_type == &t_unknown)
b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	411 {
b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	412 // (argcount == 0) is not possible
b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	413 return &t_func_unknown;
b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	414 }
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	415 if (ret_type == &t_void)
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	416 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	417 if (argcount == 0)
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	418 return &t_func_0_void;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	419 else
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	420 return &t_func_void;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	421 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	422 if (ret_type == &t_any)
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	423 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	424 if (argcount == 0)
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	425 return &t_func_0_any;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	426 else
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	427 return &t_func_any;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	428 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	429 if (ret_type == &t_number)
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	430 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	431 if (argcount == 0)
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	432 return &t_func_0_number;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	433 else
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	434 return &t_func_number;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	435 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	436 if (ret_type == &t_string)
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	437 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	438 if (argcount == 0)
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	439 return &t_func_0_string;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	440 else
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	441 return &t_func_string;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	442 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	443 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	444
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	445 return alloc_func_type(ret_type, argcount, type_gap);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	446 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	447
19872 8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	448 /*
19914 6babfd2d15e9 patch 8.2.0513: reading past allocate memory when using varargs Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	449 * For a function type, reserve space for "argcount" argument types (including
6babfd2d15e9 patch 8.2.0513: reading past allocate memory when using varargs Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	450 * vararg).
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	451 */
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	452 static int
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	453 func_type_add_arg_types(
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	454 type_T *functype,
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	455 int argcount,
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	456 garray_T *type_gap)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	457 {
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	458 // To make it easy to free the space needed for the argument types, add the
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	459 // pointer to type_gap.
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	460 if (ga_grow(type_gap, 1) == FAIL)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	461 return FAIL;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	462 functype->tt_args = ALLOC_CLEAR_MULT(type_T *, argcount);
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	463 if (functype->tt_args == NULL)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	464 return FAIL;
19918 ccfeae6af59e patch 8.2.0515: some compilers cannot add to "void " Bram Moolenaar <Bram@vim.org>* parents: 19914 diff changeset	465 ((type_T **)type_gap->ga_data)[type_gap->ga_len] =
ccfeae6af59e patch 8.2.0515: some compilers cannot add to "void " Bram Moolenaar <Bram@vim.org>* parents: 19914 diff changeset	466 (void *)functype->tt_args;
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	467 ++type_gap->ga_len;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	468 return OK;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	469 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	470
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	471 /*
19872 8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	472 * Return the type_T for a typval. Only for primitive types.
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	473 */
20842 bacc2ab11810 patch 8.2.0973: Vim9: type is not checked when assigning to a script variable Bram Moolenaar <Bram@vim.org> parents: 20840 diff changeset	474 type_T *
19872 8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	475 typval2type(typval_T *tv)
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	476 {
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	477 if (tv->v_type == VAR_NUMBER)
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	478 return &t_number;
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	479 if (tv->v_type == VAR_BOOL)
19964 6765a88e72a5 patch 8.2.0538: Vim9: VAR_PARTIAL is not used during compilation Bram Moolenaar <Bram@vim.org> parents: 19960 diff changeset	480 return &t_bool; // not used
19872 8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	481 if (tv->v_type == VAR_STRING)
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	482 return &t_string;
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	483 if (tv->v_type == VAR_LIST) // e.g. for v:oldfiles
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	484 return &t_list_string;
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	485 if (tv->v_type == VAR_DICT) // e.g. for v:completed_item
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	486 return &t_dict_any;
19960 3c11b9f6fa03 patch 8.2.0536: Vim9: some compilation code not tested Bram Moolenaar <Bram@vim.org> parents: 19946 diff changeset	487 return &t_any; // not used
19872 8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	488 }
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	489
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	490 static void
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	491 type_mismatch(type_T expected, type_T actual)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	492 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	493 char tofree1, tofree2;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	494
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	495 semsg(_("E1013: type mismatch, expected %s but got %s"),
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	496 type_name(expected, &tofree1), type_name(actual, &tofree2));
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	497 vim_free(tofree1);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	498 vim_free(tofree2);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	499 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	500
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	501 static void
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	502 arg_type_mismatch(type_T expected, type_T actual, int argidx)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	503 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	504 char tofree1, tofree2;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	505
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	506 semsg(_("E1013: argument %d: type mismatch, expected %s but got %s"),
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	507 argidx,
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	508 type_name(expected, &tofree1), type_name(actual, &tofree2));
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	509 vim_free(tofree1);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	510 vim_free(tofree2);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	511 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	512
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	513 /*
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	514 * Check if the expected and actual types match.
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	515 * Does not allow for assigning "any" to a specific type.
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	516 */
20842 bacc2ab11810 patch 8.2.0973: Vim9: type is not checked when assigning to a script variable Bram Moolenaar <Bram@vim.org> parents: 20840 diff changeset	517 int
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	518 check_type(type_T expected, type_T actual, int give_msg)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	519 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	520 int ret = OK;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	521
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	522 // When expected is "unknown" we accept any actual type.
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	523 // When expected is "any" we accept any actual type except "void".
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	524 if (expected->tt_type != VAR_UNKNOWN
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	525 && !(expected->tt_type == VAR_ANY && actual->tt_type != VAR_VOID))
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	526
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	527 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	528 if (expected->tt_type != actual->tt_type)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	529 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	530 if (give_msg)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	531 type_mismatch(expected, actual);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	532 return FAIL;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	533 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	534 if (expected->tt_type == VAR_DICT \|\| expected->tt_type == VAR_LIST)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	535 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	536 // "unknown" is used for an empty list or dict
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	537 if (actual->tt_member != &t_unknown)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	538 ret = check_type(expected->tt_member, actual->tt_member, FALSE);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	539 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	540 else if (expected->tt_type == VAR_FUNC)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	541 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	542 if (expected->tt_member != &t_unknown)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	543 ret = check_type(expected->tt_member, actual->tt_member, FALSE);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	544 if (ret == OK && expected->tt_argcount != -1
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	545 && (actual->tt_argcount < expected->tt_min_argcount
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	546 \|\| actual->tt_argcount > expected->tt_argcount))
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	547 ret = FAIL;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	548 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	549 if (ret == FAIL && give_msg)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	550 type_mismatch(expected, actual);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	551 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	552 return ret;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	553 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	554
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	555 /////////////////////////////////////////////////////////////////////
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	556 // Following generate_ functions expect the caller to call ga_grow().
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	557
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	558 #define RETURN_NULL_IF_SKIP(cctx) if (cctx->ctx_skip == SKIP_YES) return NULL
4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	559 #define RETURN_OK_IF_SKIP(cctx) if (cctx->ctx_skip == SKIP_YES) return OK
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	560
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	561 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	562 * Generate an instruction without arguments.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	563 * Returns a pointer to the new instruction, NULL if failed.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	564 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	565 static isn_T *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	566 generate_instr(cctx_T *cctx, isntype_T isn_type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	567 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	568 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	569 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	570
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	571 RETURN_NULL_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	572 if (ga_grow(instr, 1) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	573 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	574 isn = ((isn_T *)instr->ga_data) + instr->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	575 isn->isn_type = isn_type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	576 isn->isn_lnum = cctx->ctx_lnum + 1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	577 ++instr->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	578
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	579 return isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	580 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	581
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	582 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	583 * Generate an instruction without arguments.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	584 * "drop" will be removed from the stack.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	585 * Returns a pointer to the new instruction, NULL if failed.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	586 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	587 static isn_T *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	588 generate_instr_drop(cctx_T *cctx, isntype_T isn_type, int drop)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	589 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	590 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	591
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	592 RETURN_NULL_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	593 stack->ga_len -= drop;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	594 return generate_instr(cctx, isn_type);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	595 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	596
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	597 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	598 * Generate instruction "isn_type" and put "type" on the type stack.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	599 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	600 static isn_T *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	601 generate_instr_type(cctx_T cctx, isntype_T isn_type, type_T type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	602 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	603 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	604 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	605
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	606 if ((isn = generate_instr(cctx, isn_type)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	607 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	608
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	609 if (ga_grow(stack, 1) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	610 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	611 ((type_T **)stack->ga_data)[stack->ga_len] = type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	612 ++stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	613
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	614 return isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	615 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	616
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	617 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	618 * If type at "offset" isn't already VAR_STRING then generate ISN_2STRING.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	619 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	620 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	621 may_generate_2STRING(int offset, cctx_T *cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	622 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	623 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	624 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	625 type_T type = ((type_T )stack->ga_data) + stack->ga_len + offset;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	626
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	627 if ((*type)->tt_type == VAR_STRING)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	628 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	629 *type = &t_string;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	630
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	631 if ((isn = generate_instr(cctx, ISN_2STRING)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	632 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	633 isn->isn_arg.number = offset;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	634
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	635 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	636 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	637
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	638 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	639 check_number_or_float(vartype_T type1, vartype_T type2, char_u *op)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	640 {
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	641 if (!((type1 == VAR_NUMBER \|\| type1 == VAR_FLOAT \|\| type1 == VAR_ANY)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	642 && (type2 == VAR_NUMBER \|\| type2 == VAR_FLOAT
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	643 \|\| type2 == VAR_ANY)))
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	644 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	645 if (*op == '+')
20982 bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	646 emsg(_("E1051: wrong argument type for +"));
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	647 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	648 semsg(_("E1036: %c requires number or float arguments"), *op);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	649 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	650 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	651 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	652 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	653
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	654 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	655 * Generate an instruction with two arguments. The instruction depends on the
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	656 * type of the arguments.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	657 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	658 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	659 generate_two_op(cctx_T cctx, char_u op)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	660 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	661 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	662 type_T *type1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	663 type_T *type2;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	664 vartype_T vartype;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	665 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	666
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	667 RETURN_OK_IF_SKIP(cctx);
e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	668
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	669 // Get the known type of the two items on the stack. If they are matching
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	670 // use a type-specific instruction. Otherwise fall back to runtime type
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	671 // checking.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	672 type1 = ((type_T **)stack->ga_data)[stack->ga_len - 2];
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	673 type2 = ((type_T **)stack->ga_data)[stack->ga_len - 1];
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	674 vartype = VAR_ANY;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	675 if (type1->tt_type == type2->tt_type
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	676 && (type1->tt_type == VAR_NUMBER
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	677 \|\| type1->tt_type == VAR_LIST
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	678 #ifdef FEAT_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	679 \|\| type1->tt_type == VAR_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	680 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	681 \|\| type1->tt_type == VAR_BLOB))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	682 vartype = type1->tt_type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	683
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	684 switch (*op)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	685 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	686 case '+': if (vartype != VAR_LIST && vartype != VAR_BLOB
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	687 && type1->tt_type != VAR_ANY
1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	688 && type2->tt_type != VAR_ANY
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	689 && check_number_or_float(
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	690 type1->tt_type, type2->tt_type, op) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	691 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	692 isn = generate_instr_drop(cctx,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	693 vartype == VAR_NUMBER ? ISN_OPNR
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	694 : vartype == VAR_LIST ? ISN_ADDLIST
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	695 : vartype == VAR_BLOB ? ISN_ADDBLOB
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	696 #ifdef FEAT_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	697 : vartype == VAR_FLOAT ? ISN_OPFLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	698 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	699 : ISN_OPANY, 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	700 if (isn != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	701 isn->isn_arg.op.op_type = EXPR_ADD;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	702 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	703
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	704 case '-':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	705 case '*':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	706 case '/': if (check_number_or_float(type1->tt_type, type2->tt_type,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	707 op) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	708 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	709 if (vartype == VAR_NUMBER)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	710 isn = generate_instr_drop(cctx, ISN_OPNR, 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	711 #ifdef FEAT_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	712 else if (vartype == VAR_FLOAT)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	713 isn = generate_instr_drop(cctx, ISN_OPFLOAT, 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	714 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	715 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	716 isn = generate_instr_drop(cctx, ISN_OPANY, 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	717 if (isn != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	718 isn->isn_arg.op.op_type = op == ''
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	719 ? EXPR_MULT : *op == '/'? EXPR_DIV : EXPR_SUB;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	720 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	721
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	722 case '%': if ((type1->tt_type != VAR_ANY
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	723 && type1->tt_type != VAR_NUMBER)
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	724 \|\| (type2->tt_type != VAR_ANY
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	725 && type2->tt_type != VAR_NUMBER))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	726 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	727 emsg(_("E1035: % requires number arguments"));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	728 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	729 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	730 isn = generate_instr_drop(cctx,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	731 vartype == VAR_NUMBER ? ISN_OPNR : ISN_OPANY, 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	732 if (isn != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	733 isn->isn_arg.op.op_type = EXPR_REM;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	734 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	735 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	736
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	737 // correct type of result
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	738 if (vartype == VAR_ANY)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	739 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	740 type_T *type = &t_any;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	741
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	742 #ifdef FEAT_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	743 // float+number and number+float results in float
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	744 if ((type1->tt_type == VAR_NUMBER \|\| type1->tt_type == VAR_FLOAT)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	745 && (type2->tt_type == VAR_NUMBER \|\| type2->tt_type == VAR_FLOAT))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	746 type = &t_float;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	747 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	748 ((type_T **)stack->ga_data)[stack->ga_len - 1] = type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	749 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	750
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	751 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	752 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	753
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	754 /*
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	755 * Get the instruction to use for comparing "type1" with "type2"
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	756 * Return ISN_DROP when failed.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	757 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	758 static isntype_T
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	759 get_compare_isn(exptype_T exptype, vartype_T type1, vartype_T type2)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	760 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	761 isntype_T isntype = ISN_DROP;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	762
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	763 if (type1 == VAR_UNKNOWN)
1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	764 type1 = VAR_ANY;
1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	765 if (type2 == VAR_UNKNOWN)
1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	766 type2 = VAR_ANY;
1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	767
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	768 if (type1 == type2)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	769 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	770 switch (type1)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	771 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	772 case VAR_BOOL: isntype = ISN_COMPAREBOOL; break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	773 case VAR_SPECIAL: isntype = ISN_COMPARESPECIAL; break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	774 case VAR_NUMBER: isntype = ISN_COMPARENR; break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	775 case VAR_FLOAT: isntype = ISN_COMPAREFLOAT; break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	776 case VAR_STRING: isntype = ISN_COMPARESTRING; break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	777 case VAR_BLOB: isntype = ISN_COMPAREBLOB; break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	778 case VAR_LIST: isntype = ISN_COMPARELIST; break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	779 case VAR_DICT: isntype = ISN_COMPAREDICT; break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	780 case VAR_FUNC: isntype = ISN_COMPAREFUNC; break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	781 default: isntype = ISN_COMPAREANY; break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	782 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	783 }
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	784 else if (type1 == VAR_ANY \|\| type2 == VAR_ANY
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	785 \|\| ((type1 == VAR_NUMBER \|\| type1 == VAR_FLOAT)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	786 && (type2 == VAR_NUMBER \|\| type2 ==VAR_FLOAT)))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	787 isntype = ISN_COMPAREANY;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	788
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	789 if ((exptype == EXPR_IS \|\| exptype == EXPR_ISNOT)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	790 && (isntype == ISN_COMPAREBOOL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	791 \|\| isntype == ISN_COMPARESPECIAL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	792 \|\| isntype == ISN_COMPARENR
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	793 \|\| isntype == ISN_COMPAREFLOAT))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	794 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	795 semsg(_("E1037: Cannot use \"%s\" with %s"),
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	796 exptype == EXPR_IS ? "is" : "isnot" , vartype_name(type1));
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	797 return ISN_DROP;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	798 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	799 if (isntype == ISN_DROP
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	800 \|\| ((exptype != EXPR_EQUAL && exptype != EXPR_NEQUAL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	801 && (type1 == VAR_BOOL \|\| type1 == VAR_SPECIAL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	802 \|\| type2 == VAR_BOOL \|\| type2 == VAR_SPECIAL)))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	803 \|\| ((exptype != EXPR_EQUAL && exptype != EXPR_NEQUAL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	804 && exptype != EXPR_IS && exptype != EXPR_ISNOT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	805 && (type1 == VAR_BLOB \|\| type2 == VAR_BLOB
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	806 \|\| type1 == VAR_LIST \|\| type2 == VAR_LIST))))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	807 {
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	808 semsg(_("E1072: Cannot compare %s with %s"),
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	809 vartype_name(type1), vartype_name(type2));
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	810 return ISN_DROP;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	811 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	812 return isntype;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	813 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	814
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	815 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	816 * Generate an ISN_COMPARE* instruction with a boolean result.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	817 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	818 static int
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	819 generate_COMPARE(cctx_T *cctx, exptype_T exptype, int ic)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	820 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	821 isntype_T isntype;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	822 isn_T *isn;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	823 garray_T *stack = &cctx->ctx_type_stack;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	824 vartype_T type1;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	825 vartype_T type2;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	826
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	827 RETURN_OK_IF_SKIP(cctx);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	828
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	829 // Get the known type of the two items on the stack. If they are matching
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	830 // use a type-specific instruction. Otherwise fall back to runtime type
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	831 // checking.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	832 type1 = ((type_T **)stack->ga_data)[stack->ga_len - 2]->tt_type;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	833 type2 = ((type_T **)stack->ga_data)[stack->ga_len - 1]->tt_type;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	834 isntype = get_compare_isn(exptype, type1, type2);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	835 if (isntype == ISN_DROP)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	836 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	837
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	838 if ((isn = generate_instr(cctx, isntype)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	839 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	840 isn->isn_arg.op.op_type = exptype;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	841 isn->isn_arg.op.op_ic = ic;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	842
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	843 // takes two arguments, puts one bool back
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	844 if (stack->ga_len >= 2)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	845 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	846 --stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	847 ((type_T **)stack->ga_data)[stack->ga_len - 1] = &t_bool;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	848 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	849
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	850 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	851 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	852
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	853 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	854 * Generate an ISN_2BOOL instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	855 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	856 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	857 generate_2BOOL(cctx_T *cctx, int invert)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	858 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	859 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	860 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	861
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	862 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	863 if ((isn = generate_instr(cctx, ISN_2BOOL)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	864 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	865 isn->isn_arg.number = invert;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	866
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	867 // type becomes bool
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	868 ((type_T **)stack->ga_data)[stack->ga_len - 1] = &t_bool;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	869
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	870 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	871 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	872
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	873 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	874 generate_TYPECHECK(cctx_T cctx, type_T vartype, int offset)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	875 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	876 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	877 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	878
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	879 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	880 if ((isn = generate_instr(cctx, ISN_CHECKTYPE)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	881 return FAIL;
20207 3c247d9cd6f9 patch 8.2.0659: Vim9: no test for equal func type Bram Moolenaar <Bram@vim.org> parents: 20203 diff changeset	882 // TODO: whole type, e.g. for a function also arg and return types
3c247d9cd6f9 patch 8.2.0659: Vim9: no test for equal func type Bram Moolenaar <Bram@vim.org> parents: 20203 diff changeset	883 isn->isn_arg.type.ct_type = vartype->tt_type;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	884 isn->isn_arg.type.ct_off = offset;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	885
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	886 // type becomes vartype
20255 aac52c32a91f patch 8.2.0683: Vim9: parsing type does not always work Bram Moolenaar <Bram@vim.org> parents: 20253 diff changeset	887 ((type_T **)stack->ga_data)[stack->ga_len + offset] = vartype;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	888
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	889 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	890 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	891
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	892 /*
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	893 * Check that
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	894 * - "actual" is "expected" type or
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	895 * - "actual" is a type that can be "expected" type: add a runtime check; or
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	896 * - return FAIL.
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	897 */
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	898 static int
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	899 need_type(type_T actual, type_T expected, int offset, cctx_T *cctx)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	900 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	901 if (check_type(expected, actual, FALSE) == OK)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	902 return OK;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	903 if (actual->tt_type != VAR_ANY
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	904 && actual->tt_type != VAR_UNKNOWN
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	905 && !(actual->tt_type == VAR_FUNC
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	906 && (actual->tt_member == &t_any \|\| actual->tt_argcount < 0)))
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	907 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	908 type_mismatch(expected, actual);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	909 return FAIL;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	910 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	911 generate_TYPECHECK(cctx, expected, offset);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	912 return OK;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	913 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	914
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	915 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	916 * Generate an ISN_PUSHNR instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	917 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	918 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	919 generate_PUSHNR(cctx_T *cctx, varnumber_T number)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	920 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	921 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	922
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	923 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	924 if ((isn = generate_instr_type(cctx, ISN_PUSHNR, &t_number)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	925 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	926 isn->isn_arg.number = number;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	927
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	928 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	929 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	930
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	931 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	932 * Generate an ISN_PUSHBOOL instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	933 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	934 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	935 generate_PUSHBOOL(cctx_T *cctx, varnumber_T number)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	936 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	937 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	938
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	939 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	940 if ((isn = generate_instr_type(cctx, ISN_PUSHBOOL, &t_bool)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	941 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	942 isn->isn_arg.number = number;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	943
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	944 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	945 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	946
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	947 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	948 * Generate an ISN_PUSHSPEC instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	949 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	950 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	951 generate_PUSHSPEC(cctx_T *cctx, varnumber_T number)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	952 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	953 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	954
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	955 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	956 if ((isn = generate_instr_type(cctx, ISN_PUSHSPEC, &t_special)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	957 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	958 isn->isn_arg.number = number;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	959
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	960 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	961 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	962
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	963 #ifdef FEAT_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	964 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	965 * Generate an ISN_PUSHF instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	966 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	967 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	968 generate_PUSHF(cctx_T *cctx, float_T fnumber)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	969 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	970 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	971
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	972 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	973 if ((isn = generate_instr_type(cctx, ISN_PUSHF, &t_float)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	974 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	975 isn->isn_arg.fnumber = fnumber;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	976
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	977 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	978 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	979 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	980
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	981 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	982 * Generate an ISN_PUSHS instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	983 * Consumes "str".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	984 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	985 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	986 generate_PUSHS(cctx_T cctx, char_u str)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	987 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	988 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	989
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	990 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	991 if ((isn = generate_instr_type(cctx, ISN_PUSHS, &t_string)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	992 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	993 isn->isn_arg.string = str;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	994
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	995 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	996 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	997
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	998 /*
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	999 * Generate an ISN_PUSHCHANNEL instruction.
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1000 * Consumes "channel".
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1001 */
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1002 static int
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1003 generate_PUSHCHANNEL(cctx_T cctx, channel_T channel)
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1004 {
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1005 isn_T *isn;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1006
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1007 RETURN_OK_IF_SKIP(cctx);
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1008 if ((isn = generate_instr_type(cctx, ISN_PUSHCHANNEL, &t_channel)) == NULL)
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1009 return FAIL;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1010 isn->isn_arg.channel = channel;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1011
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1012 return OK;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1013 }
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1014
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1015 /*
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1016 * Generate an ISN_PUSHJOB instruction.
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1017 * Consumes "job".
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1018 */
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1019 static int
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1020 generate_PUSHJOB(cctx_T cctx, job_T job)
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1021 {
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1022 isn_T *isn;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1023
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1024 RETURN_OK_IF_SKIP(cctx);
19572 6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19566 diff changeset	1025 if ((isn = generate_instr_type(cctx, ISN_PUSHJOB, &t_channel)) == NULL)
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1026 return FAIL;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1027 isn->isn_arg.job = job;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1028
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1029 return OK;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1030 }
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1031
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1032 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1033 * Generate an ISN_PUSHBLOB instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1034 * Consumes "blob".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1035 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1036 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1037 generate_PUSHBLOB(cctx_T cctx, blob_T blob)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1038 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1039 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1040
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1041 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1042 if ((isn = generate_instr_type(cctx, ISN_PUSHBLOB, &t_blob)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1043 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1044 isn->isn_arg.blob = blob;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1045
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1046 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1047 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1048
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1049 /*
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1050 * Generate an ISN_PUSHFUNC instruction with name "name".
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1051 * Consumes "name".
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1052 */
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1053 static int
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1054 generate_PUSHFUNC(cctx_T cctx, char_u name, type_T *type)
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1055 {
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1056 isn_T *isn;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1057
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1058 RETURN_OK_IF_SKIP(cctx);
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1059 if ((isn = generate_instr_type(cctx, ISN_PUSHFUNC, type)) == NULL)
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1060 return FAIL;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1061 isn->isn_arg.string = name;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1062
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1063 return OK;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1064 }
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1065
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1066 /*
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1067 * Generate an ISN_GETITEM instruction with "index".
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1068 */
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1069 static int
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1070 generate_GETITEM(cctx_T *cctx, int index)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1071 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1072 isn_T *isn;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1073 garray_T *stack = &cctx->ctx_type_stack;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1074 type_T type = ((type_T *)stack->ga_data)[stack->ga_len - 1];
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1075 type_T *item_type = &t_any;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1076
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1077 RETURN_OK_IF_SKIP(cctx);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1078
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1079 if (type->tt_type == VAR_LIST)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1080 item_type = type->tt_member;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1081 else if (type->tt_type != VAR_ANY)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1082 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1083 emsg(_(e_listreq));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1084 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1085 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1086 if ((isn = generate_instr(cctx, ISN_GETITEM)) == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1087 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1088 isn->isn_arg.number = index;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1089
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1090 // add the item type to the type stack
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1091 if (ga_grow(stack, 1) == FAIL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1092 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1093 ((type_T **)stack->ga_data)[stack->ga_len] = item_type;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1094 ++stack->ga_len;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1095 return OK;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1096 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1097
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1098 /*
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1099 * Generate an ISN_SLICE instruction with "count".
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1100 */
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1101 static int
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1102 generate_SLICE(cctx_T *cctx, int count)
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1103 {
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1104 isn_T *isn;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1105
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1106 RETURN_OK_IF_SKIP(cctx);
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1107 if ((isn = generate_instr(cctx, ISN_SLICE)) == NULL)
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1108 return FAIL;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1109 isn->isn_arg.number = count;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1110 return OK;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1111 }
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1112
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1113 /*
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1114 * Generate an ISN_CHECKLEN instruction with "min_len".
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1115 */
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1116 static int
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1117 generate_CHECKLEN(cctx_T *cctx, int min_len, int more_OK)
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1118 {
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1119 isn_T *isn;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1120
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1121 RETURN_OK_IF_SKIP(cctx);
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1122
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1123 if ((isn = generate_instr(cctx, ISN_CHECKLEN)) == NULL)
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1124 return FAIL;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1125 isn->isn_arg.checklen.cl_min_len = min_len;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1126 isn->isn_arg.checklen.cl_more_OK = more_OK;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1127
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1128 return OK;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1129 }
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1130
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1131 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1132 * Generate an ISN_STORE instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1133 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1134 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1135 generate_STORE(cctx_T cctx, isntype_T isn_type, int idx, char_u name)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1136 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1137 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1138
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1139 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1140 if ((isn = generate_instr_drop(cctx, isn_type, 1)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1141 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1142 if (name != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1143 isn->isn_arg.string = vim_strsave(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1144 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1145 isn->isn_arg.number = idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1146
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1147 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1148 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1149
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1150 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1151 * Generate an ISN_STORENR instruction (short for ISN_PUSHNR + ISN_STORE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1152 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1153 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1154 generate_STORENR(cctx_T *cctx, int idx, varnumber_T value)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1155 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1156 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1157
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1158 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1159 if ((isn = generate_instr(cctx, ISN_STORENR)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1160 return FAIL;
19597 1098989a90ee patch 8.2.0355: Vim9: str_val is confusing, it's a number Bram Moolenaar <Bram@vim.org> parents: 19587 diff changeset	1161 isn->isn_arg.storenr.stnr_idx = idx;
1098989a90ee patch 8.2.0355: Vim9: str_val is confusing, it's a number Bram Moolenaar <Bram@vim.org> parents: 19587 diff changeset	1162 isn->isn_arg.storenr.stnr_val = value;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1163
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1164 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1165 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1166
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1167 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1168 * Generate an ISN_STOREOPT instruction
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1169 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1170 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1171 generate_STOREOPT(cctx_T cctx, char_u name, int opt_flags)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1172 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1173 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1174
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1175 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1176 if ((isn = generate_instr(cctx, ISN_STOREOPT)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1177 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1178 isn->isn_arg.storeopt.so_name = vim_strsave(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1179 isn->isn_arg.storeopt.so_flags = opt_flags;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1180
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1181 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1182 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1183
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1184 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1185 * Generate an ISN_LOAD or similar instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1186 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1187 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1188 generate_LOAD(
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1189 cctx_T *cctx,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1190 isntype_T isn_type,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1191 int idx,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1192 char_u *name,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1193 type_T *type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1194 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1195 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1196
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1197 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1198 if ((isn = generate_instr_type(cctx, isn_type, type)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1199 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1200 if (name != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1201 isn->isn_arg.string = vim_strsave(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1202 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1203 isn->isn_arg.number = idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1204
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1205 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1206 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1207
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1208 /*
19960 3c11b9f6fa03 patch 8.2.0536: Vim9: some compilation code not tested Bram Moolenaar <Bram@vim.org> parents: 19946 diff changeset	1209 * Generate an ISN_LOADV instruction for v:var.
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1210 */
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1211 static int
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1212 generate_LOADV(
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1213 cctx_T *cctx,
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1214 char_u *name,
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1215 int error)
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1216 {
19960 3c11b9f6fa03 patch 8.2.0536: Vim9: some compilation code not tested Bram Moolenaar <Bram@vim.org> parents: 19946 diff changeset	1217 int di_flags;
3c11b9f6fa03 patch 8.2.0536: Vim9: some compilation code not tested Bram Moolenaar <Bram@vim.org> parents: 19946 diff changeset	1218 int vidx = find_vim_var(name, &di_flags);
3c11b9f6fa03 patch 8.2.0536: Vim9: some compilation code not tested Bram Moolenaar <Bram@vim.org> parents: 19946 diff changeset	1219 type_T *type;
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1220
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1221 RETURN_OK_IF_SKIP(cctx);
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1222 if (vidx < 0)
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1223 {
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1224 if (error)
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1225 semsg(_(e_var_notfound), name);
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1226 return FAIL;
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1227 }
19960 3c11b9f6fa03 patch 8.2.0536: Vim9: some compilation code not tested Bram Moolenaar <Bram@vim.org> parents: 19946 diff changeset	1228 type = typval2type(get_vim_var_tv(vidx));
3c11b9f6fa03 patch 8.2.0536: Vim9: some compilation code not tested Bram Moolenaar <Bram@vim.org> parents: 19946 diff changeset	1229
3c11b9f6fa03 patch 8.2.0536: Vim9: some compilation code not tested Bram Moolenaar <Bram@vim.org> parents: 19946 diff changeset	1230 return generate_LOAD(cctx, ISN_LOADV, vidx, NULL, type);
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1231 }
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1232
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1233 /*
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1234 * Generate an ISN_UNLET instruction.
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1235 */
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1236 static int
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	1237 generate_UNLET(cctx_T cctx, isntype_T isn_type, char_u name, int forceit)
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1238 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1239 isn_T *isn;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1240
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1241 RETURN_OK_IF_SKIP(cctx);
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	1242 if ((isn = generate_instr(cctx, isn_type)) == NULL)
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1243 return FAIL;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1244 isn->isn_arg.unlet.ul_name = vim_strsave(name);
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1245 isn->isn_arg.unlet.ul_forceit = forceit;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1246
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1247 return OK;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1248 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1249
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1250 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1251 * Generate an ISN_LOADS instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1252 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1253 static int
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1254 generate_OLDSCRIPT(
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1255 cctx_T *cctx,
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1256 isntype_T isn_type,
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1257 char_u *name,
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1258 int sid,
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1259 type_T *type)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1260 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1261 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1262
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1263 RETURN_OK_IF_SKIP(cctx);
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1264 if (isn_type == ISN_LOADS)
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1265 isn = generate_instr_type(cctx, isn_type, type);
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1266 else
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1267 isn = generate_instr_drop(cctx, isn_type, 1);
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1268 if (isn == NULL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1269 return FAIL;
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1270 isn->isn_arg.loadstore.ls_name = vim_strsave(name);
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1271 isn->isn_arg.loadstore.ls_sid = sid;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1272
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1273 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1274 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1275
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1276 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1277 * Generate an ISN_LOADSCRIPT or ISN_STORESCRIPT instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1278 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1279 static int
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1280 generate_VIM9SCRIPT(
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1281 cctx_T *cctx,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1282 isntype_T isn_type,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1283 int sid,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1284 int idx,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1285 type_T *type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1286 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1287 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1288
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1289 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1290 if (isn_type == ISN_LOADSCRIPT)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1291 isn = generate_instr_type(cctx, isn_type, type);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1292 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1293 isn = generate_instr_drop(cctx, isn_type, 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1294 if (isn == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1295 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1296 isn->isn_arg.script.script_sid = sid;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1297 isn->isn_arg.script.script_idx = idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1298 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1299 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1300
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1301 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1302 * Generate an ISN_NEWLIST instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1303 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1304 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1305 generate_NEWLIST(cctx_T *cctx, int count)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1306 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1307 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1308 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1309 type_T *type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1310 type_T *member;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1311
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1312 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1313 if ((isn = generate_instr(cctx, ISN_NEWLIST)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1314 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1315 isn->isn_arg.number = count;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1316
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1317 // drop the value types
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1318 stack->ga_len -= count;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1319
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1320 // Use the first value type for the list member type. Use "any" for an
19467 f41e46f02c8c patch 8.2.0291: Vim9: assigning [] to list<string> doesn't work Bram Moolenaar <Bram@vim.org> parents: 19461 diff changeset	1321 // empty list.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1322 if (count > 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1323 member = ((type_T **)stack->ga_data)[stack->ga_len];
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1324 else
19467 f41e46f02c8c patch 8.2.0291: Vim9: assigning [] to list<string> doesn't work Bram Moolenaar <Bram@vim.org> parents: 19461 diff changeset	1325 member = &t_void;
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1326 type = get_list_type(member, cctx->ctx_type_list);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1327
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1328 // add the list type to the type stack
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1329 if (ga_grow(stack, 1) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1330 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1331 ((type_T **)stack->ga_data)[stack->ga_len] = type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1332 ++stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1333
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1334 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1335 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1336
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1337 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1338 * Generate an ISN_NEWDICT instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1339 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1340 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1341 generate_NEWDICT(cctx_T *cctx, int count)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1342 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1343 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1344 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1345 type_T *type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1346 type_T *member;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1347
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1348 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1349 if ((isn = generate_instr(cctx, ISN_NEWDICT)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1350 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1351 isn->isn_arg.number = count;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1352
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1353 // drop the key and value types
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1354 stack->ga_len -= 2 * count;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1355
19467 f41e46f02c8c patch 8.2.0291: Vim9: assigning [] to list<string> doesn't work Bram Moolenaar <Bram@vim.org> parents: 19461 diff changeset	1356 // Use the first value type for the list member type. Use "void" for an
f41e46f02c8c patch 8.2.0291: Vim9: assigning [] to list<string> doesn't work Bram Moolenaar <Bram@vim.org> parents: 19461 diff changeset	1357 // empty dict.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1358 if (count > 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1359 member = ((type_T **)stack->ga_data)[stack->ga_len + 1];
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1360 else
19467 f41e46f02c8c patch 8.2.0291: Vim9: assigning [] to list<string> doesn't work Bram Moolenaar <Bram@vim.org> parents: 19461 diff changeset	1361 member = &t_void;
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1362 type = get_dict_type(member, cctx->ctx_type_list);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1363
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1364 // add the dict type to the type stack
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1365 if (ga_grow(stack, 1) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1366 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1367 ((type_T **)stack->ga_data)[stack->ga_len] = type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1368 ++stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1369
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1370 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1371 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1372
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1373 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1374 * Generate an ISN_FUNCREF instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1375 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1376 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1377 generate_FUNCREF(cctx_T *cctx, int dfunc_idx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1378 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1379 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1380 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1381
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1382 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1383 if ((isn = generate_instr(cctx, ISN_FUNCREF)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1384 return FAIL;
20247 e46e72aaff74 patch 8.2.0679: Vim9: incomplete support for closures Bram Moolenaar <Bram@vim.org> parents: 20244 diff changeset	1385 isn->isn_arg.funcref.fr_func = dfunc_idx;
e46e72aaff74 patch 8.2.0679: Vim9: incomplete support for closures Bram Moolenaar <Bram@vim.org> parents: 20244 diff changeset	1386 isn->isn_arg.funcref.fr_var_idx = cctx->ctx_closure_count++;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1387
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1388 if (ga_grow(stack, 1) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1389 return FAIL;
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1390 ((type_T **)stack->ga_data)[stack->ga_len] = &t_func_any;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1391 // TODO: argument and return types
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1392 ++stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1393
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1394 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1395 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1396
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1397 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1398 * Generate an ISN_JUMP instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1399 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1400 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1401 generate_JUMP(cctx_T *cctx, jumpwhen_T when, int where)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1402 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1403 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1404 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1405
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1406 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1407 if ((isn = generate_instr(cctx, ISN_JUMP)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1408 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1409 isn->isn_arg.jump.jump_when = when;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1410 isn->isn_arg.jump.jump_where = where;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1411
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1412 if (when != JUMP_ALWAYS && stack->ga_len > 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1413 --stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1414
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1415 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1416 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1417
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1418 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1419 generate_FOR(cctx_T *cctx, int loop_idx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1420 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1421 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1422 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1423
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1424 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1425 if ((isn = generate_instr(cctx, ISN_FOR)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1426 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1427 isn->isn_arg.forloop.for_idx = loop_idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1428
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1429 if (ga_grow(stack, 1) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1430 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1431 // type doesn't matter, will be stored next
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1432 ((type_T **)stack->ga_data)[stack->ga_len] = &t_any;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1433 ++stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1434
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1435 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1436 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1437
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1438 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1439 * Generate an ISN_BCALL instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1440 * Return FAIL if the number of arguments is wrong.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1441 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1442 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1443 generate_BCALL(cctx_T *cctx, int func_idx, int argcount)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1444 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1445 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1446 garray_T *stack = &cctx->ctx_type_stack;
19564 06f29b6ea04a patch 8.2.0339: Vim9: function return type may depend on arguments Bram Moolenaar <Bram@vim.org> parents: 19562 diff changeset	1447 type_T *argtypes[MAX_FUNC_ARGS];
06f29b6ea04a patch 8.2.0339: Vim9: function return type may depend on arguments Bram Moolenaar <Bram@vim.org> parents: 19562 diff changeset	1448 int i;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1449
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1450 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1451 if (check_internal_func(func_idx, argcount) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1452 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1453
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1454 if ((isn = generate_instr(cctx, ISN_BCALL)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1455 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1456 isn->isn_arg.bfunc.cbf_idx = func_idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1457 isn->isn_arg.bfunc.cbf_argcount = argcount;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1458
19564 06f29b6ea04a patch 8.2.0339: Vim9: function return type may depend on arguments Bram Moolenaar <Bram@vim.org> parents: 19562 diff changeset	1459 for (i = 0; i < argcount; ++i)
06f29b6ea04a patch 8.2.0339: Vim9: function return type may depend on arguments Bram Moolenaar <Bram@vim.org> parents: 19562 diff changeset	1460 argtypes[i] = ((type_T **)stack->ga_data)[stack->ga_len - argcount + i];
06f29b6ea04a patch 8.2.0339: Vim9: function return type may depend on arguments Bram Moolenaar <Bram@vim.org> parents: 19562 diff changeset	1461
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1462 stack->ga_len -= argcount; // drop the arguments
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1463 if (ga_grow(stack, 1) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1464 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1465 ((type_T **)stack->ga_data)[stack->ga_len] =
19564 06f29b6ea04a patch 8.2.0339: Vim9: function return type may depend on arguments Bram Moolenaar <Bram@vim.org> parents: 19562 diff changeset	1466 internal_func_ret_type(func_idx, argcount, argtypes);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1467 ++stack->ga_len; // add return value
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1468
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1469 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1470 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1471
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1472 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1473 * Generate an ISN_DCALL or ISN_UCALL instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1474 * Return FAIL if the number of arguments is wrong.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1475 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1476 static int
19328 e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	1477 generate_CALL(cctx_T cctx, ufunc_T ufunc, int pushed_argcount)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1478 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1479 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1480 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1481 int regular_args = ufunc->uf_args.ga_len;
19328 e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	1482 int argcount = pushed_argcount;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1483
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1484 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1485 if (argcount > regular_args && !has_varargs(ufunc))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1486 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1487 semsg(_(e_toomanyarg), ufunc->uf_name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1488 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1489 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1490 if (argcount < regular_args - ufunc->uf_def_args.ga_len)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1491 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1492 semsg(_(e_toofewarg), ufunc->uf_name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1493 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1494 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1495
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	1496 if (ufunc->uf_def_status != UF_NOT_COMPILED)
19944 3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1497 {
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1498 int i;
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1499
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1500 for (i = 0; i < argcount; ++i)
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1501 {
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1502 type_T *expected;
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1503 type_T *actual;
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1504
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1505 if (i < regular_args)
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1506 {
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1507 if (ufunc->uf_arg_types == NULL)
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1508 continue;
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1509 expected = ufunc->uf_arg_types[i];
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1510 }
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1511 else
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1512 expected = ufunc->uf_va_type->tt_member;
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1513 actual = ((type_T **)stack->ga_data)[stack->ga_len - argcount + i];
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1514 if (need_type(actual, expected, -argcount + i, cctx) == FAIL)
19944 3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1515 {
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1516 arg_type_mismatch(expected, actual, i + 1);
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1517 return FAIL;
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1518 }
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1519 }
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	1520 if (ufunc->uf_def_status == UF_TO_BE_COMPILED)
20534 ae758aa4ee5e patch 8.2.0821: Vim9: memory leak in expr test Bram Moolenaar <Bram@vim.org> parents: 20532 diff changeset	1521 if (compile_def_function(ufunc, TRUE, NULL) == FAIL)
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	1522 return FAIL;
19944 3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1523 }
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1524
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1525 if ((isn = generate_instr(cctx,
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	1526 ufunc->uf_def_status != UF_NOT_COMPILED ? ISN_DCALL
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	1527 : ISN_UCALL)) == NULL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1528 return FAIL;
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	1529 if (ufunc->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: diff changeset	1530 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1531 isn->isn_arg.dfunc.cdf_idx = ufunc->uf_dfunc_idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1532 isn->isn_arg.dfunc.cdf_argcount = argcount;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1533 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1534 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1535 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1536 // A user function may be deleted and redefined later, can't use the
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1537 // ufunc pointer, need to look it up again at runtime.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1538 isn->isn_arg.ufunc.cuf_name = vim_strsave(ufunc->uf_name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1539 isn->isn_arg.ufunc.cuf_argcount = argcount;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1540 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1541
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1542 stack->ga_len -= argcount; // drop the arguments
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1543 if (ga_grow(stack, 1) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1544 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1545 // add return value
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1546 ((type_T **)stack->ga_data)[stack->ga_len] = ufunc->uf_ret_type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1547 ++stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1548
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1549 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1550 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1551
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1552 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1553 * Generate an ISN_UCALL instruction when the function isn't defined yet.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1554 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1555 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1556 generate_UCALL(cctx_T cctx, char_u name, int argcount)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1557 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1558 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1559 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1560
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1561 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1562 if ((isn = generate_instr(cctx, ISN_UCALL)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1563 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1564 isn->isn_arg.ufunc.cuf_name = vim_strsave(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1565 isn->isn_arg.ufunc.cuf_argcount = argcount;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1566
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1567 stack->ga_len -= argcount; // drop the arguments
19295 2a63b7f5802a patch 8.2.0206: calling Vim9 function using default argument fails Bram Moolenaar <Bram@vim.org> parents: 19285 diff changeset	1568 if (ga_grow(stack, 1) == FAIL)
2a63b7f5802a patch 8.2.0206: calling Vim9 function using default argument fails Bram Moolenaar <Bram@vim.org> parents: 19285 diff changeset	1569 return FAIL;
2a63b7f5802a patch 8.2.0206: calling Vim9 function using default argument fails Bram Moolenaar <Bram@vim.org> parents: 19285 diff changeset	1570 // add return value
2a63b7f5802a patch 8.2.0206: calling Vim9 function using default argument fails Bram Moolenaar <Bram@vim.org> parents: 19285 diff changeset	1571 ((type_T **)stack->ga_data)[stack->ga_len] = &t_any;
2a63b7f5802a patch 8.2.0206: calling Vim9 function using default argument fails Bram Moolenaar <Bram@vim.org> parents: 19285 diff changeset	1572 ++stack->ga_len;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1573
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1574 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1575 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1576
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1577 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1578 * Generate an ISN_PCALL instruction.
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1579 * "type" is the type of the FuncRef.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1580 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1581 static int
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1582 generate_PCALL(
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1583 cctx_T *cctx,
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1584 int argcount,
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1585 char_u *name,
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1586 type_T *type,
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1587 int at_top)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1588 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1589 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1590 garray_T *stack = &cctx->ctx_type_stack;
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1591 type_T *ret_type;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1592
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1593 RETURN_OK_IF_SKIP(cctx);
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1594
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1595 if (type->tt_type == VAR_ANY)
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1596 ret_type = &t_any;
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1597 else if (type->tt_type == VAR_FUNC \|\| type->tt_type == VAR_PARTIAL)
20281 ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1598 {
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1599 if (type->tt_argcount != -1)
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1600 {
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1601 int varargs = (type->tt_flags & TTFLAG_VARARGS) ? 1 : 0;
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1602
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1603 if (argcount < type->tt_min_argcount - varargs)
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1604 {
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1605 semsg(_(e_toofewarg), "[reference]");
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1606 return FAIL;
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1607 }
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1608 if (!varargs && argcount > type->tt_argcount)
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1609 {
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1610 semsg(_(e_toomanyarg), "[reference]");
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1611 return FAIL;
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1612 }
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1613 }
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1614 ret_type = type->tt_member;
20281 ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1615 }
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1616 else
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1617 {
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1618 semsg(_("E1085: Not a callable type: %s"), name);
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1619 return FAIL;
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1620 }
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1621
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1622 if ((isn = generate_instr(cctx, ISN_PCALL)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1623 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1624 isn->isn_arg.pfunc.cpf_top = at_top;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1625 isn->isn_arg.pfunc.cpf_argcount = argcount;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1626
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1627 stack->ga_len -= argcount; // drop the arguments
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1628
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1629 // drop the funcref/partial, get back the return value
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1630 ((type_T **)stack->ga_data)[stack->ga_len - 1] = ret_type;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1631
19862 846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19860 diff changeset	1632 // If partial is above the arguments it must be cleared and replaced with
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19860 diff changeset	1633 // the return value.
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19860 diff changeset	1634 if (at_top && generate_instr(cctx, ISN_PCALL_END) == NULL)
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19860 diff changeset	1635 return FAIL;
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19860 diff changeset	1636
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1637 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1638 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1639
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1640 /*
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	1641 * Generate an ISN_STRINGMEMBER instruction.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1642 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1643 static int
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	1644 generate_STRINGMEMBER(cctx_T cctx, char_u name, size_t len)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1645 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1646 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1647 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1648 type_T *type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1649
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1650 RETURN_OK_IF_SKIP(cctx);
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	1651 if ((isn = generate_instr(cctx, ISN_STRINGMEMBER)) == NULL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1652 return FAIL;
20830 9064044fd4f6 patch 8.2.0967: unnecessary type casts for vim_strnsave() Bram Moolenaar <Bram@vim.org> parents: 20538 diff changeset	1653 isn->isn_arg.string = vim_strnsave(name, len);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1654
19461 08ef11a81daa patch 8.2.0288: Vim9: some float and blob operators not tested Bram Moolenaar <Bram@vim.org> parents: 19455 diff changeset	1655 // check for dict type
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1656 type = ((type_T **)stack->ga_data)[stack->ga_len - 1];
19461 08ef11a81daa patch 8.2.0288: Vim9: some float and blob operators not tested Bram Moolenaar <Bram@vim.org> parents: 19455 diff changeset	1657 if (type->tt_type != VAR_DICT && type != &t_any)
08ef11a81daa patch 8.2.0288: Vim9: some float and blob operators not tested Bram Moolenaar <Bram@vim.org> parents: 19455 diff changeset	1658 {
08ef11a81daa patch 8.2.0288: Vim9: some float and blob operators not tested Bram Moolenaar <Bram@vim.org> parents: 19455 diff changeset	1659 emsg(_(e_dictreq));
08ef11a81daa patch 8.2.0288: Vim9: some float and blob operators not tested Bram Moolenaar <Bram@vim.org> parents: 19455 diff changeset	1660 return FAIL;
08ef11a81daa patch 8.2.0288: Vim9: some float and blob operators not tested Bram Moolenaar <Bram@vim.org> parents: 19455 diff changeset	1661 }
08ef11a81daa patch 8.2.0288: Vim9: some float and blob operators not tested Bram Moolenaar <Bram@vim.org> parents: 19455 diff changeset	1662 // change dict type to dict member type
08ef11a81daa patch 8.2.0288: Vim9: some float and blob operators not tested Bram Moolenaar <Bram@vim.org> parents: 19455 diff changeset	1663 if (type->tt_type == VAR_DICT)
08ef11a81daa patch 8.2.0288: Vim9: some float and blob operators not tested Bram Moolenaar <Bram@vim.org> parents: 19455 diff changeset	1664 ((type_T **)stack->ga_data)[stack->ga_len - 1] = type->tt_member;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1665
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1666 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1667 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1668
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1669 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1670 * Generate an ISN_ECHO instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1671 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1672 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1673 generate_ECHO(cctx_T *cctx, int with_white, int count)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1674 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1675 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1676
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1677 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1678 if ((isn = generate_instr_drop(cctx, ISN_ECHO, count)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1679 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1680 isn->isn_arg.echo.echo_with_white = with_white;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1681 isn->isn_arg.echo.echo_count = count;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1682
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1683 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1684 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1685
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1686 /*
20142 fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	1687 * Generate an ISN_EXECUTE/ISN_ECHOMSG/ISN_ECHOERR instruction.
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1688 */
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1689 static int
20142 fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	1690 generate_MULT_EXPR(cctx_T *cctx, isntype_T isn_type, int count)
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1691 {
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1692 isn_T *isn;
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1693
20142 fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	1694 if ((isn = generate_instr_drop(cctx, isn_type, count)) == NULL)
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1695 return FAIL;
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1696 isn->isn_arg.number = count;
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1697
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1698 return OK;
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1699 }
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1700
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1701 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1702 generate_EXEC(cctx_T cctx, char_u line)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1703 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1704 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1705
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1706 RETURN_OK_IF_SKIP(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1707 if ((isn = generate_instr(cctx, ISN_EXEC)) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1708 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1709 isn->isn_arg.string = vim_strsave(line);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1710 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1711 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1712
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1713 static int
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1714 generate_EXECCONCAT(cctx_T *cctx, int count)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1715 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1716 isn_T *isn;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1717
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1718 if ((isn = generate_instr_drop(cctx, ISN_EXECCONCAT, count)) == NULL)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1719 return FAIL;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1720 isn->isn_arg.number = count;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1721 return OK;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1722 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1723
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1724 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1725 * Reserve space for a local variable.
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1726 * Return the variable or NULL if it failed.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1727 */
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1728 static lvar_T *
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1729 reserve_local(cctx_T cctx, char_u name, size_t len, int isConst, type_T *type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1730 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1731 lvar_T *lvar;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1732
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	1733 if (lookup_arg(name, len, NULL, NULL, NULL, cctx) == OK)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1734 {
20355 fc2d76e0994c patch 8.2.0733: Vim9: assigning to dict or list argument does not work Bram Moolenaar <Bram@vim.org> parents: 20349 diff changeset	1735 emsg_namelen(_(e_used_as_arg), name, (int)len);
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1736 return NULL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1737 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1738
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1739 if (ga_grow(&cctx->ctx_locals, 1) == FAIL)
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1740 return NULL;
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1741 lvar = ((lvar_T *)cctx->ctx_locals.ga_data) + cctx->ctx_locals.ga_len++;
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1742
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1743 // Every local variable uses the next entry on the stack. We could re-use
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1744 // the last ones when leaving a scope, but then variables used in a closure
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1745 // might get overwritten. To keep things simple do not re-use stack
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1746 // entries. This is less efficient, but memory is cheap these days.
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1747 lvar->lv_idx = cctx->ctx_locals_count++;
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1748
20830 9064044fd4f6 patch 8.2.0967: unnecessary type casts for vim_strnsave() Bram Moolenaar <Bram@vim.org> parents: 20538 diff changeset	1749 lvar->lv_name = vim_strnsave(name, len == 0 ? STRLEN(name) : len);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1750 lvar->lv_const = isConst;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1751 lvar->lv_type = type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1752
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1753 return lvar;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1754 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1755
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1756 /*
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1757 * Remove local variables above "new_top".
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1758 */
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1759 static void
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1760 unwind_locals(cctx_T *cctx, int new_top)
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1761 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1762 if (cctx->ctx_locals.ga_len > new_top)
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1763 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1764 int idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1765 lvar_T *lvar;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1766
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1767 for (idx = new_top; idx < cctx->ctx_locals.ga_len; ++idx)
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1768 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1769 lvar = ((lvar_T *)cctx->ctx_locals.ga_data) + idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1770 vim_free(lvar->lv_name);
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1771 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1772 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1773 cctx->ctx_locals.ga_len = new_top;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1774 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1775
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1776 /*
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1777 * Free all local variables.
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1778 */
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1779 static void
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1780 free_locals(cctx_T *cctx)
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1781 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1782 unwind_locals(cctx, 0);
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1783 ga_clear(&cctx->ctx_locals);
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1784 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1785
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1786 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1787 * Skip over a type definition and return a pointer to just after it.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1788 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1789 char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1790 skip_type(char_u *start)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1791 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1792 char_u *p = start;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1793
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1794 while (ASCII_ISALNUM(p) \|\| p == '_')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1795 ++p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1796
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1797 // Skip over "<type>"; this is permissive about white space.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1798 if (*skipwhite(p) == '<')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1799 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1800 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1801 p = skip_type(skipwhite(p + 1));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1802 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1803 if (*p == '>')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1804 ++p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1805 }
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1806 else if (*p == '(' && STRNCMP("func", start, 4) == 0)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1807 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1808 // handle func(args): type
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1809 ++p;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1810 while (p != ')' && p != NUL)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1811 {
20253 6f9010b6f7f9 patch 8.2.0682: Vim9: parsing function argument type can get stuck Bram Moolenaar <Bram@vim.org> parents: 20247 diff changeset	1812 char_u *sp = p;
6f9010b6f7f9 patch 8.2.0682: Vim9: parsing function argument type can get stuck Bram Moolenaar <Bram@vim.org> parents: 20247 diff changeset	1813
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1814 p = skip_type(p);
20253 6f9010b6f7f9 patch 8.2.0682: Vim9: parsing function argument type can get stuck Bram Moolenaar <Bram@vim.org> parents: 20247 diff changeset	1815 if (p == sp)
6f9010b6f7f9 patch 8.2.0682: Vim9: parsing function argument type can get stuck Bram Moolenaar <Bram@vim.org> parents: 20247 diff changeset	1816 return p; // syntax error
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1817 if (*p == ',')
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1818 p = skipwhite(p + 1);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1819 }
20255 aac52c32a91f patch 8.2.0683: Vim9: parsing type does not always work Bram Moolenaar <Bram@vim.org> parents: 20253 diff changeset	1820 if (*p == ')')
aac52c32a91f patch 8.2.0683: Vim9: parsing type does not always work Bram Moolenaar <Bram@vim.org> parents: 20253 diff changeset	1821 {
aac52c32a91f patch 8.2.0683: Vim9: parsing type does not always work Bram Moolenaar <Bram@vim.org> parents: 20253 diff changeset	1822 if (p[1] == ':')
aac52c32a91f patch 8.2.0683: Vim9: parsing type does not always work Bram Moolenaar <Bram@vim.org> parents: 20253 diff changeset	1823 p = skip_type(skipwhite(p + 2));
aac52c32a91f patch 8.2.0683: Vim9: parsing type does not always work Bram Moolenaar <Bram@vim.org> parents: 20253 diff changeset	1824 else
aac52c32a91f patch 8.2.0683: Vim9: parsing type does not always work Bram Moolenaar <Bram@vim.org> parents: 20253 diff changeset	1825 p = skipwhite(p + 1);
aac52c32a91f patch 8.2.0683: Vim9: parsing type does not always work Bram Moolenaar <Bram@vim.org> parents: 20253 diff changeset	1826 }
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1827 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1828
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1829 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1830 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1831
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1832 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1833 * Parse the member type: "<type>" and return "type" with the member set.
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1834 * Use "type_gap" if a new type needs to be added.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1835 * Returns NULL in case of failure.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1836 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1837 static type_T *
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1838 parse_type_member(char_u *arg, type_T type, garray_T *type_gap)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1839 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1840 type_T *member_type;
19818 c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	1841 int prev_called_emsg = called_emsg;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1842
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1843 if (**arg != '<')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1844 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1845 if (skipwhite(arg) == '<')
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1846 semsg(_(e_no_white_before), "<");
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1847 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1848 emsg(_("E1008: Missing <type>"));
19785 99248f0ff29d patch 8.2.0449: Vim9: crash if return type is invalid Bram Moolenaar <Bram@vim.org> parents: 19760 diff changeset	1849 return type;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1850 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1851 arg = skipwhite(arg + 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1852
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1853 member_type = parse_type(arg, type_gap);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1854
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1855 arg = skipwhite(arg);
19818 c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	1856 if (**arg != '>' && called_emsg == prev_called_emsg)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1857 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1858 emsg(_("E1009: Missing > after type"));
19785 99248f0ff29d patch 8.2.0449: Vim9: crash if return type is invalid Bram Moolenaar <Bram@vim.org> parents: 19760 diff changeset	1859 return type;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1860 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1861 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1862
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1863 if (type->tt_type == VAR_LIST)
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1864 return get_list_type(member_type, type_gap);
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1865 return get_dict_type(member_type, type_gap);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1866 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1867
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1868 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1869 * Parse a type at "arg" and advance over it.
19872 8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	1870 * Return &t_any for failure.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1871 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1872 type_T *
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1873 parse_type(char_u *arg, garray_T type_gap)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1874 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1875 char_u p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1876 size_t len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1877
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1878 // skip over the first word
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1879 while (ASCII_ISALNUM(p) \|\| p == '_')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1880 ++p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1881 len = p - *arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1882
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1883 switch (**arg)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1884 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1885 case 'a':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1886 if (len == 3 && STRNCMP(*arg, "any", len) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1887 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1888 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1889 return &t_any;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1890 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1891 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1892 case 'b':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1893 if (len == 4 && STRNCMP(*arg, "bool", len) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1894 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1895 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1896 return &t_bool;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1897 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1898 if (len == 4 && STRNCMP(*arg, "blob", len) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1899 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1900 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1901 return &t_blob;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1902 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1903 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1904 case 'c':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1905 if (len == 7 && STRNCMP(*arg, "channel", len) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1906 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1907 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1908 return &t_channel;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1909 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1910 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1911 case 'd':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1912 if (len == 4 && STRNCMP(*arg, "dict", len) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1913 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1914 *arg += len;
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1915 return parse_type_member(arg, &t_dict_any, type_gap);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1916 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1917 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1918 case 'f':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1919 if (len == 5 && STRNCMP(*arg, "float", len) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1920 {
19193 9f98957582d6 patch 8.2.0155: warnings from MinGW compiler; tests fail without +float Bram Moolenaar <Bram@vim.org> parents: 19191 diff changeset	1921 #ifdef FEAT_FLOAT
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1922 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1923 return &t_float;
19193 9f98957582d6 patch 8.2.0155: warnings from MinGW compiler; tests fail without +float Bram Moolenaar <Bram@vim.org> parents: 19191 diff changeset	1924 #else
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1925 emsg(_("E1076: This Vim is not compiled with float support"));
19193 9f98957582d6 patch 8.2.0155: warnings from MinGW compiler; tests fail without +float Bram Moolenaar <Bram@vim.org> parents: 19191 diff changeset	1926 return &t_any;
9f98957582d6 patch 8.2.0155: warnings from MinGW compiler; tests fail without +float Bram Moolenaar <Bram@vim.org> parents: 19191 diff changeset	1927 #endif
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1928 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1929 if (len == 4 && STRNCMP(*arg, "func", len) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1930 {
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1931 type_T *type;
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	1932 type_T *ret_type = &t_unknown;
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1933 int argcount = -1;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1934 int flags = 0;
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1935 int first_optional = -1;
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1936 type_T *arg_type[MAX_FUNC_ARGS + 1];
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1937
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1938 // func({type}, ...{type}): {type}
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1939 *arg += len;
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1940 if (**arg == '(')
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1941 {
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1942 // "func" may or may not return a value, "func()" does
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1943 // not return a value.
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1944 ret_type = &t_void;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1945
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1946 p = ++*arg;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1947 argcount = 0;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1948 while (p != NUL && p != ')')
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1949 {
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1950 if (*p == '?')
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1951 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1952 if (first_optional == -1)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1953 first_optional = argcount;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1954 ++p;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1955 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1956 else if (first_optional != -1)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1957 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1958 emsg(_("E1007: mandatory argument after optional argument"));
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1959 return &t_any;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1960 }
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1961 else if (STRNCMP(p, "...", 3) == 0)
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1962 {
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1963 flags \|= TTFLAG_VARARGS;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1964 p += 3;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1965 }
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1966
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1967 arg_type[argcount++] = parse_type(&p, type_gap);
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1968
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1969 // Nothing comes after "...{type}".
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1970 if (flags & TTFLAG_VARARGS)
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1971 break;
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1972
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1973 if (p != ',' && skipwhite(p) == ',')
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1974 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1975 semsg(_(e_no_white_before), ",");
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1976 return &t_any;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1977 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1978 if (*p == ',')
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1979 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1980 ++p;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1981 if (!VIM_ISWHITE(*p))
19985 f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	1982 {
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1983 semsg(_(e_white_after), ",");
19985 f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	1984 return &t_any;
f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	1985 }
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1986 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1987 p = skipwhite(p);
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1988 if (argcount == MAX_FUNC_ARGS)
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1989 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1990 emsg(_("E740: Too many argument types"));
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1991 return &t_any;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1992 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1993 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1994
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1995 p = skipwhite(p);
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1996 if (*p != ')')
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1997 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1998 emsg(_(e_missing_close));
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1999 return &t_any;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2000 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2001 *arg = p + 1;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2002 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2003 if (**arg == ':')
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2004 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2005 // parse return type
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2006 ++*arg;
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	2007 if (!VIM_ISWHITE(**arg))
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2008 semsg(_(e_white_after), ":");
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2009 arg = skipwhite(arg);
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2010 ret_type = parse_type(arg, type_gap);
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2011 }
19985 f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2012 if (flags == 0 && first_optional == -1 && argcount <= 0)
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2013 type = get_func_type(ret_type, argcount, type_gap);
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2014 else
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2015 {
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2016 type = alloc_func_type(ret_type, argcount, type_gap);
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2017 type->tt_flags = flags;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2018 if (argcount > 0)
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2019 {
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2020 type->tt_argcount = argcount;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2021 type->tt_min_argcount = first_optional == -1
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2022 ? argcount : first_optional;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2023 if (func_type_add_arg_types(type, argcount,
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2024 type_gap) == FAIL)
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2025 return &t_any;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2026 mch_memmove(type->tt_args, arg_type,
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2027 sizeof(type_T ) argcount);
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2028 }
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2029 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2030 return type;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2031 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2032 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2033 case 'j':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2034 if (len == 3 && STRNCMP(*arg, "job", len) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2035 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2036 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2037 return &t_job;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2038 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2039 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2040 case 'l':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2041 if (len == 4 && STRNCMP(*arg, "list", len) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2042 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2043 *arg += len;
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2044 return parse_type_member(arg, &t_list_any, type_gap);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2045 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2046 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2047 case 'n':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2048 if (len == 6 && STRNCMP(*arg, "number", len) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2049 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2050 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2051 return &t_number;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2052 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2053 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2054 case 's':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2055 if (len == 6 && STRNCMP(*arg, "string", len) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2056 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2057 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2058 return &t_string;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2059 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2060 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2061 case 'v':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2062 if (len == 4 && STRNCMP(*arg, "void", len) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2063 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2064 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2065 return &t_void;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2066 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2067 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2068 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2069
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2070 semsg(_("E1010: Type not recognized: %s"), *arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2071 return &t_any;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2072 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2073
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2074 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2075 * Check if "type1" and "type2" are exactly the same.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2076 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2077 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2078 equal_type(type_T type1, type_T type2)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2079 {
19993 efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2080 int i;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2081
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2082 if (type1->tt_type != type2->tt_type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2083 return FALSE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2084 switch (type1->tt_type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2085 {
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	2086 case VAR_UNKNOWN:
1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	2087 case VAR_ANY:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2088 case VAR_VOID:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2089 case VAR_SPECIAL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2090 case VAR_BOOL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2091 case VAR_NUMBER:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2092 case VAR_FLOAT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2093 case VAR_STRING:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2094 case VAR_BLOB:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2095 case VAR_JOB:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2096 case VAR_CHANNEL:
19579 aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	2097 break; // not composite is always OK
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2098 case VAR_LIST:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2099 case VAR_DICT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2100 return equal_type(type1->tt_member, type2->tt_member);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2101 case VAR_FUNC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2102 case VAR_PARTIAL:
19993 efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2103 if (!equal_type(type1->tt_member, type2->tt_member)
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2104 \|\| type1->tt_argcount != type2->tt_argcount)
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2105 return FALSE;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2106 if (type1->tt_argcount < 0
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2107 \|\| type1->tt_args == NULL \|\| type2->tt_args == NULL)
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2108 return TRUE;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2109 for (i = 0; i < type1->tt_argcount; ++i)
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2110 if (!equal_type(type1->tt_args[i], type2->tt_args[i]))
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2111 return FALSE;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2112 return TRUE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2113 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2114 return TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2115 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2116
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2117 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2118 * Find the common type of "type1" and "type2" and put it in "dest".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2119 * "type2" and "dest" may be the same.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2120 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2121 static void
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2122 common_type(type_T type1, type_T type2, type_T *dest, garray_T type_gap)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2123 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2124 if (equal_type(type1, type2))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2125 {
19579 aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	2126 *dest = type1;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2127 return;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2128 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2129
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2130 if (type1->tt_type == type2->tt_type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2131 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2132 if (type1->tt_type == VAR_LIST \|\| type2->tt_type == VAR_DICT)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2133 {
19579 aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	2134 type_T *common;
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	2135
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2136 common_type(type1->tt_member, type2->tt_member, &common, type_gap);
19579 aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	2137 if (type1->tt_type == VAR_LIST)
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2138 *dest = get_list_type(common, type_gap);
19579 aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	2139 else
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2140 *dest = get_dict_type(common, type_gap);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2141 return;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2142 }
19993 efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2143 if (type1->tt_type == VAR_FUNC)
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2144 {
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2145 type_T *common;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2146
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2147 common_type(type1->tt_member, type2->tt_member, &common, type_gap);
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2148 if (type1->tt_argcount == type2->tt_argcount
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2149 && type1->tt_argcount >= 0)
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2150 {
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2151 int argcount = type1->tt_argcount;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2152 int i;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2153
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2154 *dest = alloc_func_type(common, argcount, type_gap);
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2155 if (type1->tt_args != NULL && type2->tt_args != NULL)
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2156 {
20001 502a6c9b3974 patch 8.2.0556: Vim9: memory leak when finding common type Bram Moolenaar <Bram@vim.org> parents: 19999 diff changeset	2157 if (func_type_add_arg_types(*dest, argcount,
502a6c9b3974 patch 8.2.0556: Vim9: memory leak when finding common type Bram Moolenaar <Bram@vim.org> parents: 19999 diff changeset	2158 type_gap) == OK)
19993 efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2159 for (i = 0; i < argcount; ++i)
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2160 common_type(type1->tt_args[i], type2->tt_args[i],
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2161 &(*dest)->tt_args[i], type_gap);
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2162 }
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2163 }
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2164 else
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2165 *dest = alloc_func_type(common, -1, type_gap);
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2166 return;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2167 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2168 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2169
19579 aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	2170 *dest = &t_any;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2171 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2172
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2173 char *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2174 vartype_name(vartype_T type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2175 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2176 switch (type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2177 {
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	2178 case VAR_UNKNOWN: break;
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	2179 case VAR_ANY: return "any";
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2180 case VAR_VOID: return "void";
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2181 case VAR_SPECIAL: return "special";
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2182 case VAR_BOOL: return "bool";
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2183 case VAR_NUMBER: return "number";
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2184 case VAR_FLOAT: return "float";
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2185 case VAR_STRING: return "string";
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2186 case VAR_BLOB: return "blob";
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2187 case VAR_JOB: return "job";
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2188 case VAR_CHANNEL: return "channel";
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2189 case VAR_LIST: return "list";
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2190 case VAR_DICT: return "dict";
19985 f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2191
f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2192 case VAR_FUNC:
f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2193 case VAR_PARTIAL: return "func";
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2194 }
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	2195 return "unknown";
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2196 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2197
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2198 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2199 * Return the name of a type.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2200 * The result may be in allocated memory, in which case "tofree" is set.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2201 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2202 char *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2203 type_name(type_T type, char *tofree)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2204 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2205 char *name = vartype_name(type->tt_type);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2206
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2207 *tofree = NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2208 if (type->tt_type == VAR_LIST \|\| type->tt_type == VAR_DICT)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2209 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2210 char *member_free;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2211 char *member_name = type_name(type->tt_member, &member_free);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2212 size_t len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2213
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2214 len = STRLEN(name) + STRLEN(member_name) + 3;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2215 *tofree = alloc(len);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2216 if (*tofree != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2217 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2218 vim_snprintf(*tofree, len, "%s<%s>", name, member_name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2219 vim_free(member_free);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2220 return *tofree;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2221 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2222 }
19985 f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2223 if (type->tt_type == VAR_FUNC)
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2224 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2225 garray_T ga;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2226 int i;
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2227 int varargs = (type->tt_flags & TTFLAG_VARARGS) ? 1 : 0;
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2228
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2229 ga_init2(&ga, 1, 100);
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2230 if (ga_grow(&ga, 20) == FAIL)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2231 return "[unknown]";
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2232 *tofree = ga.ga_data;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2233 STRCPY(ga.ga_data, "func(");
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2234 ga.ga_len += 5;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2235
19985 f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2236 for (i = 0; i < type->tt_argcount; ++i)
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2237 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2238 char *arg_free;
19985 f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2239 char *arg_type;
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2240 int len;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2241
19985 f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2242 if (type->tt_args == NULL)
f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2243 arg_type = "[unknown]";
f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2244 else
f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2245 arg_type = type_name(type->tt_args[i], &arg_free);
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2246 if (i > 0)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2247 {
19918 ccfeae6af59e patch 8.2.0515: some compilers cannot add to "void " Bram Moolenaar <Bram@vim.org>* parents: 19914 diff changeset	2248 STRCPY((char *)ga.ga_data + ga.ga_len, ", ");
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2249 ga.ga_len += 2;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2250 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2251 len = (int)STRLEN(arg_type);
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2252 if (ga_grow(&ga, len + 8) == FAIL)
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2253 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2254 vim_free(arg_free);
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2255 return "[unknown]";
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2256 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2257 *tofree = ga.ga_data;
19985 f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2258 if (varargs && i == type->tt_argcount - 1)
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2259 {
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2260 STRCPY((char *)ga.ga_data + ga.ga_len, "...");
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2261 ga.ga_len += 3;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2262 }
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2263 else if (i >= type->tt_min_argcount)
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2264 ((char )ga.ga_data + ga.ga_len++) = '?';
19918 ccfeae6af59e patch 8.2.0515: some compilers cannot add to "void " Bram Moolenaar <Bram@vim.org>* parents: 19914 diff changeset	2265 STRCPY((char *)ga.ga_data + ga.ga_len, arg_type);
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2266 ga.ga_len += len;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2267 vim_free(arg_free);
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2268 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2269
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2270 if (type->tt_member == &t_void)
19918 ccfeae6af59e patch 8.2.0515: some compilers cannot add to "void " Bram Moolenaar <Bram@vim.org>* parents: 19914 diff changeset	2271 STRCPY((char *)ga.ga_data + ga.ga_len, ")");
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2272 else
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2273 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2274 char *ret_free;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2275 char *ret_name = type_name(type->tt_member, &ret_free);
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2276 int len;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2277
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2278 len = (int)STRLEN(ret_name) + 4;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2279 if (ga_grow(&ga, len) == FAIL)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2280 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2281 vim_free(ret_free);
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2282 return "[unknown]";
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2283 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2284 *tofree = ga.ga_data;
19918 ccfeae6af59e patch 8.2.0515: some compilers cannot add to "void " Bram Moolenaar <Bram@vim.org>* parents: 19914 diff changeset	2285 STRCPY((char *)ga.ga_data + ga.ga_len, "): ");
ccfeae6af59e patch 8.2.0515: some compilers cannot add to "void " Bram Moolenaar <Bram@vim.org>* parents: 19914 diff changeset	2286 STRCPY((char *)ga.ga_data + ga.ga_len + 3, ret_name);
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2287 vim_free(ret_free);
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2288 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2289 return ga.ga_data;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2290 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2291
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2292 return name;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2293 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2294
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2295 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2296 * Find "name" in script-local items of script "sid".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2297 * Returns the index in "sn_var_vals" if found.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2298 * If found but not in "sn_var_vals" returns -1.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2299 * If not found returns -2.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2300 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2301 int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2302 get_script_item_idx(int sid, char_u *name, int check_writable)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2303 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2304 hashtab_T *ht;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2305 dictitem_T *di;
19191 133ef7ba4e4e patch 8.2.0154: reallocating the list of scripts is inefficient Bram Moolenaar <Bram@vim.org> parents: 19181 diff changeset	2306 scriptitem_T *si = SCRIPT_ITEM(sid);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2307 int idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2308
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2309 // First look the name up in the hashtable.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2310 if (sid <= 0 \|\| sid > script_items.ga_len)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2311 return -1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2312 ht = &SCRIPT_VARS(sid);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2313 di = find_var_in_ht(ht, 0, name, TRUE);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2314 if (di == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2315 return -2;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2316
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2317 // Now find the svar_T index in sn_var_vals.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2318 for (idx = 0; idx < si->sn_var_vals.ga_len; ++idx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2319 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2320 svar_T sv = ((svar_T )si->sn_var_vals.ga_data) + idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2321
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2322 if (sv->sv_tv == &di->di_tv)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2323 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2324 if (check_writable && sv->sv_const)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2325 semsg(_(e_readonlyvar), name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2326 return idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2327 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2328 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2329 return -1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2330 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2331
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2332 /*
20840 0600ab7b9f09 patch 8.2.0972: Vim9 script variable declarations need a type Bram Moolenaar <Bram@vim.org> parents: 20830 diff changeset	2333 * Find "name" in imported items of the current script or in "cctx" if not
0600ab7b9f09 patch 8.2.0972: Vim9 script variable declarations need a type Bram Moolenaar <Bram@vim.org> parents: 20830 diff changeset	2334 * NULL.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2335 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2336 imported_T *
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2337 find_imported(char_u name, size_t len, cctx_T cctx)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2338 {
21116 9b57c92991c6 patch 8.2.1109: still crashing when using s:variable Bram Moolenaar <Bram@vim.org> parents: 21110 diff changeset	2339 scriptitem_T *si;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2340 int idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2341
21110 8fb0e507491d patch 8.2.1106: crash when trying to use s: variable in typed command Bram Moolenaar <Bram@vim.org> parents: 21040 diff changeset	2342 if (current_sctx.sc_sid <= 0)
8fb0e507491d patch 8.2.1106: crash when trying to use s: variable in typed command Bram Moolenaar <Bram@vim.org> parents: 21040 diff changeset	2343 return NULL;
8fb0e507491d patch 8.2.1106: crash when trying to use s: variable in typed command Bram Moolenaar <Bram@vim.org> parents: 21040 diff changeset	2344 si = SCRIPT_ITEM(current_sctx.sc_sid);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2345 if (cctx != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2346 for (idx = 0; idx < cctx->ctx_imports.ga_len; ++idx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2347 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2348 imported_T import = ((imported_T )cctx->ctx_imports.ga_data)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2349 + idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2350
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2351 if (len == 0 ? STRCMP(name, import->imp_name) == 0
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2352 : STRLEN(import->imp_name) == len
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2353 && STRNCMP(name, import->imp_name, len) == 0)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2354 return import;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2355 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2356
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2357 for (idx = 0; idx < si->sn_imports.ga_len; ++idx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2358 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2359 imported_T import = ((imported_T )si->sn_imports.ga_data) + idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2360
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2361 if (len == 0 ? STRCMP(name, import->imp_name) == 0
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2362 : STRLEN(import->imp_name) == len
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2363 && STRNCMP(name, import->imp_name, len) == 0)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2364 return import;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2365 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2366 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2367 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2368
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2369 /*
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2370 * Free all imported variables.
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2371 */
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2372 static void
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2373 free_imported(cctx_T *cctx)
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2374 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2375 int idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2376
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2377 for (idx = 0; idx < cctx->ctx_imports.ga_len; ++idx)
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2378 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2379 imported_T import = ((imported_T )cctx->ctx_imports.ga_data) + idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2380
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2381 vim_free(import->imp_name);
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2382 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2383 ga_clear(&cctx->ctx_imports);
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2384 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2385
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2386 /*
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2387 * Return TRUE if "p" points at a "#" but not at "#{".
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2388 */
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2389 static int
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2390 comment_start(char_u *p)
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2391 {
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2392 return p[0] == '#' && p[1] != '{';
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2393 }
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2394
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2395 /*
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2396 * Return a pointer to the next line that isn't empty or only contains a
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2397 * comment. Skips over white space.
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2398 * Returns NULL if there is none.
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2399 */
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2400 static char_u *
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2401 peek_next_line(cctx_T *cctx)
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2402 {
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2403 int lnum = cctx->ctx_lnum;
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2404
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2405 while (++lnum < cctx->ctx_ufunc->uf_lines.ga_len)
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2406 {
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2407 char_u line = ((char_u *)cctx->ctx_ufunc->uf_lines.ga_data)[lnum];
20972 d561e3c6cd65 patch 8.2.1037: Vim9: crash when using line continuation inside :def Bram Moolenaar <Bram@vim.org> parents: 20966 diff changeset	2408 char_u *p;
d561e3c6cd65 patch 8.2.1037: Vim9: crash when using line continuation inside :def Bram Moolenaar <Bram@vim.org> parents: 20966 diff changeset	2409
d561e3c6cd65 patch 8.2.1037: Vim9: crash when using line continuation inside :def Bram Moolenaar <Bram@vim.org> parents: 20966 diff changeset	2410 if (line == NULL)
d561e3c6cd65 patch 8.2.1037: Vim9: crash when using line continuation inside :def Bram Moolenaar <Bram@vim.org> parents: 20966 diff changeset	2411 break;
d561e3c6cd65 patch 8.2.1037: Vim9: crash when using line continuation inside :def Bram Moolenaar <Bram@vim.org> parents: 20966 diff changeset	2412 p = skipwhite(line);
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2413 if (*p != NUL && !comment_start(p))
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2414 return p;
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2415 }
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2416 return NULL;
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2417 }
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2418
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2419 /*
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2420 * Called when checking for a following operator at "arg". When the rest of
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2421 * the line is empty or only a comment, peek the next line. If there is a next
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2422 * line return a pointer to it and set "nextp".
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2423 * Otherwise skip over white space.
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2424 */
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2425 static char_u *
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2426 may_peek_next_line(cctx_T cctx, char_u arg, char_u **nextp)
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2427 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2428 char_u *p = skipwhite(arg);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2429
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2430 *nextp = NULL;
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2431 if (p == NUL \|\| (VIM_ISWHITE(arg) && comment_start(p)))
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2432 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2433 *nextp = peek_next_line(cctx);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2434 if (*nextp != NULL)
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2435 return *nextp;
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2436 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2437 return p;
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2438 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2439
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2440 /*
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2441 * Get the next line of the function from "cctx".
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2442 * Skips over empty lines. Skips over comment lines if "skip_comment" is TRUE.
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2443 * Returns NULL when at the end.
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2444 */
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2445 static char_u *
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2446 next_line_from_context(cctx_T *cctx, int skip_comment)
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2447 {
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	2448 char_u *line;
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2449
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2450 do
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2451 {
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2452 ++cctx->ctx_lnum;
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2453 if (cctx->ctx_lnum >= cctx->ctx_ufunc->uf_lines.ga_len)
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	2454 {
de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	2455 line = NULL;
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2456 break;
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	2457 }
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2458 line = ((char_u **)cctx->ctx_ufunc->uf_lines.ga_data)[cctx->ctx_lnum];
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	2459 cctx->ctx_line_start = line;
20538 9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	2460 SOURCING_LNUM = cctx->ctx_lnum + 1;
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2461 } while (line == NULL \|\| *skipwhite(line) == NUL
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2462 \|\| (skip_comment && comment_start(skipwhite(line))));
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2463 return line;
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2464 }
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2465
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2466 /*
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2467 * If "*arg" is at the end of the line, advance to the next line.
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2468 * Also when "whitep" points to white space and "*arg" is on a "#".
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2469 * Return FAIL if beyond the last line, "*arg" is unmodified then.
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2470 */
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2471 static int
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2472 may_get_next_line(char_u whitep, char_u arg, cctx_T cctx)
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2473 {
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2474 if (*arg == NUL \|\| (VIM_ISWHITE(whitep) && comment_start(*arg)))
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2475 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2476 char_u *next = next_line_from_context(cctx, TRUE);
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2477
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2478 if (next == NULL)
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2479 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2480 *arg = skipwhite(next);
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2481 }
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2482 return OK;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2483 }
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2484
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2485 // Structure passed between the compile_expr* functions to keep track of
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2486 // constants that have been parsed but for which no code was produced yet. If
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2487 // possible expressions on these constants are applied at compile time. If
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2488 // that is not possible, the code to push the constants needs to be generated
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2489 // before other instructions.
20336 2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	2490 // Using 50 should be more than enough of 5 levels of ().
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	2491 #define PPSIZE 50
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2492 typedef struct {
20336 2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	2493 typval_T pp_tv[PPSIZE]; // stack of ppconst constants
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2494 int pp_used; // active entries in pp_tv[]
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2495 } ppconst_T;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2496
20336 2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	2497 static int compile_expr0(char_u *arg, cctx_T cctx);
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	2498 static int compile_expr1(char_u *arg, cctx_T cctx, ppconst_T *ppconst);
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	2499
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2500 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2501 * Generate a PUSH instruction for "tv".
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2502 * "tv" will be consumed or cleared.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2503 * Nothing happens if "tv" is NULL or of type VAR_UNKNOWN;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2504 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2505 static int
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2506 generate_tv_PUSH(cctx_T cctx, typval_T tv)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2507 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2508 if (tv != NULL)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2509 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2510 switch (tv->v_type)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2511 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2512 case VAR_UNKNOWN:
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2513 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2514 case VAR_BOOL:
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2515 generate_PUSHBOOL(cctx, tv->vval.v_number);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2516 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2517 case VAR_SPECIAL:
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2518 generate_PUSHSPEC(cctx, tv->vval.v_number);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2519 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2520 case VAR_NUMBER:
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2521 generate_PUSHNR(cctx, tv->vval.v_number);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2522 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2523 #ifdef FEAT_FLOAT
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2524 case VAR_FLOAT:
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2525 generate_PUSHF(cctx, tv->vval.v_float);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2526 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2527 #endif
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2528 case VAR_BLOB:
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2529 generate_PUSHBLOB(cctx, tv->vval.v_blob);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2530 tv->vval.v_blob = NULL;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2531 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2532 case VAR_STRING:
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2533 generate_PUSHS(cctx, tv->vval.v_string);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2534 tv->vval.v_string = NULL;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2535 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2536 default:
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2537 iemsg("constant type not supported");
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2538 clear_tv(tv);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2539 return FAIL;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2540 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2541 tv->v_type = VAR_UNKNOWN;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2542 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2543 return OK;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2544 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2545
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2546 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2547 * Generate code for any ppconst entries.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2548 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2549 static int
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2550 generate_ppconst(cctx_T cctx, ppconst_T ppconst)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2551 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2552 int i;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2553 int ret = OK;
20332 a407e243c55c patch 8.2.0721: Vim9: leaking memory when skipping Bram Moolenaar <Bram@vim.org> parents: 20328 diff changeset	2554 int save_skip = cctx->ctx_skip;
a407e243c55c patch 8.2.0721: Vim9: leaking memory when skipping Bram Moolenaar <Bram@vim.org> parents: 20328 diff changeset	2555
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	2556 cctx->ctx_skip = SKIP_NOT;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2557 for (i = 0; i < ppconst->pp_used; ++i)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2558 if (generate_tv_PUSH(cctx, &ppconst->pp_tv[i]) == FAIL)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2559 ret = FAIL;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2560 ppconst->pp_used = 0;
20332 a407e243c55c patch 8.2.0721: Vim9: leaking memory when skipping Bram Moolenaar <Bram@vim.org> parents: 20328 diff changeset	2561 cctx->ctx_skip = save_skip;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2562 return ret;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2563 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2564
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2565 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2566 * Clear ppconst constants. Used when failing.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2567 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2568 static void
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2569 clear_ppconst(ppconst_T *ppconst)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2570 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2571 int i;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2572
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2573 for (i = 0; i < ppconst->pp_used; ++i)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2574 clear_tv(&ppconst->pp_tv[i]);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2575 ppconst->pp_used = 0;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2576 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2577
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2578 /*
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2579 * Generate an instruction to load script-local variable "name", without the
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2580 * leading "s:".
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2581 * Also finds imported variables.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2582 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2583 static int
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2584 compile_load_scriptvar(
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2585 cctx_T *cctx,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2586 char_u *name, // variable NUL terminated
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2587 char_u *start, // start of variable
19530 48e71f948360 patch 8.2.0322: Vim9: error checks not tested Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	2588 char_u **end, // end of variable
48e71f948360 patch 8.2.0322: Vim9: error checks not tested Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	2589 int error) // when TRUE may give error
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2590 {
19191 133ef7ba4e4e patch 8.2.0154: reallocating the list of scripts is inefficient Bram Moolenaar <Bram@vim.org> parents: 19181 diff changeset	2591 scriptitem_T *si = SCRIPT_ITEM(current_sctx.sc_sid);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2592 int idx = get_script_item_idx(current_sctx.sc_sid, name, FALSE);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2593 imported_T *import;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2594
19451 b26e96f7c12f patch 8.2.0283: Vim9: failing to load script var not tested Bram Moolenaar <Bram@vim.org> parents: 19437 diff changeset	2595 if (idx == -1 \|\| si->sn_version != SCRIPT_VERSION_VIM9)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2596 {
19451 b26e96f7c12f patch 8.2.0283: Vim9: failing to load script var not tested Bram Moolenaar <Bram@vim.org> parents: 19437 diff changeset	2597 // variable is not in sn_var_vals: old style script.
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	2598 return generate_OLDSCRIPT(cctx, ISN_LOADS, name, current_sctx.sc_sid,
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	2599 &t_any);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2600 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2601 if (idx >= 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2602 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2603 svar_T sv = ((svar_T )si->sn_var_vals.ga_data) + idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2604
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	2605 generate_VIM9SCRIPT(cctx, ISN_LOADSCRIPT,
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2606 current_sctx.sc_sid, idx, sv->sv_type);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2607 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2608 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2609
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2610 import = find_imported(name, 0, cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2611 if (import != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2612 {
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2613 if (import->imp_all)
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2614 {
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2615 char_u p = skipwhite(end);
21146 465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2616 char_u *exp_name;
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2617 int cc;
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2618 ufunc_T *ufunc;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2619 type_T *type;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2620
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2621 // Used "import * as Name", need to lookup the member.
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2622 if (*p != '.')
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2623 {
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2624 semsg(_("E1060: expected dot after name: %s"), start);
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2625 return FAIL;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2626 }
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2627 ++p;
19818 c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2628 if (VIM_ISWHITE(*p))
c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2629 {
c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2630 emsg(_("E1074: no white space allowed after dot"));
c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2631 return FAIL;
c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2632 }
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2633
21146 465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2634 // isolate one name
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2635 exp_name = p;
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2636 while (eval_isnamec(*p))
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2637 ++p;
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2638 cc = *p;
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2639 *p = NUL;
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2640
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2641 idx = find_exported(import->imp_sid, exp_name, &ufunc, &type);
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2642 *p = cc;
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2643 p = skipwhite(p);
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2644
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2645 // TODO: what if it is a function?
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2646 if (idx < 0)
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2647 return FAIL;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2648 *end = p;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2649
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2650 generate_VIM9SCRIPT(cctx, ISN_LOADSCRIPT,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2651 import->imp_sid,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2652 idx,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2653 type);
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2654 }
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2655 else
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2656 {
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2657 // TODO: check this is a variable, not a function?
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2658 generate_VIM9SCRIPT(cctx, ISN_LOADSCRIPT,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2659 import->imp_sid,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2660 import->imp_var_vals_idx,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2661 import->imp_type);
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2662 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2663 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2664 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2665
19530 48e71f948360 patch 8.2.0322: Vim9: error checks not tested Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	2666 if (error)
48e71f948360 patch 8.2.0322: Vim9: error checks not tested Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	2667 semsg(_("E1050: Item not found: %s"), name);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2668 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2669 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2670
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2671 static int
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2672 generate_funcref(cctx_T cctx, char_u name)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2673 {
20189 63cc54100ae4 patch 8.2.0650: Vim9: script function can be deleted Bram Moolenaar <Bram@vim.org> parents: 20174 diff changeset	2674 ufunc_T *ufunc = find_func(name, FALSE, cctx);
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2675
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2676 if (ufunc == NULL)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2677 return FAIL;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2678
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2679 return generate_PUSHFUNC(cctx, vim_strsave(name), ufunc->uf_func_type);
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2680 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2681
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2682 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2683 * Compile a variable name into a load instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2684 * "end" points to just after the name.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2685 * When "error" is FALSE do not give an error when not found.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2686 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2687 static int
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2688 compile_load(char_u *arg, char_u end_arg, cctx_T *cctx, int error)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2689 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2690 type_T *type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2691 char_u *name;
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2692 char_u *end = end_arg;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2693 int res = FAIL;
19818 c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2694 int prev_called_emsg = called_emsg;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2695
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2696 if ((arg + 1) == ':')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2697 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2698 // load namespaced variable
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2699 if (end <= *arg + 2)
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2700 name = vim_strsave((char_u *)"[empty]");
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2701 else
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2702 name = vim_strnsave(arg + 2, end - (arg + 2));
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2703 if (name == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2704 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2705
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2706 if (**arg == 'v')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2707 {
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	2708 res = generate_LOADV(cctx, name, error);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2709 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2710 else if (**arg == 'g')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2711 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2712 // Global variables can be defined later, thus we don't check if it
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2713 // exists, give error at runtime.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2714 res = generate_LOAD(cctx, ISN_LOADG, 0, name, &t_any);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2715 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2716 else if (**arg == 's')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2717 {
19530 48e71f948360 patch 8.2.0322: Vim9: error checks not tested Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	2718 res = compile_load_scriptvar(cctx, name, NULL, NULL, error);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2719 }
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2720 else if (**arg == 'b')
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2721 {
20089 7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	2722 // Buffer-local variables can be defined later, thus we don't check
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	2723 // if it exists, give error at runtime.
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	2724 res = generate_LOAD(cctx, ISN_LOADB, 0, name, &t_any);
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2725 }
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2726 else if (**arg == 'w')
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2727 {
20089 7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	2728 // Window-local variables can be defined later, thus we don't check
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	2729 // if it exists, give error at runtime.
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	2730 res = generate_LOAD(cctx, ISN_LOADW, 0, name, &t_any);
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2731 }
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2732 else if (**arg == 't')
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2733 {
20089 7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	2734 // Tabpage-local variables can be defined later, thus we don't
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	2735 // check if it exists, give error at runtime.
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	2736 res = generate_LOAD(cctx, ISN_LOADT, 0, name, &t_any);
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2737 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2738 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2739 {
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2740 semsg("E1075: Namespace not supported: %s", *arg);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2741 goto theend;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2742 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2743 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2744 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2745 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2746 size_t len = end - *arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2747 int idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2748 int gen_load = FALSE;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2749 int gen_load_outer = FALSE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2750
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2751 name = vim_strnsave(arg, end - arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2752 if (name == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2753 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2754
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	2755 if (lookup_arg(*arg, len, &idx, &type, &gen_load_outer, cctx) == OK)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2756 {
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	2757 if (!gen_load_outer)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	2758 gen_load = TRUE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2759 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2760 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2761 {
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	2762 lvar_T lvar = lookup_local(arg, len, cctx);
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	2763
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	2764 if (lvar != NULL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2765 {
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	2766 type = lvar->lv_type;
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	2767 idx = lvar->lv_idx;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2768 if (lvar->lv_from_outer)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2769 gen_load_outer = TRUE;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2770 else
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2771 gen_load = TRUE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2772 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2773 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2774 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2775 // "var" can be script-local even without using "s:" if it
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2776 // already exists.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2777 if (SCRIPT_ITEM(current_sctx.sc_sid)->sn_version
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2778 == SCRIPT_VERSION_VIM9
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2779 \|\| lookup_script(*arg, len) == OK)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2780 res = compile_load_scriptvar(cctx, name, *arg, &end,
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2781 FALSE);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2782
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2783 // When the name starts with an uppercase letter or "x:" it
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2784 // can be a user defined function.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2785 if (res == FAIL && (ASCII_ISUPPER(*name) \|\| name[1] == ':'))
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2786 res = generate_funcref(cctx, name);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2787 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2788 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2789 if (gen_load)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2790 res = generate_LOAD(cctx, ISN_LOAD, idx, NULL, type);
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2791 if (gen_load_outer)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2792 res = generate_LOAD(cctx, ISN_LOADOUTER, idx, NULL, type);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2793 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2794
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2795 *arg = end;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2796
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2797 theend:
19818 c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2798 if (res == FAIL && error && called_emsg == prev_called_emsg)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2799 semsg(_(e_var_notfound), name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2800 vim_free(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2801 return res;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2802 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2803
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2804 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2805 * Compile the argument expressions.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2806 * "arg" points to just after the "(" and is advanced to after the ")"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2807 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2808 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2809 compile_arguments(char_u *arg, cctx_T cctx, int *argcount)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2810 {
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2811 char_u p = arg;
c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2812 char_u whitep = arg;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2813
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2814 for (;;)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2815 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2816 if (may_get_next_line(whitep, &p, cctx) == FAIL)
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2817 goto failret;
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2818 if (*p == ')')
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2819 {
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2820 *arg = p + 1;
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2821 return OK;
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2822 }
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2823
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2824 if (compile_expr0(&p, cctx) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2825 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2826 ++*argcount;
19437 5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2827
5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2828 if (p != ',' && skipwhite(p) == ',')
5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2829 {
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2830 semsg(_(e_no_white_before), ",");
19437 5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2831 p = skipwhite(p);
5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2832 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2833 if (*p == ',')
19437 5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2834 {
5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2835 ++p;
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2836 if (p != NUL && !VIM_ISWHITE(p))
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2837 semsg(_(e_white_after), ",");
19437 5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2838 }
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2839 whitep = p;
19437 5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2840 p = skipwhite(p);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2841 }
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2842 failret:
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2843 emsg(_(e_missing_close));
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2844 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2845 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2846
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2847 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2848 * Compile a function call: name(arg1, arg2)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2849 * "arg" points to "name", "arg + varlen" to the "(".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2850 * "argcount_init" is 1 for "value->method()"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2851 * Instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2852 * EVAL arg1
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2853 * EVAL arg2
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2854 * BCALL / DCALL / UCALL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2855 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2856 static int
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2857 compile_call(
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2858 char_u **arg,
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2859 size_t varlen,
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2860 cctx_T *cctx,
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2861 ppconst_T *ppconst,
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2862 int argcount_init)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2863 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2864 char_u name = arg;
19257 5aab9c306181 patch 8.2.0187: reduntant code Bram Moolenaar <Bram@vim.org> parents: 19253 diff changeset	2865 char_u *p;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2866 int argcount = argcount_init;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2867 char_u namebuf[100];
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2868 char_u fname_buf[FLEN_FIXED + 1];
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2869 char_u *tofree = NULL;
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2870 int error = FCERR_NONE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2871 ufunc_T *ufunc;
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2872 int res = FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2873
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2874 // we can evaluate "has('name')" at compile time
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2875 if (varlen == 3 && STRNCMP(*arg, "has", 3) == 0)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2876 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2877 char_u s = skipwhite(arg + varlen + 1);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2878 typval_T argvars[2];
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2879
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2880 argvars[0].v_type = VAR_UNKNOWN;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2881 if (*s == '"')
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	2882 (void)eval_string(&s, &argvars[0], TRUE);
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2883 else if (*s == '\'')
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	2884 (void)eval_lit_string(&s, &argvars[0], TRUE);
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2885 s = skipwhite(s);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2886 if (*s == ')' && argvars[0].v_type == VAR_STRING)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2887 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2888 typval_T *tv = &ppconst->pp_tv[ppconst->pp_used];
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2889
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2890 *arg = s + 1;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2891 argvars[1].v_type = VAR_UNKNOWN;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2892 tv->v_type = VAR_NUMBER;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2893 tv->vval.v_number = 0;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2894 f_has(argvars, tv);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2895 clear_tv(&argvars[0]);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2896 ++ppconst->pp_used;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2897 return OK;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2898 }
20332 a407e243c55c patch 8.2.0721: Vim9: leaking memory when skipping Bram Moolenaar <Bram@vim.org> parents: 20328 diff changeset	2899 clear_tv(&argvars[0]);
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2900 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2901
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2902 if (generate_ppconst(cctx, ppconst) == FAIL)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2903 return FAIL;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2904
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2905 if (varlen >= sizeof(namebuf))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2906 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2907 semsg(_("E1011: name too long: %s"), name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2908 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2909 }
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2910 vim_strncpy(namebuf, *arg, varlen);
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2911 name = fname_trans_sid(namebuf, fname_buf, &tofree, &error);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2912
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2913 arg = skipwhite(arg + varlen + 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2914 if (compile_arguments(arg, cctx, &argcount) == FAIL)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2915 goto theend;
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2916
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2917 if (ASCII_ISLOWER(*name) && name[1] != ':')
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2918 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2919 int idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2920
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2921 // builtin function
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2922 idx = find_internal_func(name);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2923 if (idx >= 0)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2924 res = generate_BCALL(cctx, idx, argcount);
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2925 else
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2926 semsg(_(e_unknownfunc), namebuf);
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2927 goto theend;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2928 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2929
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2930 // If we can find the function by name generate the right call.
20189 63cc54100ae4 patch 8.2.0650: Vim9: script function can be deleted Bram Moolenaar <Bram@vim.org> parents: 20174 diff changeset	2931 ufunc = find_func(name, FALSE, cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2932 if (ufunc != NULL)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2933 {
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2934 res = generate_CALL(cctx, ufunc, argcount);
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2935 goto theend;
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2936 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2937
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2938 // If the name is a variable, load it and use PCALL.
20079 336483164ca6 patch 8.2.0595: Vim9: not all commands using ends_excmd() tested Bram Moolenaar <Bram@vim.org> parents: 20059 diff changeset	2939 // Not for g:Func(), we don't know if it is a variable or not.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2940 p = namebuf;
20079 336483164ca6 patch 8.2.0595: Vim9: not all commands using ends_excmd() tested Bram Moolenaar <Bram@vim.org> parents: 20059 diff changeset	2941 if (STRNCMP(namebuf, "g:", 2) != 0
336483164ca6 patch 8.2.0595: Vim9: not all commands using ends_excmd() tested Bram Moolenaar <Bram@vim.org> parents: 20059 diff changeset	2942 && compile_load(&p, namebuf + varlen, cctx, FALSE) == OK)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2943 {
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	2944 garray_T *stack = &cctx->ctx_type_stack;
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	2945 type_T *type;
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	2946
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	2947 type = ((type_T **)stack->ga_data)[stack->ga_len - 1];
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	2948 res = generate_PCALL(cctx, argcount, namebuf, type, FALSE);
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2949 goto theend;
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2950 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2951
20140 39a18a0df429 patch 8.2.0625: Vim9: confusing error when calling unknown function Bram Moolenaar <Bram@vim.org> parents: 20138 diff changeset	2952 // A global function may be defined only later. Need to figure out at
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	2953 // runtime. Also handles a FuncRef at runtime.
20140 39a18a0df429 patch 8.2.0625: Vim9: confusing error when calling unknown function Bram Moolenaar <Bram@vim.org> parents: 20138 diff changeset	2954 if (STRNCMP(namebuf, "g:", 2) == 0)
39a18a0df429 patch 8.2.0625: Vim9: confusing error when calling unknown function Bram Moolenaar <Bram@vim.org> parents: 20138 diff changeset	2955 res = generate_UCALL(cctx, name, argcount);
39a18a0df429 patch 8.2.0625: Vim9: confusing error when calling unknown function Bram Moolenaar <Bram@vim.org> parents: 20138 diff changeset	2956 else
39a18a0df429 patch 8.2.0625: Vim9: confusing error when calling unknown function Bram Moolenaar <Bram@vim.org> parents: 20138 diff changeset	2957 semsg(_(e_unknownfunc), namebuf);
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2958
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2959 theend:
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2960 vim_free(tofree);
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2961 return res;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2962 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2963
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2964 // like NAMESPACE_CHAR but with 'a' and 'l'.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2965 #define VIM9_NAMESPACE_CHAR (char_u *)"bgstvw"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2966
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2967 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2968 * Find the end of a variable or function name. Unlike find_name_end() this
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2969 * does not recognize magic braces.
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	2970 * When "namespace" is TRUE recognize "b:", "s:", etc.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2971 * Return a pointer to just after the name. Equal to "arg" if there is no
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2972 * valid name.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2973 */
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	2974 static char_u *
ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	2975 to_name_end(char_u *arg, int namespace)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2976 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2977 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2978
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2979 // Quick check for valid starting character.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2980 if (!eval_isnamec1(*arg))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2981 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2982
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2983 for (p = arg + 1; p != NUL && eval_isnamec(p); MB_PTR_ADV(p))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2984 // Include a namespace such as "s:var" and "v:var". But "n:" is not
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2985 // and can be used in slice "[n:]".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2986 if (*p == ':' && (p != arg + 1
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	2987 \|\| !namespace
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2988 \|\| vim_strchr(VIM9_NAMESPACE_CHAR, *arg) == NULL))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2989 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2990 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2991 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2992
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2993 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2994 * Like to_name_end() but also skip over a list or dict constant.
21146 465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2995 * This intentionally does not handle line continuation.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2996 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2997 char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2998 to_name_const_end(char_u *arg)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2999 {
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	3000 char_u *p = to_name_end(arg, TRUE);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3001 typval_T rettv;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3002
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3003 if (p == arg && *arg == '[')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3004 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3005
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3006 // Can be "[1, 2, 3]->Func()".
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3007 if (eval_list(&p, &rettv, NULL, FALSE) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3008 p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3009 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3010 else if (p == arg && *arg == '#' && arg[1] == '{')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3011 {
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	3012 // Can be "#{a: 1}->Func()".
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3013 ++p;
21034 2f8b0812819f patch 8.2.1068: Vim9: no line break allowed inside a dict Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3014 if (eval_dict(&p, &rettv, NULL, TRUE) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3015 p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3016 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3017 else if (p == arg && *arg == '{')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3018 {
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	3019 int ret = get_lambda_tv(&p, &rettv, NULL);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3020
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	3021 // Can be "{x -> ret}()".
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	3022 // Can be "{'a': 1}->Func()".
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3023 if (ret == NOTDONE)
21034 2f8b0812819f patch 8.2.1068: Vim9: no line break allowed inside a dict Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3024 ret = eval_dict(&p, &rettv, NULL, FALSE);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3025 if (ret != OK)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3026 p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3027 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3028
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3029 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3030 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3031
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3032 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3033 * parse a list: [expr, expr]
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3034 * "*arg" points to the '['.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3035 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3036 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3037 compile_list(char_u *arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3038 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3039 char_u p = skipwhite(arg + 1);
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3040 char_u whitep = arg + 1;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3041 int count = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3042
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3043 for (;;)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3044 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3045 if (may_get_next_line(whitep, &p, cctx) == FAIL)
19830 6500dcaf8e1a patch 8.2.0471: missing change to compile_list() Bram Moolenaar <Bram@vim.org> parents: 19822 diff changeset	3046 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3047 semsg(_(e_list_end), *arg);
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3048 return FAIL;
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3049 }
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3050 if (*p == ']')
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3051 {
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3052 ++p;
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3053 // Allow for following comment, after at least one space.
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3054 if (VIM_ISWHITE(p) && skipwhite(p) == '"')
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3055 p += STRLEN(p);
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3056 break;
19830 6500dcaf8e1a patch 8.2.0471: missing change to compile_list() Bram Moolenaar <Bram@vim.org> parents: 19822 diff changeset	3057 }
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3058 if (compile_expr0(&p, cctx) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3059 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3060 ++count;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3061 if (*p == ',')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3062 ++p;
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3063 whitep = p;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3064 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3065 }
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3066 *arg = p;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3067
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3068 generate_NEWLIST(cctx, count);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3069 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3070 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3071
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3072 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3073 * parse a lambda: {arg, arg -> expr}
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3074 * "*arg" points to the '{'.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3075 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3076 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3077 compile_lambda(char_u *arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3078 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3079 typval_T rettv;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3080 ufunc_T *ufunc;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3081
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3082 // Get the funcref in "rettv".
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	3083 if (get_lambda_tv(arg, &rettv, &EVALARG_EVALUATE) != OK)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3084 return FAIL;
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3085
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3086 ufunc = rettv.vval.v_partial->pt_func;
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3087 ++ufunc->uf_refcount;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3088 clear_tv(&rettv);
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	3089 ga_init2(&ufunc->uf_type_list, sizeof(type_T *), 10);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3090
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3091 // The function will have one line: "return {expr}".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3092 // Compile it into instructions.
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	3093 compile_def_function(ufunc, TRUE, cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3094
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	3095 if (ufunc->uf_def_status == UF_COMPILED)
20281 ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	3096 return generate_FUNCREF(cctx, ufunc->uf_dfunc_idx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3097 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3098 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3099
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3100 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3101 * Compile a lamda call: expr->{lambda}(args)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3102 * "arg" points to the "{".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3103 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3104 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3105 compile_lambda_call(char_u *arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3106 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3107 ufunc_T *ufunc;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3108 typval_T rettv;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3109 int argcount = 1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3110 int ret = FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3111
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3112 // Get the funcref in "rettv".
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	3113 if (get_lambda_tv(arg, &rettv, &EVALARG_EVALUATE) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3114 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3115
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3116 if (**arg != '(')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3117 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3118 if (skipwhite(arg) == '(')
19760 9daed26b788b patch 8.2.0436: no warnings for incorrect printf arguments Bram Moolenaar <Bram@vim.org> parents: 19726 diff changeset	3119 emsg(_(e_nowhitespace));
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3120 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3121 semsg(_(e_missing_paren), "lambda");
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3122 clear_tv(&rettv);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3123 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3124 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3125
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3126 ufunc = rettv.vval.v_partial->pt_func;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3127 ++ufunc->uf_refcount;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3128 clear_tv(&rettv);
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	3129 ga_init2(&ufunc->uf_type_list, sizeof(type_T *), 10);
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3130
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3131 // The function will have one line: "return {expr}".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3132 // Compile it into instructions.
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	3133 compile_def_function(ufunc, TRUE, cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3134
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3135 // compile the arguments
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3136 arg = skipwhite(arg + 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3137 if (compile_arguments(arg, cctx, &argcount) == OK)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3138 // call the compiled function
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3139 ret = generate_CALL(cctx, ufunc, argcount);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3140
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3141 return ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3142 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3143
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3144 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3145 * parse a dict: {'key': val} or #{key: val}
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3146 * "*arg" points to the '{'.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3147 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3148 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3149 compile_dict(char_u *arg, cctx_T cctx, int literal)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3150 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3151 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3152 int count = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3153 dict_T *d = dict_alloc();
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3154 dictitem_T *item;
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3155 char_u whitep = arg;
c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3156 char_u *p;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3157
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3158 if (d == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3159 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3160 arg = skipwhite(arg + 1);
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3161 for (;;)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3162 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3163 char_u *key = NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3164
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3165 if (may_get_next_line(whitep, arg, cctx) == FAIL)
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3166 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3167 *arg = NULL;
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3168 goto failret;
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3169 }
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3170
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3171 if (**arg == '}')
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3172 break;
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3173
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3174 if (literal)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3175 {
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3176 char_u end = to_name_end(arg, !literal);
c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3177
c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3178 if (end == *arg)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3179 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3180 semsg(_("E1014: Invalid key: %s"), *arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3181 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3182 }
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3183 key = vim_strnsave(arg, end - arg);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3184 if (generate_PUSHS(cctx, key) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3185 return FAIL;
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3186 *arg = end;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3187 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3188 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3189 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3190 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3191
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3192 if (compile_expr0(arg, cctx) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3193 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3194 // TODO: check type is string
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3195 isn = ((isn_T *)instr->ga_data) + instr->ga_len - 1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3196 if (isn->isn_type == ISN_PUSHS)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3197 key = isn->isn_arg.string;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3198 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3199
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3200 // Check for duplicate keys, if using string keys.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3201 if (key != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3202 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3203 item = dict_find(d, key, -1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3204 if (item != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3205 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3206 semsg(_(e_duplicate_key), key);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3207 goto failret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3208 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3209 item = dictitem_alloc(key);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3210 if (item != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3211 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3212 item->di_tv.v_type = VAR_UNKNOWN;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3213 item->di_tv.v_lock = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3214 if (dict_add(d, item) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3215 dictitem_free(item);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3216 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3217 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3218
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3219 arg = skipwhite(arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3220 if (**arg != ':')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3221 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3222 semsg(_(e_missing_dict_colon), *arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3223 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3224 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3225
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3226 whitep = *arg + 1;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3227 arg = skipwhite(arg + 1);
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3228 if (may_get_next_line(whitep, arg, cctx) == FAIL)
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3229 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3230 *arg = NULL;
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3231 goto failret;
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3232 }
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3233
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3234 if (compile_expr0(arg, cctx) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3235 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3236 ++count;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3237
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3238 whitep = *arg;
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3239 arg = skipwhite(arg);
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3240 if (may_get_next_line(whitep, arg, cctx) == FAIL)
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3241 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3242 *arg = NULL;
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3243 goto failret;
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3244 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3245 if (**arg == '}')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3246 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3247 if (**arg != ',')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3248 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3249 semsg(_(e_missing_dict_comma), *arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3250 goto failret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3251 }
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3252 whitep = *arg + 1;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3253 arg = skipwhite(arg + 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3254 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3255
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3256 arg = arg + 1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3257
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3258 // Allow for following comment, after at least one space.
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3259 p = skipwhite(*arg);
c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3260 if (VIM_ISWHITE(*arg) && (p == '"' \|\| comment_start(p)))
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3261 arg += STRLEN(arg);
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3262
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3263 dict_unref(d);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3264 return generate_NEWDICT(cctx, count);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3265
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3266 failret:
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3267 if (*arg == NULL)
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3268 semsg(_(e_missing_dict_end), _("[end of lines]"));
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3269 dict_unref(d);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3270 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3271 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3272
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3273 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3274 * Compile "&option".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3275 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3276 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3277 compile_get_option(char_u *arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3278 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3279 typval_T rettv;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3280 char_u start = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3281 int ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3282
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3283 // parse the option and get the current value to get the type.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3284 rettv.v_type = VAR_UNKNOWN;
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3285 ret = eval_option(arg, &rettv, TRUE);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3286 if (ret == OK)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3287 {
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3288 // include the '&' in the name, eval_option() expects it.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3289 char_u name = vim_strnsave(start, arg - start);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3290 type_T *type = rettv.v_type == VAR_NUMBER ? &t_number : &t_string;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3291
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3292 ret = generate_LOAD(cctx, ISN_LOADOPT, 0, name, type);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3293 vim_free(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3294 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3295 clear_tv(&rettv);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3296
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3297 return ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3298 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3299
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3300 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3301 * Compile "$VAR".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3302 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3303 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3304 compile_get_env(char_u *arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3305 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3306 char_u start = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3307 int len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3308 int ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3309 char_u *name;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3310
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3311 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3312 len = get_env_len(arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3313 if (len == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3314 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3315 semsg(_(e_syntax_at), start - 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3316 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3317 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3318
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3319 // include the '$' in the name, eval_env_var() expects it.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3320 name = vim_strnsave(start, len + 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3321 ret = generate_LOAD(cctx, ISN_LOADENV, 0, name, &t_string);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3322 vim_free(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3323 return ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3324 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3325
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3326 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3327 * Compile "@r".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3328 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3329 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3330 compile_get_register(char_u *arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3331 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3332 int ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3333
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3334 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3335 if (**arg == NUL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3336 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3337 semsg(_(e_syntax_at), *arg - 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3338 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3339 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3340 if (!valid_yank_reg(**arg, TRUE))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3341 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3342 emsg_invreg(**arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3343 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3344 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3345 ret = generate_LOAD(cctx, ISN_LOADREG, **arg, NULL, &t_string);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3346 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3347 return ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3348 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3349
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3350 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3351 * Apply leading '!', '-' and '+' to constant "rettv".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3352 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3353 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3354 apply_leader(typval_T rettv, char_u start, char_u *end)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3355 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3356 char_u *p = end;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3357
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3358 // this works from end to start
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3359 while (p > start)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3360 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3361 --p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3362 if (p == '-' \|\| p == '+')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3363 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3364 // only '-' has an effect, for '+' we only check the type
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3365 #ifdef FEAT_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3366 if (rettv->v_type == VAR_FLOAT)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3367 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3368 if (*p == '-')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3369 rettv->vval.v_float = -rettv->vval.v_float;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3370 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3371 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3372 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3373 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3374 varnumber_T val;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3375 int error = FALSE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3376
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3377 // tv_get_number_chk() accepts a string, but we don't want that
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3378 // here
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3379 if (check_not_string(rettv) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3380 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3381 val = tv_get_number_chk(rettv, &error);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3382 clear_tv(rettv);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3383 if (error)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3384 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3385 if (*p == '-')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3386 val = -val;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3387 rettv->v_type = VAR_NUMBER;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3388 rettv->vval.v_number = val;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3389 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3390 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3391 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3392 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3393 int v = tv2bool(rettv);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3394
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3395 // '!' is permissive in the type.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3396 clear_tv(rettv);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3397 rettv->v_type = VAR_BOOL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3398 rettv->vval.v_number = v ? VVAL_FALSE : VVAL_TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3399 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3400 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3401 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3402 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3403
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3404 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3405 * Recognize v: variables that are constants and set "rettv".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3406 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3407 static void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3408 get_vim_constant(char_u *arg, typval_T rettv)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3409 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3410 if (STRNCMP(*arg, "v:true", 6) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3411 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3412 rettv->v_type = VAR_BOOL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3413 rettv->vval.v_number = VVAL_TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3414 *arg += 6;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3415 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3416 else if (STRNCMP(*arg, "v:false", 7) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3417 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3418 rettv->v_type = VAR_BOOL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3419 rettv->vval.v_number = VVAL_FALSE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3420 *arg += 7;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3421 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3422 else if (STRNCMP(*arg, "v:null", 6) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3423 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3424 rettv->v_type = VAR_SPECIAL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3425 rettv->vval.v_number = VVAL_NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3426 *arg += 6;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3427 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3428 else if (STRNCMP(*arg, "v:none", 6) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3429 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3430 rettv->v_type = VAR_SPECIAL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3431 rettv->vval.v_number = VVAL_NONE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3432 *arg += 6;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3433 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3434 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3435
20305 9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3436 static exptype_T
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3437 get_compare_type(char_u p, int len, int *type_is)
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3438 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3439 exptype_T type = EXPR_UNKNOWN;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3440 int i;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3441
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3442 switch (p[0])
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3443 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3444 case '=': if (p[1] == '=')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3445 type = EXPR_EQUAL;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3446 else if (p[1] == '~')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3447 type = EXPR_MATCH;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3448 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3449 case '!': if (p[1] == '=')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3450 type = EXPR_NEQUAL;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3451 else if (p[1] == '~')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3452 type = EXPR_NOMATCH;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3453 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3454 case '>': if (p[1] != '=')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3455 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3456 type = EXPR_GREATER;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3457 *len = 1;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3458 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3459 else
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3460 type = EXPR_GEQUAL;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3461 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3462 case '<': if (p[1] != '=')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3463 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3464 type = EXPR_SMALLER;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3465 *len = 1;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3466 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3467 else
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3468 type = EXPR_SEQUAL;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3469 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3470 case 'i': if (p[1] == 's')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3471 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3472 // "is" and "isnot"; but not a prefix of a name
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3473 if (p[2] == 'n' && p[3] == 'o' && p[4] == 't')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3474 *len = 5;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3475 i = p[*len];
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3476 if (!isalnum(i) && i != '_')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3477 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3478 type = *len == 2 ? EXPR_IS : EXPR_ISNOT;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3479 *type_is = TRUE;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3480 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3481 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3482 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3483 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3484 return type;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3485 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3486
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3487 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3488 * Compile code to apply '-', '+' and '!'.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3489 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3490 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3491 compile_leader(cctx_T cctx, char_u start, char_u *end)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3492 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3493 char_u *p = end;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3494
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3495 // this works from end to start
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3496 while (p > start)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3497 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3498 --p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3499 if (p == '-' \|\| p == '+')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3500 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3501 int negate = *p == '-';
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3502 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3503
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3504 // TODO: check type
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3505 while (p > start && (p[-1] == '-' \|\| p[-1] == '+'))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3506 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3507 --p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3508 if (*p == '-')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3509 negate = !negate;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3510 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3511 // only '-' has an effect, for '+' we only check the type
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3512 if (negate)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3513 isn = generate_instr(cctx, ISN_NEGATENR);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3514 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3515 isn = generate_instr(cctx, ISN_CHECKNR);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3516 if (isn == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3517 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3518 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3519 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3520 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3521 int invert = TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3522
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3523 while (p > start && p[-1] == '!')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3524 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3525 --p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3526 invert = !invert;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3527 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3528 if (generate_2BOOL(cctx, invert) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3529 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3530 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3531 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3532 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3533 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3534
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3535 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3536 * Compile whatever comes after "name" or "name()".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3537 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3538 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3539 compile_subscript(
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3540 char_u **arg,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3541 cctx_T *cctx,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3542 char_u **start_leader,
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3543 char_u *end_leader,
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3544 ppconst_T *ppconst)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3545 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3546 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3547 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3548 char_u p = skipwhite(arg);
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3549
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3550 if (p == NUL \|\| (VIM_ISWHITE(*arg) && comment_start(p)))
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3551 {
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3552 char_u *next = peek_next_line(cctx);
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3553
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3554 // If a following line starts with "->{" or "->X" advance to that
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3555 // line, so that a line break before "->" is allowed.
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3556 if (next != NULL && next[0] == '-' && next[1] == '>'
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3557 && (next[2] == '{' \|\| ASCII_ISALPHA(next[2])))
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3558 {
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3559 next = next_line_from_context(cctx, TRUE);
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3560 if (next == NULL)
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3561 return FAIL;
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3562 *arg = skipwhite(next);
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3563 }
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3564 }
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3565
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3566 if (**arg == '(')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3567 {
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	3568 garray_T *stack = &cctx->ctx_type_stack;
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	3569 type_T *type;
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	3570 int argcount = 0;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3571
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3572 if (generate_ppconst(cctx, ppconst) == FAIL)
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3573 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3574
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3575 // funcref(arg)
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	3576 type = ((type_T **)stack->ga_data)[stack->ga_len - 1];
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	3577
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3578 arg = skipwhite(arg + 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3579 if (compile_arguments(arg, cctx, &argcount) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3580 return FAIL;
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	3581 if (generate_PCALL(cctx, argcount, end_leader, type, TRUE) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3582 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3583 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3584 else if (*arg == '-' && (arg)[1] == '>')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3585 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3586 if (generate_ppconst(cctx, ppconst) == FAIL)
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3587 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3588
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3589 // something->method()
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3590 // Apply the '!', '-' and '+' first:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3591 // -1.0->func() works like (-1.0)->func()
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3592 if (compile_leader(cctx, *start_leader, end_leader) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3593 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3594 *start_leader = end_leader; // don't apply again later
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3595
20949 62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3596 p = *arg + 2;
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3597 *arg = skipwhite(p);
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3598 if (may_get_next_line(p, arg, cctx) == FAIL)
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3599 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3600 if (**arg == '{')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3601 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3602 // lambda call: list->{lambda}
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3603 if (compile_lambda_call(arg, cctx) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3604 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3605 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3606 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3607 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3608 // method call: list->method()
19848 36d629aa3d6e patch 8.2.0480: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19830 diff changeset	3609 p = *arg;
36d629aa3d6e patch 8.2.0480: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19830 diff changeset	3610 if (ASCII_ISALPHA(*p) && p[1] == ':')
36d629aa3d6e patch 8.2.0480: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19830 diff changeset	3611 p += 2;
36d629aa3d6e patch 8.2.0480: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19830 diff changeset	3612 for ( ; eval_isnamec1(*p); ++p)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3613 ;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3614 if (*p != '(')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3615 {
19848 36d629aa3d6e patch 8.2.0480: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19830 diff changeset	3616 semsg(_(e_missing_paren), *arg);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3617 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3618 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3619 // TODO: base value may not be the first argument
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3620 if (compile_call(arg, p - *arg, cctx, ppconst, 1) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3621 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3622 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3623 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3624 else if (**arg == '[')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3625 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3626 garray_T *stack = &cctx->ctx_type_stack;
19423 f3e8e74cb747 patch 8.2.0269: Vim9: operator after list index does not work Bram Moolenaar <Bram@vim.org> parents: 19411 diff changeset	3627 type_T **typep;
f3e8e74cb747 patch 8.2.0269: Vim9: operator after list index does not work Bram Moolenaar <Bram@vim.org> parents: 19411 diff changeset	3628
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3629 // list index: list[123]
20419 d54dfb5f12db patch 8.2.0764: Vim9: assigning to option not fully tested Bram Moolenaar <Bram@vim.org> parents: 20397 diff changeset	3630 // dict member: dict[key]
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3631 // TODO: blob index
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3632 // TODO: more arguments
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3633 // TODO: recognize list or dict at runtime
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3634 if (generate_ppconst(cctx, ppconst) == FAIL)
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3635 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3636
20949 62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3637 p = *arg + 1;
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3638 *arg = skipwhite(p);
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3639 if (may_get_next_line(p, arg, cctx) == FAIL)
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3640 return FAIL;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3641 if (compile_expr0(arg, cctx) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3642 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3643
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3644 if (**arg != ']')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3645 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3646 emsg(_(e_missbrac));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3647 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3648 }
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	3649 arg = arg + 1;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3650
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3651 typep = ((type_T **)stack->ga_data) + stack->ga_len - 2;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3652 if ((typep)->tt_type == VAR_LIST \|\| (typep) == &t_any)
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3653 {
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3654 if ((*typep)->tt_type == VAR_LIST)
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3655 typep = (typep)->tt_member;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3656 if (generate_instr_drop(cctx, ISN_INDEX, 1) == FAIL)
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3657 return FAIL;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3658 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3659 else if ((*typep)->tt_type == VAR_DICT)
19423 f3e8e74cb747 patch 8.2.0269: Vim9: operator after list index does not work Bram Moolenaar <Bram@vim.org> parents: 19411 diff changeset	3660 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3661 typep = (typep)->tt_member;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3662 if (may_generate_2STRING(-1, cctx) == FAIL)
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3663 return FAIL;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3664 if (generate_instr_drop(cctx, ISN_MEMBER, 1) == FAIL)
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3665 return FAIL;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3666 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3667 else
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3668 {
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3669 emsg(_(e_listdictblobreq));
19423 f3e8e74cb747 patch 8.2.0269: Vim9: operator after list index does not work Bram Moolenaar <Bram@vim.org> parents: 19411 diff changeset	3670 return FAIL;
f3e8e74cb747 patch 8.2.0269: Vim9: operator after list index does not work Bram Moolenaar <Bram@vim.org> parents: 19411 diff changeset	3671 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3672 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3673 else if (*arg == '.' && (arg)[1] != '.')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3674 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3675 if (generate_ppconst(cctx, ppconst) == FAIL)
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3676 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3677
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3678 ++*arg;
20949 62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3679 if (may_get_next_line(*arg, arg, cctx) == FAIL)
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3680 return FAIL;
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3681 // dictionary member: dict.name
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3682 p = *arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3683 if (eval_isnamec1(*p))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3684 while (eval_isnamec(*p))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3685 MB_PTR_ADV(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3686 if (p == *arg)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3687 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3688 semsg(_(e_syntax_at), *arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3689 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3690 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3691 if (generate_STRINGMEMBER(cctx, arg, p - arg) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3692 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3693 *arg = p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3694 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3695 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3696 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3697 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3698
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3699 // TODO - see handle_subscript():
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3700 // Turn "dict.Func" into a partial for "Func" bound to "dict".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3701 // Don't do this when "Func" is already a partial that was bound
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3702 // explicitly (pt_auto is FALSE).
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3703
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3704 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3705 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3706
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3707 /*
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3708 * Compile an expression at "*arg" and add instructions to "cctx->ctx_instr".
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3709 * "arg" is advanced until after the expression, skipping white space.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3710 *
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3711 * If the value is a constant "ppconst->pp_ret" will be set.
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3712 * Before instructions are generated, any values in "ppconst" will generated.
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3713 *
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3714 * This is the compiling equivalent of eval1(), eval2(), etc.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3715 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3716
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3717 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3718 * number number constant
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3719 * 0zFFFFFFFF Blob constant
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3720 * "string" string constant
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3721 * 'string' literal string constant
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3722 * &option-name option value
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3723 * @r register contents
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3724 * identifier variable value
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3725 * function() function call
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3726 * $VAR environment variable
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3727 * (expression) nested expression
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3728 * [expr, expr] List
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3729 * {key: val, key: val} Dictionary
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3730 * #{key: val, key: val} Dictionary with literal keys
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3731 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3732 * Also handle:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3733 * ! in front logical NOT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3734 * - in front unary minus
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3735 * + in front unary plus (ignored)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3736 * trailing (arg) funcref/partial call
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3737 * trailing [] subscript in String or List
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3738 * trailing .name entry in Dictionary
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3739 * trailing ->name() method call
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3740 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3741 static int
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3742 compile_expr7(
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3743 char_u **arg,
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3744 cctx_T *cctx,
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3745 ppconst_T *ppconst)
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3746 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3747 char_u start_leader, end_leader;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3748 int ret = OK;
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3749 typval_T *rettv = &ppconst->pp_tv[ppconst->pp_used];
20336 2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3750 int used_before = ppconst->pp_used;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3751
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3752 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3753 * Skip '!', '-' and '+' characters. They are handled later.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3754 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3755 start_leader = *arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3756 while (arg == '!' \|\| arg == '-' \|\| **arg == '+')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3757 arg = skipwhite(arg + 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3758 end_leader = *arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3759
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3760 rettv->v_type = VAR_UNKNOWN;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3761 switch (**arg)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3762 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3763 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3764 * Number constant.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3765 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3766 case '0': // also for blob starting with 0z
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3767 case '1':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3768 case '2':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3769 case '3':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3770 case '4':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3771 case '5':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3772 case '6':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3773 case '7':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3774 case '8':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3775 case '9':
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3776 case '.': if (eval_number(arg, rettv, TRUE, FALSE) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3777 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3778 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3779
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3780 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3781 * String constant: "string".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3782 */
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3783 case '"': if (eval_string(arg, rettv, TRUE) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3784 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3785 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3786
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3787 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3788 * Literal string constant: 'str''ing'.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3789 */
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3790 case '\'': if (eval_lit_string(arg, rettv, TRUE) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3791 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3792 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3793
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3794 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3795 * Constant Vim variable.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3796 */
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3797 case 'v': get_vim_constant(arg, rettv);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3798 ret = NOTDONE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3799 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3800
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3801 /*
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3802 * "true" constant
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3803 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3804 case 't': if (STRNCMP(*arg, "true", 4) == 0
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3805 && !eval_isnamec((*arg)[4]))
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3806 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3807 *arg += 4;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3808 rettv->v_type = VAR_BOOL;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3809 rettv->vval.v_number = VVAL_TRUE;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3810 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3811 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3812 ret = NOTDONE;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3813 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3814
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3815 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3816 * "false" constant
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3817 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3818 case 'f': if (STRNCMP(*arg, "false", 5) == 0
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3819 && !eval_isnamec((*arg)[5]))
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3820 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3821 *arg += 5;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3822 rettv->v_type = VAR_BOOL;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3823 rettv->vval.v_number = VVAL_FALSE;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3824 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3825 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3826 ret = NOTDONE;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3827 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3828
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3829 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3830 * List: [expr, expr]
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3831 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3832 case '[': ret = compile_list(arg, cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3833 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3834
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3835 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3836 * Dictionary: #{key: val, key: val}
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3837 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3838 case '#': if ((*arg)[1] == '{')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3839 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3840 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3841 ret = compile_dict(arg, cctx, TRUE);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3842 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3843 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3844 ret = NOTDONE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3845 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3846
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3847 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3848 * Lambda: {arg, arg -> expr}
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3849 * Dictionary: {'key': val, 'key': val}
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3850 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3851 case '{': {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3852 char_u start = skipwhite(arg + 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3853
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3854 // Find out what comes after the arguments.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3855 ret = get_function_args(&start, '-', NULL,
20015 c001ee73519a patch 8.2.0563: Vim9: cannot split a function line Bram Moolenaar <Bram@vim.org> parents: 20013 diff changeset	3856 NULL, NULL, NULL, TRUE, NULL, NULL);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3857 if (ret != FAIL && *start == '>')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3858 ret = compile_lambda(arg, cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3859 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3860 ret = compile_dict(arg, cctx, FALSE);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3861 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3862 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3863
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3864 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3865 * Option value: &name
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3866 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3867 case '&': ret = compile_get_option(arg, cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3868 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3869
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3870 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3871 * Environment variable: $VAR.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3872 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3873 case '$': ret = compile_get_env(arg, cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3874 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3875
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3876 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3877 * Register contents: @r.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3878 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3879 case '@': ret = compile_get_register(arg, cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3880 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3881 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3882 * nested expression: (expression).
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3883 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3884 case '(': arg = skipwhite(arg + 1);
20336 2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3885
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3886 // recursive!
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3887 if (ppconst->pp_used <= PPSIZE - 10)
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3888 {
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3889 ret = compile_expr1(arg, cctx, ppconst);
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3890 }
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3891 else
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3892 {
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3893 // Not enough space in ppconst, flush constants.
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3894 if (generate_ppconst(cctx, ppconst) == FAIL)
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3895 return FAIL;
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3896 ret = compile_expr0(arg, cctx);
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3897 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3898 arg = skipwhite(arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3899 if (**arg == ')')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3900 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3901 else if (ret == OK)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3902 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3903 emsg(_(e_missing_close));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3904 ret = FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3905 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3906 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3907
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3908 default: ret = NOTDONE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3909 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3910 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3911 if (ret == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3912 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3913
20336 2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3914 if (rettv->v_type != VAR_UNKNOWN && used_before == ppconst->pp_used)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3915 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3916 // apply the '!', '-' and '+' before the constant
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3917 if (apply_leader(rettv, start_leader, end_leader) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3918 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3919 clear_tv(rettv);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3920 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3921 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3922 start_leader = end_leader; // don't apply again below
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3923
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	3924 if (cctx->ctx_skip == SKIP_YES)
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3925 clear_tv(rettv);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3926 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3927 // A constant expression can possibly be handled compile time,
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3928 // return the value instead of generating code.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3929 ++ppconst->pp_used;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3930 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3931 else if (ret == NOTDONE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3932 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3933 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3934 int r;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3935
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3936 if (!eval_isnamec1(**arg))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3937 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3938 semsg(_("E1015: Name expected: %s"), *arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3939 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3940 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3941
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3942 // "name" or "name()"
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	3943 p = to_name_end(*arg, TRUE);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3944 if (*p == '(')
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3945 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3946 r = compile_call(arg, p - *arg, cctx, ppconst, 0);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3947 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3948 else
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3949 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3950 if (generate_ppconst(cctx, ppconst) == FAIL)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3951 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3952 r = compile_load(arg, p, cctx, TRUE);
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3953 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3954 if (r == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3955 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3956 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3957
20322 a3e78893a90b patch 8.2.0716: Vim9: another memory leak Bram Moolenaar <Bram@vim.org> parents: 20320 diff changeset	3958 // Handle following "[]", ".member", etc.
a3e78893a90b patch 8.2.0716: Vim9: another memory leak Bram Moolenaar <Bram@vim.org> parents: 20320 diff changeset	3959 // Then deal with prefixed '-', '+' and '!', if not done already.
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3960 if (compile_subscript(arg, cctx, &start_leader, end_leader,
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3961 ppconst) == FAIL)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3962 return FAIL;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3963 if (ppconst->pp_used > 0)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3964 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3965 // apply the '!', '-' and '+' before the constant
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3966 rettv = &ppconst->pp_tv[ppconst->pp_used - 1];
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3967 if (apply_leader(rettv, start_leader, end_leader) == FAIL)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3968 return FAIL;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3969 return OK;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3970 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3971 if (compile_leader(cctx, start_leader, end_leader) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3972 return FAIL;
20322 a3e78893a90b patch 8.2.0716: Vim9: another memory leak Bram Moolenaar <Bram@vim.org> parents: 20320 diff changeset	3973 return OK;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3974 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3975
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3976 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3977 * * number multiplication
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3978 * / number division
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3979 * % number modulo
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3980 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3981 static int
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3982 compile_expr6(char_u *arg, cctx_T cctx, ppconst_T *ppconst)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3983 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3984 char_u *op;
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	3985 char_u *next;
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3986 int ppconst_used = ppconst->pp_used;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3987
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3988 // get the first expression
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3989 if (compile_expr7(arg, cctx, ppconst) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3990 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3991
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3992 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3993 * Repeat computing, until no "*", "/" or "%" is following.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3994 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3995 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3996 {
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	3997 op = may_peek_next_line(cctx, *arg, &next);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3998 if (op != '' && op != '/' && op != '%')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3999 break;
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4000 if (next != NULL)
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4001 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4002 *arg = next_line_from_context(cctx, TRUE);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4003 op = skipwhite(*arg);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4004 }
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4005
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4006 if (!IS_WHITE_OR_NUL(**arg) \|\| !IS_WHITE_OR_NUL(op[1]))
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4007 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4008 char_u buf[3];
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4009
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4010 vim_strncpy(buf, op, 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4011 semsg(_(e_white_both), buf);
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4012 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4013 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4014 *arg = skipwhite(op + 1);
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	4015 if (may_get_next_line(op + 1, arg, cctx) == FAIL)
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4016 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4017
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4018 // get the second expression
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4019 if (compile_expr7(arg, cctx, ppconst) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4020 return FAIL;
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4021
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4022 if (ppconst->pp_used == ppconst_used + 2
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4023 && ppconst->pp_tv[ppconst_used].v_type == VAR_NUMBER
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4024 && ppconst->pp_tv[ppconst_used + 1].v_type == VAR_NUMBER)
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4025 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4026 typval_T *tv1 = &ppconst->pp_tv[ppconst_used];
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4027 typval_T *tv2 = &ppconst->pp_tv[ppconst_used + 1];
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4028 varnumber_T res = 0;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4029
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4030 // both are numbers: compute the result
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4031 switch (*op)
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4032 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4033 case '': res = tv1->vval.v_number tv2->vval.v_number;
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4034 break;
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4035 case '/': res = tv1->vval.v_number / tv2->vval.v_number;
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4036 break;
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4037 case '%': res = tv1->vval.v_number % tv2->vval.v_number;
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4038 break;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4039 }
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4040 tv1->vval.v_number = res;
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4041 --ppconst->pp_used;
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4042 }
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4043 else
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4044 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4045 generate_ppconst(cctx, ppconst);
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4046 generate_two_op(cctx, op);
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4047 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4048 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4049
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4050 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4051 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4052
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4053 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4054 * + number addition
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4055 * - number subtraction
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4056 * .. string concatenation
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4057 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4058 static int
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4059 compile_expr5(char_u *arg, cctx_T cctx, ppconst_T *ppconst)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4060 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4061 char_u *op;
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4062 char_u *next;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4063 int oplen;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4064 int ppconst_used = ppconst->pp_used;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4065
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4066 // get the first variable
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4067 if (compile_expr6(arg, cctx, ppconst) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4068 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4069
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4070 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4071 * Repeat computing, until no "+", "-" or ".." is following.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4072 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4073 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4074 {
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4075 op = may_peek_next_line(cctx, *arg, &next);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4076 if (op != '+' && op != '-' && !(op == '.' && (op + 1) == '.'))
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4077 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4078 oplen = (*op == '.' ? 2 : 1);
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4079 if (next != NULL)
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4080 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4081 *arg = next_line_from_context(cctx, TRUE);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4082 op = skipwhite(*arg);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4083 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4084
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4085 if (!IS_WHITE_OR_NUL(**arg) \|\| !IS_WHITE_OR_NUL(op[oplen]))
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4086 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4087 char_u buf[3];
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4088
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4089 vim_strncpy(buf, op, oplen);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4090 semsg(_(e_white_both), buf);
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4091 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4092 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4093
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4094 *arg = skipwhite(op + oplen);
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	4095 if (may_get_next_line(op + oplen, arg, cctx) == FAIL)
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4096 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4097
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4098 // get the second expression
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4099 if (compile_expr6(arg, cctx, ppconst) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4100 return FAIL;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4101
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4102 if (ppconst->pp_used == ppconst_used + 2
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4103 && (*op == '.'
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4104 ? (ppconst->pp_tv[ppconst_used].v_type == VAR_STRING
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4105 && ppconst->pp_tv[ppconst_used + 1].v_type == VAR_STRING)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4106 : (ppconst->pp_tv[ppconst_used].v_type == VAR_NUMBER
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4107 && ppconst->pp_tv[ppconst_used + 1].v_type == VAR_NUMBER)))
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4108 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4109 typval_T *tv1 = &ppconst->pp_tv[ppconst_used];
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4110 typval_T *tv2 = &ppconst->pp_tv[ppconst_used + 1];
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4111
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4112 // concat/subtract/add constant numbers
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4113 if (*op == '+')
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4114 tv1->vval.v_number = tv1->vval.v_number + tv2->vval.v_number;
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4115 else if (*op == '-')
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4116 tv1->vval.v_number = tv1->vval.v_number - tv2->vval.v_number;
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4117 else
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4118 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4119 // concatenate constant strings
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4120 char_u *s1 = tv1->vval.v_string;
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4121 char_u *s2 = tv2->vval.v_string;
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4122 size_t len1 = STRLEN(s1);
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4123
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4124 tv1->vval.v_string = alloc((int)(len1 + STRLEN(s2) + 1));
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4125 if (tv1->vval.v_string == NULL)
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4126 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4127 clear_ppconst(ppconst);
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4128 return FAIL;
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4129 }
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4130 mch_memmove(tv1->vval.v_string, s1, len1);
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4131 STRCPY(tv1->vval.v_string + len1, s2);
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4132 vim_free(s1);
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4133 vim_free(s2);
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4134 }
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4135 --ppconst->pp_used;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4136 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4137 else
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4138 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4139 generate_ppconst(cctx, ppconst);
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4140 if (*op == '.')
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4141 {
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4142 if (may_generate_2STRING(-2, cctx) == FAIL
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4143 \|\| may_generate_2STRING(-1, cctx) == FAIL)
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4144 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4145 generate_instr_drop(cctx, ISN_CONCAT, 1);
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4146 }
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4147 else
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4148 generate_two_op(cctx, op);
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4149 }
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4150 }
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4151
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4152 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4153 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4154
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4155 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4156 * expr5a == expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4157 * expr5a =~ expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4158 * expr5a != expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4159 * expr5a !~ expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4160 * expr5a > expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4161 * expr5a >= expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4162 * expr5a < expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4163 * expr5a <= expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4164 * expr5a is expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4165 * expr5a isnot expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4166 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4167 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4168 * EVAL expr5a Push result of "expr5a"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4169 * EVAL expr5b Push result of "expr5b"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4170 * COMPARE one of the compare instructions
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4171 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4172 static int
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4173 compile_expr4(char_u *arg, cctx_T cctx, ppconst_T *ppconst)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4174 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4175 exptype_T type = EXPR_UNKNOWN;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4176 char_u *p;
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4177 char_u *next;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4178 int len = 2;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4179 int type_is = FALSE;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4180 int ppconst_used = ppconst->pp_used;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4181
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4182 // get the first variable
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4183 if (compile_expr5(arg, cctx, ppconst) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4184 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4185
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4186 p = may_peek_next_line(cctx, *arg, &next);
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	4187 type = get_compare_type(p, &len, &type_is);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4188
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4189 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4190 * If there is a comparative operator, use it.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4191 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4192 if (type != EXPR_UNKNOWN)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4193 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4194 int ic = FALSE; // Default: do not ignore case
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4195
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4196 if (next != NULL)
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4197 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4198 *arg = next_line_from_context(cctx, TRUE);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4199 p = skipwhite(*arg);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4200 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4201 if (type_is && (p[len] == '?' \|\| p[len] == '#'))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4202 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4203 semsg(_(e_invexpr2), *arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4204 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4205 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4206 // extra question mark appended: ignore case
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4207 if (p[len] == '?')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4208 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4209 ic = TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4210 ++len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4211 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4212 // extra '#' appended: match case (ignored)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4213 else if (p[len] == '#')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4214 ++len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4215 // nothing appended: match case
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4216
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4217 if (!IS_WHITE_OR_NUL(**arg) \|\| !IS_WHITE_OR_NUL(p[len]))
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4218 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4219 char_u buf[7];
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4220
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4221 vim_strncpy(buf, p, len);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4222 semsg(_(e_white_both), buf);
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4223 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4224 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4225
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4226 // get the second variable
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4227 *arg = skipwhite(p + len);
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	4228 if (may_get_next_line(p + len, arg, cctx) == FAIL)
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4229 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4230
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4231 if (compile_expr5(arg, cctx, ppconst) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4232 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4233
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4234 if (ppconst->pp_used == ppconst_used + 2)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4235 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4236 typval_T * tv1 = &ppconst->pp_tv[ppconst->pp_used - 2];
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4237 typval_T *tv2 = &ppconst->pp_tv[ppconst->pp_used - 1];
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4238 int ret;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4239
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4240 // Both sides are a constant, compute the result now.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4241 // First check for a valid combination of types, this is more
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4242 // strict than typval_compare().
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4243 if (get_compare_isn(type, tv1->v_type, tv2->v_type) == ISN_DROP)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4244 ret = FAIL;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4245 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4246 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4247 ret = typval_compare(tv1, tv2, type, ic);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4248 tv1->v_type = VAR_BOOL;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4249 tv1->vval.v_number = tv1->vval.v_number
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4250 ? VVAL_TRUE : VVAL_FALSE;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4251 clear_tv(tv2);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4252 --ppconst->pp_used;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4253 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4254 return ret;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4255 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4256
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4257 generate_ppconst(cctx, ppconst);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4258 return generate_COMPARE(cctx, type, ic);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4259 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4260
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4261 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4262 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4263
20334 b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	4264 static int compile_expr3(char_u *arg, cctx_T cctx, ppconst_T *ppconst);
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	4265
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4266 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4267 * Compile \|\| or &&.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4268 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4269 static int
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4270 compile_and_or(
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4271 char_u **arg,
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4272 cctx_T *cctx,
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4273 char *op,
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4274 ppconst_T *ppconst,
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4275 int ppconst_used UNUSED)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4276 {
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4277 char_u *next;
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4278 char_u p = may_peek_next_line(cctx, arg, &next);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4279 int opchar = *op;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4280
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4281 if (p[0] == opchar && p[1] == opchar)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4282 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4283 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4284 garray_T end_ga;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4285
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4286 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4287 * Repeat until there is no following "\|\|" or "&&"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4288 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4289 ga_init2(&end_ga, sizeof(int), 10);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4290 while (p[0] == opchar && p[1] == opchar)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4291 {
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4292 if (next != NULL)
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4293 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4294 *arg = next_line_from_context(cctx, TRUE);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4295 p = skipwhite(*arg);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4296 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4297
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4298 if (!IS_WHITE_OR_NUL(**arg) \|\| !IS_WHITE_OR_NUL(p[2]))
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4299 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4300 semsg(_(e_white_both), op);
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4301 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4302 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4303
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4304 // TODO: use ppconst if the value is a constant
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4305 generate_ppconst(cctx, ppconst);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4306
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4307 if (ga_grow(&end_ga, 1) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4308 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4309 ga_clear(&end_ga);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4310 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4311 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4312 (((int )end_ga.ga_data) + end_ga.ga_len) = instr->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4313 ++end_ga.ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4314 generate_JUMP(cctx, opchar == '\|'
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4315 ? JUMP_AND_KEEP_IF_TRUE : JUMP_AND_KEEP_IF_FALSE, 0);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4316
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4317 // eval the next expression
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4318 *arg = skipwhite(p + 2);
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	4319 if (may_get_next_line(p + 2, arg, cctx) == FAIL)
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4320 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4321
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4322 if ((opchar == '\|' ? compile_expr3(arg, cctx, ppconst)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4323 : compile_expr4(arg, cctx, ppconst)) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4324 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4325 ga_clear(&end_ga);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4326 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4327 }
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4328
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4329 p = may_peek_next_line(cctx, *arg, &next);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4330 }
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4331 generate_ppconst(cctx, ppconst);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4332
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4333 // Fill in the end label in all jumps.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4334 while (end_ga.ga_len > 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4335 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4336 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4337
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4338 --end_ga.ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4339 isn = ((isn_T *)instr->ga_data)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4340 + (((int )end_ga.ga_data) + end_ga.ga_len);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4341 isn->isn_arg.jump.jump_where = instr->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4342 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4343 ga_clear(&end_ga);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4344 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4345
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4346 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4347 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4348
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4349 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4350 * expr4a && expr4a && expr4a logical AND
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4351 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4352 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4353 * EVAL expr4a Push result of "expr4a"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4354 * JUMP_AND_KEEP_IF_FALSE end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4355 * EVAL expr4b Push result of "expr4b"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4356 * JUMP_AND_KEEP_IF_FALSE end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4357 * EVAL expr4c Push result of "expr4c"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4358 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4359 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4360 static int
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4361 compile_expr3(char_u *arg, cctx_T cctx, ppconst_T *ppconst)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4362 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4363 int ppconst_used = ppconst->pp_used;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4364
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4365 // get the first variable
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4366 if (compile_expr4(arg, cctx, ppconst) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4367 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4368
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4369 // \|\| and && work almost the same
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4370 return compile_and_or(arg, cctx, "&&", ppconst, ppconst_used);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4371 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4372
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4373 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4374 * expr3a \|\| expr3b \|\| expr3c logical OR
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4375 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4376 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4377 * EVAL expr3a Push result of "expr3a"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4378 * JUMP_AND_KEEP_IF_TRUE end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4379 * EVAL expr3b Push result of "expr3b"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4380 * JUMP_AND_KEEP_IF_TRUE end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4381 * EVAL expr3c Push result of "expr3c"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4382 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4383 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4384 static int
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4385 compile_expr2(char_u *arg, cctx_T cctx, ppconst_T *ppconst)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4386 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4387 int ppconst_used = ppconst->pp_used;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4388
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4389 // eval the first expression
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4390 if (compile_expr3(arg, cctx, ppconst) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4391 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4392
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4393 // \|\| and && work almost the same
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4394 return compile_and_or(arg, cctx, "\|\|", ppconst, ppconst_used);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4395 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4396
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4397 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4398 * Toplevel expression: expr2 ? expr1a : expr1b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4399 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4400 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4401 * EVAL expr2 Push result of "expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4402 * JUMP_IF_FALSE alt jump if false
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4403 * EVAL expr1a
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4404 * JUMP_ALWAYS end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4405 * alt: EVAL expr1b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4406 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4407 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4408 static int
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4409 compile_expr1(char_u *arg, cctx_T cctx, ppconst_T *ppconst)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4410 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4411 char_u *p;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4412 int ppconst_used = ppconst->pp_used;
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4413 char_u *next;
20305 9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	4414
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	4415 // Evaluate the first expression.
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4416 if (compile_expr2(arg, cctx, ppconst) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4417 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4418
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4419 p = may_peek_next_line(cctx, *arg, &next);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4420 if (*p == '?')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4421 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4422 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4423 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4424 int alt_idx = instr->ga_len;
20966 0ee7de260208 patch 8.2.1034: compiler warning for uninitialized variables Bram Moolenaar <Bram@vim.org> parents: 20961 diff changeset	4425 int end_idx = 0;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4426 isn_T *isn;
20966 0ee7de260208 patch 8.2.1034: compiler warning for uninitialized variables Bram Moolenaar <Bram@vim.org> parents: 20961 diff changeset	4427 type_T *type1 = NULL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4428 type_T *type2;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4429 int has_const_expr = FALSE;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4430 int const_value = FALSE;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4431 int save_skip = cctx->ctx_skip;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4432
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4433 if (next != NULL)
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4434 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4435 *arg = next_line_from_context(cctx, TRUE);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4436 p = skipwhite(*arg);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4437 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4438
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4439 if (!IS_WHITE_OR_NUL(**arg) \|\| !IS_WHITE_OR_NUL(p[1]))
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4440 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4441 semsg(_(e_white_both), "?");
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4442 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4443 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4444
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4445 if (ppconst->pp_used == ppconst_used + 1)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4446 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4447 // the condition is a constant, we know whether the ? or the :
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4448 // expression is to be evaluated.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4449 has_const_expr = TRUE;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4450 const_value = tv2bool(&ppconst->pp_tv[ppconst_used]);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4451 clear_tv(&ppconst->pp_tv[ppconst_used]);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4452 --ppconst->pp_used;
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	4453 cctx->ctx_skip = save_skip == SKIP_YES \|\| !const_value
4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	4454 ? SKIP_YES : SKIP_NOT;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4455 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4456 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4457 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4458 generate_ppconst(cctx, ppconst);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4459 generate_JUMP(cctx, JUMP_IF_FALSE, 0);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4460 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4461
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4462 // evaluate the second expression; any type is accepted
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4463 *arg = skipwhite(p + 1);
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	4464 if (may_get_next_line(p + 1, arg, cctx) == FAIL)
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4465 return FAIL;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4466 if (compile_expr1(arg, cctx, ppconst) == FAIL)
19223 173b99509038 patch 8.2.0170: Coverity warning for ignoring return value Bram Moolenaar <Bram@vim.org> parents: 19213 diff changeset	4467 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4468
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4469 if (!has_const_expr)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4470 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4471 generate_ppconst(cctx, ppconst);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4472
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4473 // remember the type and drop it
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4474 --stack->ga_len;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4475 type1 = ((type_T **)stack->ga_data)[stack->ga_len];
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4476
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4477 end_idx = instr->ga_len;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4478 generate_JUMP(cctx, JUMP_ALWAYS, 0);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4479
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4480 // jump here from JUMP_IF_FALSE
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4481 isn = ((isn_T *)instr->ga_data) + alt_idx;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4482 isn->isn_arg.jump.jump_where = instr->ga_len;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4483 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4484
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4485 // Check for the ":".
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4486 p = may_peek_next_line(cctx, *arg, &next);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4487 if (*p != ':')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4488 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4489 emsg(_(e_missing_colon));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4490 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4491 }
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4492 if (next != NULL)
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4493 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4494 *arg = next_line_from_context(cctx, TRUE);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4495 p = skipwhite(*arg);
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4496 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4497
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4498 if (!IS_WHITE_OR_NUL(**arg) \|\| !IS_WHITE_OR_NUL(p[1]))
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4499 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4500 semsg(_(e_white_both), ":");
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4501 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4502 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4503
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4504 // evaluate the third expression
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4505 if (has_const_expr)
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	4506 cctx->ctx_skip = save_skip == SKIP_YES \|\| const_value
4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	4507 ? SKIP_YES : SKIP_NOT;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4508 *arg = skipwhite(p + 1);
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	4509 if (may_get_next_line(p + 1, arg, cctx) == FAIL)
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4510 return FAIL;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4511 if (compile_expr1(arg, cctx, ppconst) == FAIL)
19223 173b99509038 patch 8.2.0170: Coverity warning for ignoring return value Bram Moolenaar <Bram@vim.org> parents: 19213 diff changeset	4512 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4513
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4514 if (!has_const_expr)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4515 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4516 generate_ppconst(cctx, ppconst);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4517
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4518 // If the types differ, the result has a more generic type.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4519 type2 = ((type_T **)stack->ga_data)[stack->ga_len - 1];
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4520 common_type(type1, type2, &type2, cctx->ctx_type_list);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4521
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4522 // jump here from JUMP_ALWAYS
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4523 isn = ((isn_T *)instr->ga_data) + end_idx;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4524 isn->isn_arg.jump.jump_where = instr->ga_len;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4525 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4526
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4527 cctx->ctx_skip = save_skip;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4528 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4529 return OK;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4530 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4531
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4532 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4533 * Toplevel expression.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4534 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4535 static int
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4536 compile_expr0(char_u *arg, cctx_T cctx)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4537 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4538 ppconst_T ppconst;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4539
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4540 CLEAR_FIELD(ppconst);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4541 if (compile_expr1(arg, cctx, &ppconst) == FAIL)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4542 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4543 clear_ppconst(&ppconst);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4544 return FAIL;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4545 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4546 if (generate_ppconst(cctx, &ppconst) == FAIL)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4547 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4548 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4549 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4550
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4551 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4552 * compile "return [expr]"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4553 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4554 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4555 compile_return(char_u arg, int set_return_type, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4556 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4557 char_u *p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4558 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4559 type_T *stack_type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4560
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4561 if (p != NUL && p != '\|' && *p != '\n')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4562 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4563 // compile return argument into instructions
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4564 if (compile_expr0(&p, cctx) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4565 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4566
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4567 stack_type = ((type_T **)stack->ga_data)[stack->ga_len - 1];
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4568 if (set_return_type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4569 cctx->ctx_ufunc->uf_ret_type = stack_type;
21160 1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4570 else
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4571 {
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4572 if (cctx->ctx_ufunc->uf_ret_type->tt_type == VAR_VOID
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4573 && stack_type->tt_type != VAR_VOID
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4574 && stack_type->tt_type != VAR_UNKNOWN)
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4575 {
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4576 emsg(_("E1096: Returning a value in a function without a return type"));
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4577 return NULL;
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4578 }
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4579 if (need_type(stack_type, cctx->ctx_ufunc->uf_ret_type, -1, cctx)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4580 == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4581 return NULL;
21160 1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4582 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4583 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4584 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4585 {
19860 37c4779ca8f5 patch 8.2.0486: Vim9: some code and error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19858 diff changeset	4586 // "set_return_type" cannot be TRUE, only used for a lambda which
37c4779ca8f5 patch 8.2.0486: Vim9: some code and error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19858 diff changeset	4587 // always has an argument.
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	4588 if (cctx->ctx_ufunc->uf_ret_type->tt_type != VAR_VOID
1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	4589 && cctx->ctx_ufunc->uf_ret_type->tt_type != VAR_UNKNOWN)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4590 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4591 emsg(_("E1003: Missing return value"));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4592 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4593 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4594
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4595 // No argument, return zero.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4596 generate_PUSHNR(cctx, 0);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4597 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4598
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4599 if (generate_instr(cctx, ISN_RETURN) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4600 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4601
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4602 // "return val \| endif" is possible
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4603 return skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4604 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4605
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4606 /*
20279 49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4607 * Get a line from the compilation context, compatible with exarg_T getline().
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4608 * Return a pointer to the line in allocated memory.
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4609 * Return NULL for end-of-file or some error.
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4610 */
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4611 static char_u *
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4612 exarg_getline(
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4613 int c UNUSED,
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4614 void *cookie,
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4615 int indent UNUSED,
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4616 int do_concat UNUSED)
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4617 {
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4618 cctx_T cctx = (cctx_T )cookie;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4619
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4620 if (cctx->ctx_lnum == cctx->ctx_ufunc->uf_lines.ga_len)
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4621 {
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4622 iemsg("Heredoc got to end");
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4623 return NULL;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4624 }
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4625 ++cctx->ctx_lnum;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4626 return vim_strsave(((char_u **)cctx->ctx_ufunc->uf_lines.ga_data)
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4627 [cctx->ctx_lnum]);
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4628 }
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4629
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4630 /*
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4631 * Compile a nested :def command.
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4632 */
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4633 static char_u *
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4634 compile_nested_function(exarg_T eap, cctx_T cctx)
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4635 {
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4636 char_u *name_start = eap->arg;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4637 char_u *name_end = to_name_end(eap->arg, FALSE);
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4638 char_u *name = get_lambda_name();
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4639 lvar_T *lvar;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4640 ufunc_T *ufunc;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4641
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4642 eap->arg = name_end;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4643 eap->getline = exarg_getline;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4644 eap->cookie = cctx;
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	4645 eap->skip = cctx->ctx_skip == SKIP_YES;
20279 49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4646 eap->forceit = FALSE;
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	4647 ufunc = def_function(eap, name);
489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	4648
489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	4649 if (ufunc == NULL)
489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	4650 return NULL;
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	4651 if (ufunc->uf_def_status == UF_TO_BE_COMPILED
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	4652 && compile_def_function(ufunc, TRUE, cctx) == FAIL)
20279 49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4653 return NULL;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4654
20281 ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	4655 // Define a local variable for the function reference.
20279 49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4656 lvar = reserve_local(cctx, name_start, name_end - name_start,
20281 ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	4657 TRUE, ufunc->uf_func_type);
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	4658
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	4659 if (generate_FUNCREF(cctx, ufunc->uf_dfunc_idx) == FAIL
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	4660 \|\| generate_STORE(cctx, ISN_STORE, lvar->lv_idx, NULL) == FAIL)
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	4661 return NULL;
20279 49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4662
20305 9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	4663 // TODO: warning for trailing text?
20279 49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4664 return (char_u *)"";
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4665 }
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4666
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4667 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4668 * Return the length of an assignment operator, or zero if there isn't one.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4669 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4670 int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4671 assignment_len(char_u p, int heredoc)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4672 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4673 if (*p == '=')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4674 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4675 if (p[1] == '<' && p[2] == '<')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4676 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4677 *heredoc = TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4678 return 3;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4679 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4680 return 1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4681 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4682 if (vim_strchr((char_u )"+-/%", *p) != NULL && p[1] == '=')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4683 return 2;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4684 if (STRNCMP(p, "..=", 3) == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4685 return 3;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4686 return 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4687 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4688
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4689 // words that cannot be used as a variable
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4690 static char *reserved[] = {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4691 "true",
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4692 "false",
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4693 NULL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4694 };
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4695
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4696 typedef enum {
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4697 dest_local,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4698 dest_option,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4699 dest_env,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4700 dest_global,
20089 7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	4701 dest_buffer,
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	4702 dest_window,
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	4703 dest_tab,
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4704 dest_vimvar,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4705 dest_script,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4706 dest_reg,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4707 } assign_dest_T;
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4708
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4709 /*
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4710 * Generate the load instruction for "name".
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4711 */
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4712 static void
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4713 generate_loadvar(
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4714 cctx_T *cctx,
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4715 assign_dest_T dest,
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4716 char_u *name,
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4717 lvar_T *lvar,
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4718 type_T *type)
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4719 {
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4720 switch (dest)
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4721 {
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4722 case dest_option:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4723 // TODO: check the option exists
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4724 generate_LOAD(cctx, ISN_LOADOPT, 0, name, type);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4725 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4726 case dest_global:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4727 generate_LOAD(cctx, ISN_LOADG, 0, name + 2, type);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4728 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4729 case dest_buffer:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4730 generate_LOAD(cctx, ISN_LOADB, 0, name + 2, type);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4731 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4732 case dest_window:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4733 generate_LOAD(cctx, ISN_LOADW, 0, name + 2, type);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4734 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4735 case dest_tab:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4736 generate_LOAD(cctx, ISN_LOADT, 0, name + 2, type);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4737 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4738 case dest_script:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4739 compile_load_scriptvar(cctx,
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4740 name + (name[1] == ':' ? 2 : 0), NULL, NULL, TRUE);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4741 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4742 case dest_env:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4743 // Include $ in the name here
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4744 generate_LOAD(cctx, ISN_LOADENV, 0, name, type);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4745 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4746 case dest_reg:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4747 generate_LOAD(cctx, ISN_LOADREG, name[1], NULL, &t_string);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4748 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4749 case dest_vimvar:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4750 generate_LOADV(cctx, name + 2, TRUE);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4751 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4752 case dest_local:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4753 if (lvar->lv_from_outer)
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4754 generate_LOAD(cctx, ISN_LOADOUTER, lvar->lv_idx,
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4755 NULL, type);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4756 else
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4757 generate_LOAD(cctx, ISN_LOAD, lvar->lv_idx, NULL, type);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4758 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4759 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4760 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4761
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4762 void
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4763 vim9_declare_error(char_u *name)
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4764 {
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4765 char *scope = "";
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4766
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4767 switch (*name)
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4768 {
20961 0e01976dfd3b patch 8.2.1032: error message for declaring a variable cannot be translated Bram Moolenaar <Bram@vim.org> parents: 20955 diff changeset	4769 case 'g': scope = _("global"); break;
0e01976dfd3b patch 8.2.1032: error message for declaring a variable cannot be translated Bram Moolenaar <Bram@vim.org> parents: 20955 diff changeset	4770 case 'b': scope = _("buffer"); break;
0e01976dfd3b patch 8.2.1032: error message for declaring a variable cannot be translated Bram Moolenaar <Bram@vim.org> parents: 20955 diff changeset	4771 case 'w': scope = _("window"); break;
0e01976dfd3b patch 8.2.1032: error message for declaring a variable cannot be translated Bram Moolenaar <Bram@vim.org> parents: 20955 diff changeset	4772 case 't': scope = _("tab"); break;
0e01976dfd3b patch 8.2.1032: error message for declaring a variable cannot be translated Bram Moolenaar <Bram@vim.org> parents: 20955 diff changeset	4773 case 'v': scope = "v:"; break;
0e01976dfd3b patch 8.2.1032: error message for declaring a variable cannot be translated Bram Moolenaar <Bram@vim.org> parents: 20955 diff changeset	4774 case '$': semsg(_(e_declare_env_var), name); return;
0e01976dfd3b patch 8.2.1032: error message for declaring a variable cannot be translated Bram Moolenaar <Bram@vim.org> parents: 20955 diff changeset	4775 default: return;
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4776 }
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4777 semsg(_(e_declare_var), scope, name);
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4778 }
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4779
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4780 /*
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4781 * Compile declaration and assignment:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4782 * "let var", "let var = expr", "const var = expr" and "var = expr"
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4783 * "arg" points to "var".
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4784 * Return NULL for an error.
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4785 * Return "arg" if it does not look like a variable list.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4786 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4787 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4788 compile_assignment(char_u arg, exarg_T eap, cmdidx_T cmdidx, cctx_T *cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4789 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4790 char_u *var_start;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4791 char_u *p;
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4792 char_u *end = arg;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4793 char_u *ret = NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4794 int var_count = 0;
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4795 int var_idx;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4796 int semicolon = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4797 garray_T *instr = &cctx->ctx_instr;
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4798 garray_T *stack = &cctx->ctx_type_stack;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4799 char_u *op;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4800 int oplen = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4801 int heredoc = FALSE;
19872 8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	4802 type_T *type = &t_any;
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4803 type_T *member_type = &t_any;
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4804 char_u *name = NULL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4805 char_u *sp;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4806 int is_decl = cmdidx == CMD_let \|\| cmdidx == CMD_const;
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4807
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4808 // Skip over the "var" or "[var, var]" to get to any "=".
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4809 p = skip_var_list(arg, TRUE, &var_count, &semicolon, TRUE);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4810 if (p == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4811 return *arg == '[' ? arg : NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4812
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4813 if (var_count > 0 && is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4814 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4815 emsg(_("E1092: Cannot use a list for a declaration"));
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4816 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4817 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4818
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4819 sp = p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4820 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4821 op = p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4822 oplen = assignment_len(p, &heredoc);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4823
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4824 if (var_count > 0 && oplen == 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4825 // can be something like "[1, 2]->func()"
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4826 return arg;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4827
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4828 if (oplen > 0 && (!VIM_ISWHITE(*sp) \|\| !VIM_ISWHITE(op[oplen])))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4829 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4830 char_u buf[4];
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4831
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4832 vim_strncpy(buf, op, oplen);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4833 semsg(_(e_white_both), buf);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4834 return NULL;
20355 fc2d76e0994c patch 8.2.0733: Vim9: assigning to dict or list argument does not work Bram Moolenaar <Bram@vim.org> parents: 20349 diff changeset	4835 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4836
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4837 if (heredoc)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4838 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4839 list_T *l;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4840 listitem_T *li;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4841
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4842 // [let] varname =<< [trim] {end}
20279 49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4843 eap->getline = exarg_getline;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4844 eap->cookie = cctx;
20045 04ef2ccf2519 patch 8.2.0578: heredoc for interfaces does not support "trim" Bram Moolenaar <Bram@vim.org> parents: 20023 diff changeset	4845 l = heredoc_get(eap, op + 3, FALSE);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4846
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4847 // Push each line and the create the list.
19934 3ff714d765ba patch 8.2.0523: loops are repeated Bram Moolenaar <Bram@vim.org> parents: 19926 diff changeset	4848 FOR_ALL_LIST_ITEMS(l, li)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4849 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4850 generate_PUSHS(cctx, li->li_tv.vval.v_string);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4851 li->li_tv.vval.v_string = NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4852 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4853 generate_NEWLIST(cctx, l->lv_len);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4854 type = &t_list_string;
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4855 member_type = &t_list_string;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4856 list_free(l);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4857 p += STRLEN(p);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4858 end = p;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4859 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4860 else if (var_count > 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4861 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4862 // for "[var, var] = expr" evaluate the expression here, loop over the
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4863 // list of variables below.
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4864
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4865 p = skipwhite(op + oplen);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4866 if (compile_expr0(&p, cctx) == FAIL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4867 return NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4868 end = p;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4869
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	4870 if (cctx->ctx_skip != SKIP_YES)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4871 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4872 type_T *stacktype;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4873
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	4874 stacktype = stack->ga_len == 0 ? &t_void
b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	4875 : ((type_T **)stack->ga_data)[stack->ga_len - 1];
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4876 if (stacktype->tt_type == VAR_VOID)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4877 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4878 emsg(_(e_cannot_use_void));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4879 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4880 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4881 if (need_type(stacktype, &t_list_any, -1, cctx) == FAIL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4882 goto theend;
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	4883 generate_CHECKLEN(cctx, semicolon ? var_count - 1 : var_count,
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	4884 semicolon);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4885 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4886 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4887
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4888 /*
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4889 * Loop over variables in "[var, var] = expr".
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4890 * For "var = expr" and "let var: type" this is done only once.
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4891 */
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4892 if (var_count > 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4893 var_start = skipwhite(arg + 1); // skip over the "["
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4894 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4895 var_start = arg;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4896 for (var_idx = 0; var_idx == 0 \|\| var_idx < var_count; var_idx++)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4897 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4898 char_u *var_end = skip_var_one(var_start, FALSE);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4899 size_t varlen;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4900 int new_local = FALSE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4901 int opt_type;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4902 int opt_flags = 0;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4903 assign_dest_T dest = dest_local;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4904 int vimvaridx = -1;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4905 lvar_T *lvar = NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4906 lvar_T arg_lvar;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4907 int has_type = FALSE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4908 int has_index = FALSE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4909 int instr_count = -1;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4910
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4911 p = (var_start == '&' \|\| var_start == '$'
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4912 \|\| *var_start == '@') ? var_start + 1 : var_start;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4913 p = to_name_end(p, TRUE);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4914
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4915 // "a: type" is declaring variable "a" with a type, not "a:".
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4916 if (is_decl && var_end == var_start + 2 && var_end[-1] == ':')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4917 --var_end;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4918 if (is_decl && p == var_start + 2 && p[-1] == ':')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4919 --p;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4920
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4921 varlen = p - var_start;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4922 vim_free(name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4923 name = vim_strnsave(var_start, varlen);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4924 if (name == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4925 return NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4926 if (!heredoc)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4927 type = &t_any;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4928
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	4929 if (cctx->ctx_skip != SKIP_YES)
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4930 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4931 if (*var_start == '&')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4932 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4933 int cc;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4934 long numval;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4935
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4936 dest = dest_option;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4937 if (cmdidx == CMD_const)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4938 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4939 emsg(_(e_const_option));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4940 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4941 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4942 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4943 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4944 semsg(_("E1052: Cannot declare an option: %s"), var_start);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4945 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4946 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4947 p = var_start;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4948 p = find_option_end(&p, &opt_flags);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4949 if (p == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4950 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4951 // cannot happen?
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4952 emsg(_(e_letunexp));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4953 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4954 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4955 cc = *p;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4956 *p = NUL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4957 opt_type = get_option_value(var_start + 1, &numval,
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4958 NULL, opt_flags);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4959 *p = cc;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4960 if (opt_type == -3)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4961 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4962 semsg(_(e_unknown_option), var_start);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4963 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4964 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4965 if (opt_type == -2 \|\| opt_type == 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4966 type = &t_string;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4967 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4968 type = &t_number; // both number and boolean option
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4969 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4970 else if (*var_start == '$')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4971 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4972 dest = dest_env;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4973 type = &t_string;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4974 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4975 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4976 vim9_declare_error(name);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4977 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4978 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4979 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4980 else if (*var_start == '@')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4981 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4982 if (!valid_yank_reg(var_start[1], TRUE))
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4983 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4984 emsg_invreg(var_start[1]);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4985 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4986 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4987 dest = dest_reg;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4988 type = &t_string;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4989 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4990 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4991 semsg(_("E1066: Cannot declare a register: %s"), name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4992 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4993 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4994 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4995 else if (STRNCMP(var_start, "g:", 2) == 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4996 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4997 dest = dest_global;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4998 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4999 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	5000 vim9_declare_error(name);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5001 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5002 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5003 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5004 else if (STRNCMP(var_start, "b:", 2) == 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5005 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5006 dest = dest_buffer;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5007 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5008 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	5009 vim9_declare_error(name);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5010 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5011 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5012 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5013 else if (STRNCMP(var_start, "w:", 2) == 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5014 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5015 dest = dest_window;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5016 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5017 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	5018 vim9_declare_error(name);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5019 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5020 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5021 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5022 else if (STRNCMP(var_start, "t:", 2) == 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5023 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5024 dest = dest_tab;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5025 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5026 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	5027 vim9_declare_error(name);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5028 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5029 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5030 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5031 else if (STRNCMP(var_start, "v:", 2) == 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5032 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5033 typval_T *vtv;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5034 int di_flags;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5035
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5036 vimvaridx = find_vim_var(name + 2, &di_flags);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5037 if (vimvaridx < 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5038 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5039 semsg(_(e_var_notfound), var_start);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5040 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5041 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5042 // We use the current value of "sandbox" here, is that OK?
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5043 if (var_check_ro(di_flags, name, FALSE))
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5044 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5045 dest = dest_vimvar;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5046 vtv = get_vim_var_tv(vimvaridx);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5047 type = typval2type(vtv);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5048 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5049 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	5050 vim9_declare_error(name);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5051 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5052 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5053 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5054 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5055 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5056 int idx;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5057
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5058 for (idx = 0; reserved[idx] != NULL; ++idx)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5059 if (STRCMP(reserved[idx], name) == 0)
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	5060 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5061 semsg(_("E1034: Cannot use reserved name %s"), name);
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	5062 goto theend;
b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	5063 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5064
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5065 lvar = lookup_local(var_start, varlen, cctx);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5066 if (lvar == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5067 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5068 CLEAR_FIELD(arg_lvar);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5069 if (lookup_arg(var_start, varlen,
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5070 &arg_lvar.lv_idx, &arg_lvar.lv_type,
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5071 &arg_lvar.lv_from_outer, cctx) == OK)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5072 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5073 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5074 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5075 semsg(_(e_used_as_arg), name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5076 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5077 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5078 lvar = &arg_lvar;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5079 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5080 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5081 if (lvar != NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5082 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5083 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5084 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5085 semsg(_("E1017: Variable already declared: %s"), name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5086 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5087 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5088 else if (lvar->lv_const)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5089 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5090 semsg(_("E1018: Cannot assign to a constant: %s"),
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5091 name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5092 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5093 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5094 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5095 else if (STRNCMP(var_start, "s:", 2) == 0
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5096 \|\| lookup_script(var_start, varlen) == OK
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5097 \|\| find_imported(var_start, varlen, cctx) != NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5098 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5099 dest = dest_script;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5100 if (is_decl)
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	5101 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5102 semsg(_("E1054: Variable already declared in the script: %s"),
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5103 name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5104 goto theend;
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	5105 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5106 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5107 else if (name[1] == ':' && name[2] != NUL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5108 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5109 semsg(_("E1082: Cannot use a namespaced variable: %s"),
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5110 name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5111 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5112 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5113 else if (!is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5114 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5115 semsg(_("E1089: unknown variable: %s"), name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5116 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5117 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5118 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5119 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5120
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5121 // handle "a:name" as a name, not index "name" on "a"
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5122 if (varlen > 1 \|\| var_start[varlen] != ':')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5123 p = var_end;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5124
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5125 if (dest != dest_option)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5126 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5127 if (is_decl && *p == ':')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5128 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5129 // parse optional type: "let var: type = expr"
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5130 if (!VIM_ISWHITE(p[1]))
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5131 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5132 semsg(_(e_white_after), ":");
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5133 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5134 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5135 p = skipwhite(p + 1);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5136 type = parse_type(&p, cctx->ctx_type_list);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5137 has_type = TRUE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5138 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5139 else if (lvar != NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5140 type = lvar->lv_type;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5141 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5142
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5143 if (oplen == 3 && !heredoc && dest != dest_global
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5144 && type->tt_type != VAR_STRING
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5145 && type->tt_type != VAR_ANY)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5146 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5147 emsg(_("E1019: Can only concatenate to string"));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5148 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5149 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5150
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	5151 if (lvar == NULL && dest == dest_local && cctx->ctx_skip != SKIP_YES)
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5152 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5153 if (oplen > 1 && !heredoc)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5154 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5155 // +=, /=, etc. require an existing variable
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5156 semsg(_("E1020: cannot use an operator on a new variable: %s"),
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5157 name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5158 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5159 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5160
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5161 // new local variable
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5162 if (type->tt_type == VAR_FUNC && var_check_func_name(name, TRUE))
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5163 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5164 lvar = reserve_local(cctx, var_start, varlen,
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5165 cmdidx == CMD_const, type);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5166 if (lvar == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5167 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5168 new_local = TRUE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5169 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5170
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5171 member_type = type;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5172 if (var_end > var_start + varlen)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5173 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5174 // Something follows after the variable: "var[idx]".
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5175 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5176 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5177 emsg(_("E1087: cannot use an index when declaring a variable"));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5178 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5179 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5180
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5181 if (var_start[varlen] == '[')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5182 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5183 has_index = TRUE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5184 if (type->tt_member == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5185 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5186 semsg(_("E1088: cannot use an index on %s"), name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5187 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5188 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5189 member_type = type->tt_member;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5190 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5191 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5192 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5193 semsg("Not supported yet: %s", var_start);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5194 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5195 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5196 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5197 else if (lvar == &arg_lvar)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5198 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5199 semsg(_("E1090: Cannot assign to argument %s"), name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5200 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5201 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5202
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5203 if (!heredoc)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5204 {
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	5205 if (cctx->ctx_skip == SKIP_YES)
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5206 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5207 if (oplen > 0 && var_count == 0)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5208 {
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5209 // skip over the "=" and the expression
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5210 p = skipwhite(op + oplen);
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5211 compile_expr0(&p, cctx);
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5212 }
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5213 }
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5214 else if (oplen > 0)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5215 {
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5216 type_T *stacktype;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5217
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5218 // For "var = expr" evaluate the expression.
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5219 if (var_count == 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5220 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5221 int r;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5222
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5223 // for "+=", "*=", "..=" etc. first load the current value
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5224 if (*op != '=')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5225 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5226 generate_loadvar(cctx, dest, name, lvar, type);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5227
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5228 if (has_index)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5229 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5230 // TODO: get member from list or dict
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5231 emsg("Index with operation not supported yet");
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5232 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5233 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5234 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5235
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5236 // Compile the expression. Temporarily hide the new local
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5237 // variable here, it is not available to this expression.
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5238 if (new_local)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5239 --cctx->ctx_locals.ga_len;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5240 instr_count = instr->ga_len;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5241 p = skipwhite(op + oplen);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5242 r = compile_expr0(&p, cctx);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5243 if (new_local)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5244 ++cctx->ctx_locals.ga_len;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5245 if (r == FAIL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5246 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5247 }
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5248 else if (semicolon && var_idx == var_count - 1)
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5249 {
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5250 // For "[var; var] = expr" get the rest of the list
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5251 if (generate_SLICE(cctx, var_count - 1) == FAIL)
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5252 goto theend;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5253 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5254 else
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5255 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5256 // For "[var, var] = expr" get the "var_idx" item from the
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5257 // list.
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5258 if (generate_GETITEM(cctx, var_idx) == FAIL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5259 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5260 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5261
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5262 stacktype = stack->ga_len == 0 ? &t_void
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5263 : ((type_T **)stack->ga_data)[stack->ga_len - 1];
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5264 if (lvar != NULL && (is_decl \|\| !has_type))
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5265 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5266 if (new_local && !has_type)
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5267 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5268 if (stacktype->tt_type == VAR_VOID)
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5269 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5270 emsg(_(e_cannot_use_void));
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5271 goto theend;
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5272 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5273 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5274 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5275 // An empty list or dict has a &t_void member,
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5276 // for a variable that implies &t_any.
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5277 if (stacktype == &t_list_empty)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5278 lvar->lv_type = &t_list_any;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5279 else if (stacktype == &t_dict_empty)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5280 lvar->lv_type = &t_dict_any;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5281 else
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5282 lvar->lv_type = stacktype;
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5283 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5284 }
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5285 else
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5286 {
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5287 type_T *use_type = lvar->lv_type;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5288
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5289 if (has_index)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5290 {
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5291 use_type = use_type->tt_member;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5292 if (use_type == NULL)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5293 use_type = &t_void;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5294 }
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5295 if (need_type(stacktype, use_type, -1, cctx)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5296 == FAIL)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5297 goto theend;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5298 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5299 }
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5300 else if (*p != '=' && need_type(stacktype, member_type, -1,
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5301 cctx) == FAIL)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5302 goto theend;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5303 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5304 else if (cmdidx == CMD_const)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5305 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5306 emsg(_(e_const_req_value));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5307 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5308 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5309 else if (!has_type \|\| dest == dest_option)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5310 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5311 emsg(_(e_type_req));
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	5312 goto theend;
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5313 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5314 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5315 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5316 // variables are always initialized
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5317 if (ga_grow(instr, 1) == FAIL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5318 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5319 switch (member_type->tt_type)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5320 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5321 case VAR_BOOL:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5322 generate_PUSHBOOL(cctx, VVAL_FALSE);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5323 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5324 case VAR_FLOAT:
19336 1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	5325 #ifdef FEAT_FLOAT
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5326 generate_PUSHF(cctx, 0.0);
19336 1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	5327 #endif
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5328 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5329 case VAR_STRING:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5330 generate_PUSHS(cctx, NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5331 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5332 case VAR_BLOB:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5333 generate_PUSHBLOB(cctx, NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5334 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5335 case VAR_FUNC:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5336 generate_PUSHFUNC(cctx, NULL, &t_func_void);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5337 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5338 case VAR_LIST:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5339 generate_NEWLIST(cctx, 0);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5340 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5341 case VAR_DICT:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5342 generate_NEWDICT(cctx, 0);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5343 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5344 case VAR_JOB:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5345 generate_PUSHJOB(cctx, NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5346 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5347 case VAR_CHANNEL:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5348 generate_PUSHCHANNEL(cctx, NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5349 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5350 case VAR_NUMBER:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5351 case VAR_UNKNOWN:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5352 case VAR_ANY:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5353 case VAR_PARTIAL:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5354 case VAR_VOID:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5355 case VAR_SPECIAL: // cannot happen
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5356 generate_PUSHNR(cctx, 0);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5357 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5358 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5359 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5360 if (var_count == 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5361 end = p;
19336 1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	5362 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5363
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5364 // no need to parse more when skipping
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	5365 if (cctx->ctx_skip == SKIP_YES)
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5366 break;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5367
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5368 if (oplen > 0 && *op != '=')
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5369 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5370 type_T *expected = &t_number;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5371 type_T *stacktype;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5372
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5373 // TODO: if type is known use float or any operation
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5374
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5375 if (*op == '.')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5376 expected = &t_string;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5377 stacktype = ((type_T **)stack->ga_data)[stack->ga_len - 1];
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5378 if (need_type(stacktype, expected, -1, cctx) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5379 goto theend;
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5380
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5381 if (*op == '.')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5382 generate_instr_drop(cctx, ISN_CONCAT, 1);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5383 else
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5384 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5385 isn_T *isn = generate_instr_drop(cctx, ISN_OPNR, 1);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5386
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5387 if (isn == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5388 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5389 switch (*op)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5390 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5391 case '+': isn->isn_arg.op.op_type = EXPR_ADD; break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5392 case '-': isn->isn_arg.op.op_type = EXPR_SUB; break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5393 case '*': isn->isn_arg.op.op_type = EXPR_MULT; break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5394 case '/': isn->isn_arg.op.op_type = EXPR_DIV; break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5395 case '%': isn->isn_arg.op.op_type = EXPR_REM; break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5396 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5397 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5398 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5399
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5400 if (has_index)
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5401 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5402 int r;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5403
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5404 // Compile the "idx" in "var[idx]".
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5405 if (new_local)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5406 --cctx->ctx_locals.ga_len;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5407 p = skipwhite(var_start + varlen + 1);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5408 r = compile_expr0(&p, cctx);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5409 if (new_local)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5410 ++cctx->ctx_locals.ga_len;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5411 if (r == FAIL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5412 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5413 if (*skipwhite(p) != ']')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5414 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5415 emsg(_(e_missbrac));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5416 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5417 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5418 if (type->tt_type == VAR_DICT
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5419 && may_generate_2STRING(-1, cctx) == FAIL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5420 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5421 if (type->tt_type == VAR_LIST
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5422 && ((type_T **)stack->ga_data)[stack->ga_len - 1]->tt_type
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5423 != VAR_NUMBER)
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5424 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5425 emsg(_(e_number_exp));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5426 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5427 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5428
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5429 // Load the dict or list. On the stack we then have:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5430 // - value
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5431 // - index
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5432 // - variable
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5433 generate_loadvar(cctx, dest, name, lvar, type);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5434
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5435 if (type->tt_type == VAR_LIST)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5436 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5437 if (generate_instr_drop(cctx, ISN_STORELIST, 3) == FAIL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5438 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5439 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5440 else if (type->tt_type == VAR_DICT)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5441 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5442 if (generate_instr_drop(cctx, ISN_STOREDICT, 3) == FAIL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5443 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5444 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5445 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5446 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5447 emsg(_(e_listreq));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5448 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5449 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5450 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5451 else
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5452 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5453 switch (dest)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5454 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5455 case dest_option:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5456 generate_STOREOPT(cctx, name + 1, opt_flags);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5457 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5458 case dest_global:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5459 // include g: with the name, easier to execute that way
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5460 generate_STORE(cctx, ISN_STOREG, 0, name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5461 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5462 case dest_buffer:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5463 // include b: with the name, easier to execute that way
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5464 generate_STORE(cctx, ISN_STOREB, 0, name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5465 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5466 case dest_window:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5467 // include w: with the name, easier to execute that way
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5468 generate_STORE(cctx, ISN_STOREW, 0, name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5469 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5470 case dest_tab:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5471 // include t: with the name, easier to execute that way
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5472 generate_STORE(cctx, ISN_STORET, 0, name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5473 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5474 case dest_env:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5475 generate_STORE(cctx, ISN_STOREENV, 0, name + 1);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5476 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5477 case dest_reg:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5478 generate_STORE(cctx, ISN_STOREREG, name[1], NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5479 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5480 case dest_vimvar:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5481 generate_STORE(cctx, ISN_STOREV, vimvaridx, NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5482 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5483 case dest_script:
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	5484 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5485 char_u *rawname = name + (name[1] == ':' ? 2 : 0);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5486 imported_T *import = NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5487 int sid = current_sctx.sc_sid;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5488 int idx;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5489
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5490 if (name[1] != ':')
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5491 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5492 import = find_imported(name, 0, cctx);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5493 if (import != NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5494 sid = import->imp_sid;
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5495 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5496
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5497 idx = get_script_item_idx(sid, rawname, TRUE);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5498 // TODO: specific type
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5499 if (idx < 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5500 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5501 char_u *name_s = name;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5502
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5503 // Include s: in the name for store_var()
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5504 if (name[1] != ':')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5505 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5506 int len = (int)STRLEN(name) + 3;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5507
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5508 name_s = alloc(len);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5509 if (name_s == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5510 name_s = name;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5511 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5512 vim_snprintf((char *)name_s, len,
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5513 "s:%s", name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5514 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5515 generate_OLDSCRIPT(cctx, ISN_STORES, name_s, sid,
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5516 &t_any);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5517 if (name_s != name)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5518 vim_free(name_s);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5519 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5520 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5521 generate_VIM9SCRIPT(cctx, ISN_STORESCRIPT,
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	5522 sid, idx, &t_any);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5523 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5524 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5525 case dest_local:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5526 if (lvar != NULL)
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5527 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5528 isn_T isn = ((isn_T )instr->ga_data)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5529 + instr->ga_len - 1;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5530
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5531 // optimization: turn "var = 123" from ISN_PUSHNR +
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5532 // ISN_STORE into ISN_STORENR
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5533 if (!lvar->lv_from_outer
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5534 && instr->ga_len == instr_count + 1
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5535 && isn->isn_type == ISN_PUSHNR)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5536 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5537 varnumber_T val = isn->isn_arg.number;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5538
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5539 isn->isn_type = ISN_STORENR;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5540 isn->isn_arg.storenr.stnr_idx = lvar->lv_idx;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5541 isn->isn_arg.storenr.stnr_val = val;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5542 if (stack->ga_len > 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5543 --stack->ga_len;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5544 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5545 else if (lvar->lv_from_outer)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5546 generate_STORE(cctx, ISN_STOREOUTER, lvar->lv_idx,
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5547 NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5548 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5549 generate_STORE(cctx, ISN_STORE, lvar->lv_idx, NULL);
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5550 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5551 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5552 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5553 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5554
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5555 if (var_idx + 1 < var_count)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5556 var_start = skipwhite(var_end + 1);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5557 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5558
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5559 // for "[var, var] = expr" drop the "expr" value
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5560 if (var_count > 0 && !semicolon)
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5561 {
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5562 if (generate_instr_drop(cctx, ISN_DROP, 1) == NULL)
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5563 goto theend;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5564 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5565
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5566 ret = end;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5567
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5568 theend:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5569 vim_free(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5570 return ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5571 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5572
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5573 /*
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5574 * Check if "name" can be "unlet".
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5575 */
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5576 int
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5577 check_vim9_unlet(char_u *name)
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5578 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5579 if (name[1] != ':' \|\| vim_strchr((char_u )"gwtb", name) == NULL)
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5580 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5581 semsg(_("E1081: Cannot unlet %s"), name);
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5582 return FAIL;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5583 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5584 return OK;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5585 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5586
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5587 /*
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5588 * Callback passed to ex_unletlock().
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5589 */
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5590 static int
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5591 compile_unlet(
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5592 lval_T *lvp,
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5593 char_u *name_end,
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5594 exarg_T *eap,
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5595 int deep UNUSED,
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5596 void *coookie)
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5597 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5598 cctx_T *cctx = coookie;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5599
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5600 if (lvp->ll_tv == NULL)
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5601 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5602 char_u *p = lvp->ll_name;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5603 int cc = *name_end;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5604 int ret = OK;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5605
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5606 // Normal name. Only supports g:, w:, t: and b: namespaces.
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5607 *name_end = NUL;
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	5608 if (*p == '$')
058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	5609 ret = generate_UNLET(cctx, ISN_UNLETENV, p + 1, eap->forceit);
058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	5610 else if (check_vim9_unlet(p) == FAIL)
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5611 ret = FAIL;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5612 else
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	5613 ret = generate_UNLET(cctx, ISN_UNLET, p, eap->forceit);
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5614
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5615 *name_end = cc;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5616 return ret;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5617 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5618
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5619 // TODO: unlet {list}[idx]
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5620 // TODO: unlet {dict}[key]
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5621 emsg("Sorry, :unlet not fully implemented yet");
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5622 return FAIL;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5623 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5624
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5625 /*
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5626 * compile "unlet var", "lock var" and "unlock var"
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5627 * "arg" points to "var".
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5628 */
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5629 static char_u *
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5630 compile_unletlock(char_u arg, exarg_T eap, cctx_T *cctx)
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5631 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5632 char_u *p = arg;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5633
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5634 if (eap->cmdidx != CMD_unlet)
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5635 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5636 emsg("Sorry, :lock and unlock not implemented yet");
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5637 return NULL;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5638 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5639
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5640 if (*p == '!')
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5641 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5642 p = skipwhite(p + 1);
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5643 eap->forceit = TRUE;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5644 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5645
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5646 ex_unletlock(eap, p, 0, GLV_NO_AUTOLOAD, compile_unlet, cctx);
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5647 return eap->nextcmd == NULL ? (char_u *)"" : eap->nextcmd;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5648 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5649
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5650 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5651 * Compile an :import command.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5652 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5653 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5654 compile_import(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5655 {
21146 465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	5656 return handle_import(arg, &cctx->ctx_imports, 0, NULL, cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5657 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5658
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5659 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5660 * generate a jump to the ":endif"/":endfor"/":endwhile"/":finally"/":endtry".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5661 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5662 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5663 compile_jump_to_end(endlabel_T *el, jumpwhen_T when, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5664 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5665 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5666 endlabel_T *endlabel = ALLOC_CLEAR_ONE(endlabel_T);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5667
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5668 if (endlabel == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5669 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5670 endlabel->el_next = *el;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5671 *el = endlabel;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5672 endlabel->el_end_label = instr->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5673
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5674 generate_JUMP(cctx, when, 0);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5675 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5676 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5677
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5678 static void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5679 compile_fill_jump_to_end(endlabel_T *el, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5680 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5681 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5682
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5683 while (*el != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5684 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5685 endlabel_T cur = (el);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5686 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5687
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5688 isn = ((isn_T *)instr->ga_data) + cur->el_end_label;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5689 isn->isn_arg.jump.jump_where = instr->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5690 *el = cur->el_next;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5691 vim_free(cur);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5692 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5693 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5694
19896 92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5695 static void
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5696 compile_free_jump_to_end(endlabel_T **el)
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5697 {
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5698 while (*el != NULL)
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5699 {
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5700 endlabel_T cur = (el);
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5701
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5702 *el = cur->el_next;
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5703 vim_free(cur);
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5704 }
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5705 }
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5706
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5707 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5708 * Create a new scope and set up the generic items.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5709 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5710 static scope_T *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5711 new_scope(cctx_T *cctx, scopetype_T type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5712 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5713 scope_T *scope = ALLOC_CLEAR_ONE(scope_T);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5714
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5715 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5716 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5717 scope->se_outer = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5718 cctx->ctx_scope = scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5719 scope->se_type = type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5720 scope->se_local_count = cctx->ctx_locals.ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5721 return scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5722 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5723
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5724 /*
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5725 * Free the current scope and go back to the outer scope.
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5726 */
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5727 static void
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5728 drop_scope(cctx_T *cctx)
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5729 {
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5730 scope_T *scope = cctx->ctx_scope;
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5731
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5732 if (scope == NULL)
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5733 {
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5734 iemsg("calling drop_scope() without a scope");
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5735 return;
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5736 }
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5737 cctx->ctx_scope = scope->se_outer;
19896 92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5738 switch (scope->se_type)
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5739 {
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5740 case IF_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5741 compile_free_jump_to_end(&scope->se_u.se_if.is_end_label); break;
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5742 case FOR_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5743 compile_free_jump_to_end(&scope->se_u.se_for.fs_end_label); break;
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5744 case WHILE_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5745 compile_free_jump_to_end(&scope->se_u.se_while.ws_end_label); break;
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5746 case TRY_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5747 compile_free_jump_to_end(&scope->se_u.se_try.ts_end_label); break;
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5748 case NO_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5749 case BLOCK_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5750 break;
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5751 }
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5752 vim_free(scope);
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5753 }
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5754
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5755 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5756 * compile "if expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5757 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5758 * "if expr" Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5759 * EVAL expr Push result of "expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5760 * JUMP_IF_FALSE end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5761 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5762 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5763 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5764 * "if expr \| else" Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5765 * EVAL expr Push result of "expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5766 * JUMP_IF_FALSE else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5767 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5768 * JUMP_ALWAYS end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5769 * else:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5770 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5771 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5772 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5773 * "if expr1 \| elseif expr2 \| else" Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5774 * EVAL expr Push result of "expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5775 * JUMP_IF_FALSE elseif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5776 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5777 * JUMP_ALWAYS end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5778 * elseif:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5779 * EVAL expr Push result of "expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5780 * JUMP_IF_FALSE else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5781 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5782 * JUMP_ALWAYS end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5783 * else:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5784 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5785 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5786 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5787 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5788 compile_if(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5789 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5790 char_u *p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5791 garray_T *instr = &cctx->ctx_instr;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5792 int instr_count = instr->ga_len;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5793 scope_T *scope;
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5794 skip_T skip_save = cctx->ctx_skip;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5795 ppconst_T ppconst;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5796
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5797 CLEAR_FIELD(ppconst);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5798 if (compile_expr1(&p, cctx, &ppconst) == FAIL)
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5799 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5800 clear_ppconst(&ppconst);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5801 return NULL;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5802 }
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5803 if (cctx->ctx_skip == SKIP_YES)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5804 clear_ppconst(&ppconst);
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5805 else if (instr->ga_len == instr_count && ppconst.pp_used == 1)
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5806 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5807 // The expression results in a constant.
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	5808 cctx->ctx_skip = tv2bool(&ppconst.pp_tv[0]) ? SKIP_NOT : SKIP_YES;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5809 clear_ppconst(&ppconst);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5810 }
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5811 else
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5812 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5813 // Not a constant, generate instructions for the expression.
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5814 cctx->ctx_skip = SKIP_UNKNOWN;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5815 if (generate_ppconst(cctx, &ppconst) == FAIL)
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5816 return NULL;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5817 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5818
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5819 scope = new_scope(cctx, IF_SCOPE);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5820 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5821 return NULL;
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5822 scope->se_skip_save = skip_save;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5823 // "is_had_return" will be reset if any block does not end in :return
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5824 scope->se_u.se_if.is_had_return = TRUE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5825
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5826 if (cctx->ctx_skip == SKIP_UNKNOWN)
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5827 {
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5828 // "where" is set when ":elseif", "else" or ":endif" is found
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5829 scope->se_u.se_if.is_if_label = instr->ga_len;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5830 generate_JUMP(cctx, JUMP_IF_FALSE, 0);
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5831 }
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5832 else
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5833 scope->se_u.se_if.is_if_label = -1;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5834
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5835 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5836 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5837
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5838 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5839 compile_elseif(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5840 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5841 char_u *p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5842 garray_T *instr = &cctx->ctx_instr;
20334 b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5843 int instr_count = instr->ga_len;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5844 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5845 scope_T *scope = cctx->ctx_scope;
20334 b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5846 ppconst_T ppconst;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5847
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5848 if (scope == NULL \|\| scope->se_type != IF_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5849 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5850 emsg(_(e_elseif_without_if));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5851 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5852 }
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	5853 unwind_locals(cctx, scope->se_local_count);
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5854 if (!cctx->ctx_had_return)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5855 scope->se_u.se_if.is_had_return = FALSE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5856
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5857 if (cctx->ctx_skip == SKIP_UNKNOWN)
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5858 {
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5859 if (compile_jump_to_end(&scope->se_u.se_if.is_end_label,
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5860 JUMP_ALWAYS, cctx) == FAIL)
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5861 return NULL;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5862 // previous "if" or "elseif" jumps here
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5863 isn = ((isn_T *)instr->ga_data) + scope->se_u.se_if.is_if_label;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5864 isn->isn_arg.jump.jump_where = instr->ga_len;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5865 }
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5866
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5867 // compile "expr"; if we know it evaluates to FALSE skip the block
20334 b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5868 CLEAR_FIELD(ppconst);
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5869 if (compile_expr1(&p, cctx, &ppconst) == FAIL)
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5870 {
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5871 clear_ppconst(&ppconst);
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5872 return NULL;
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5873 }
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5874 if (scope->se_skip_save == SKIP_YES)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5875 clear_ppconst(&ppconst);
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5876 else if (instr->ga_len == instr_count && ppconst.pp_used == 1)
20334 b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5877 {
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5878 // The expression results in a constant.
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5879 // TODO: how about nesting?
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	5880 cctx->ctx_skip = tv2bool(&ppconst.pp_tv[0]) ? SKIP_NOT : SKIP_YES;
20334 b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5881 clear_ppconst(&ppconst);
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5882 scope->se_u.se_if.is_if_label = -1;
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5883 }
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5884 else
20334 b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5885 {
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5886 // Not a constant, generate instructions for the expression.
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5887 cctx->ctx_skip = SKIP_UNKNOWN;
20334 b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5888 if (generate_ppconst(cctx, &ppconst) == FAIL)
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5889 return NULL;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5890
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5891 // "where" is set when ":elseif", "else" or ":endif" is found
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5892 scope->se_u.se_if.is_if_label = instr->ga_len;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5893 generate_JUMP(cctx, JUMP_IF_FALSE, 0);
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5894 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5895
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5896 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5897 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5898
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5899 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5900 compile_else(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5901 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5902 char_u *p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5903 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5904 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5905 scope_T *scope = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5906
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5907 if (scope == NULL \|\| scope->se_type != IF_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5908 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5909 emsg(_(e_else_without_if));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5910 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5911 }
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	5912 unwind_locals(cctx, scope->se_local_count);
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5913 if (!cctx->ctx_had_return)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5914 scope->se_u.se_if.is_had_return = FALSE;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5915 scope->se_u.se_if.is_seen_else = TRUE;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5916
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5917 if (scope->se_skip_save != SKIP_YES)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5918 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5919 // jump from previous block to the end, unless the else block is empty
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5920 if (cctx->ctx_skip == SKIP_UNKNOWN)
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5921 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5922 if (!cctx->ctx_had_return
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5923 && compile_jump_to_end(&scope->se_u.se_if.is_end_label,
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5924 JUMP_ALWAYS, cctx) == FAIL)
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5925 return NULL;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5926 }
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5927
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5928 if (cctx->ctx_skip == SKIP_UNKNOWN)
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5929 {
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5930 if (scope->se_u.se_if.is_if_label >= 0)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5931 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5932 // previous "if" or "elseif" jumps here
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5933 isn = ((isn_T *)instr->ga_data) + scope->se_u.se_if.is_if_label;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5934 isn->isn_arg.jump.jump_where = instr->ga_len;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5935 scope->se_u.se_if.is_if_label = -1;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5936 }
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5937 }
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5938
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5939 if (cctx->ctx_skip != SKIP_UNKNOWN)
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5940 cctx->ctx_skip = cctx->ctx_skip == SKIP_YES ? SKIP_NOT : SKIP_YES;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5941 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5942
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5943 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5944 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5945
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5946 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5947 compile_endif(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5948 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5949 scope_T *scope = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5950 ifscope_T *ifscope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5951 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5952 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5953
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5954 if (scope == NULL \|\| scope->se_type != IF_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5955 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5956 emsg(_(e_endif_without_if));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5957 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5958 }
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	5959 ifscope = &scope->se_u.se_if;
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	5960 unwind_locals(cctx, scope->se_local_count);
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5961 if (!cctx->ctx_had_return)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5962 ifscope->is_had_return = FALSE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5963
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5964 if (scope->se_u.se_if.is_if_label >= 0)
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5965 {
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5966 // previous "if" or "elseif" jumps here
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5967 isn = ((isn_T *)instr->ga_data) + scope->se_u.se_if.is_if_label;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5968 isn->isn_arg.jump.jump_where = instr->ga_len;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5969 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5970 // Fill in the "end" label in jumps at the end of the blocks.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5971 compile_fill_jump_to_end(&ifscope->is_end_label, cctx);
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5972 cctx->ctx_skip = scope->se_skip_save;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5973
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5974 // If all the blocks end in :return and there is an :else then the
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5975 // had_return flag is set.
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5976 cctx->ctx_had_return = ifscope->is_had_return && ifscope->is_seen_else;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5977
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5978 drop_scope(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5979 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5980 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5981
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5982 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5983 * compile "for var in expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5984 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5985 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5986 * PUSHNR -1
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5987 * STORE loop-idx Set index to -1
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5988 * EVAL expr Push result of "expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5989 * top: FOR loop-idx, end Increment index, use list on bottom of stack
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5990 * - if beyond end, jump to "end"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5991 * - otherwise get item from list and push it
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5992 * STORE var Store item in "var"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5993 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5994 * JUMP top Jump back to repeat
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5995 * end: DROP Drop the result of "expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5996 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5997 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5998 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5999 compile_for(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6000 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6001 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6002 size_t varlen;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6003 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6004 garray_T *stack = &cctx->ctx_type_stack;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6005 scope_T *scope;
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6006 lvar_T *loop_lvar; // loop iteration variable
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6007 lvar_T *var_lvar; // variable for "var"
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6008 type_T *vartype;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6009
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6010 // TODO: list of variables: "for [key, value] in dict"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6011 // parse "var"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6012 for (p = arg; eval_isnamec1(*p); ++p)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6013 ;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6014 varlen = p - arg;
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6015 var_lvar = lookup_local(arg, varlen, cctx);
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6016 if (var_lvar != NULL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6017 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6018 semsg(_("E1023: variable already defined: %s"), arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6019 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6020 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6021
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6022 // consume "in"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6023 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6024 if (STRNCMP(p, "in", 2) != 0 \|\| !VIM_ISWHITE(p[2]))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6025 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6026 emsg(_(e_missing_in));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6027 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6028 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6029 p = skipwhite(p + 2);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6030
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6031
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6032 scope = new_scope(cctx, FOR_SCOPE);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6033 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6034 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6035
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6036 // Reserve a variable to store the loop iteration counter.
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6037 loop_lvar = reserve_local(cctx, (char_u *)"", 0, FALSE, &t_number);
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6038 if (loop_lvar == NULL)
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6039 {
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6040 // out of memory
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6041 drop_scope(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6042 return NULL;
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6043 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6044
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6045 // Reserve a variable to store "var"
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6046 var_lvar = reserve_local(cctx, arg, varlen, FALSE, &t_any);
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6047 if (var_lvar == NULL)
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6048 {
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6049 // out of memory or used as an argument
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6050 drop_scope(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6051 return NULL;
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6052 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6053
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6054 generate_STORENR(cctx, loop_lvar->lv_idx, -1);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6055
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6056 // compile "expr", it remains on the stack until "endfor"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6057 arg = p;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	6058 if (compile_expr0(&arg, cctx) == FAIL)
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6059 {
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6060 drop_scope(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6061 return NULL;
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6062 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6063
21188 d73b6ba20053 patch 8.2.1145: Vim9: "for" only accepts a list at compile time Bram Moolenaar <Bram@vim.org> parents: 21172 diff changeset	6064 // Now that we know the type of "var", check that it is a list, now or at
d73b6ba20053 patch 8.2.1145: Vim9: "for" only accepts a list at compile time Bram Moolenaar <Bram@vim.org> parents: 21172 diff changeset	6065 // runtime.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6066 vartype = ((type_T **)stack->ga_data)[stack->ga_len - 1];
21188 d73b6ba20053 patch 8.2.1145: Vim9: "for" only accepts a list at compile time Bram Moolenaar <Bram@vim.org> parents: 21172 diff changeset	6067 if (need_type(vartype, &t_list_any, -1, cctx) == FAIL)
d73b6ba20053 patch 8.2.1145: Vim9: "for" only accepts a list at compile time Bram Moolenaar <Bram@vim.org> parents: 21172 diff changeset	6068 {
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6069 drop_scope(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6070 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6071 }
21188 d73b6ba20053 patch 8.2.1145: Vim9: "for" only accepts a list at compile time Bram Moolenaar <Bram@vim.org> parents: 21172 diff changeset	6072 if (vartype->tt_type == VAR_LIST && vartype->tt_member->tt_type != VAR_ANY)
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6073 var_lvar->lv_type = vartype->tt_member;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6074
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6075 // "for_end" is set when ":endfor" is found
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6076 scope->se_u.se_for.fs_top_label = instr->ga_len;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6077
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6078 generate_FOR(cctx, loop_lvar->lv_idx);
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6079 generate_STORE(cctx, ISN_STORE, var_lvar->lv_idx, NULL);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6080
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6081 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6082 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6083
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6084 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6085 * compile "endfor"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6086 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6087 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6088 compile_endfor(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6089 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6090 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6091 scope_T *scope = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6092 forscope_T *forscope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6093 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6094
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6095 if (scope == NULL \|\| scope->se_type != FOR_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6096 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6097 emsg(_(e_for));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6098 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6099 }
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6100 forscope = &scope->se_u.se_for;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6101 cctx->ctx_scope = scope->se_outer;
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	6102 unwind_locals(cctx, scope->se_local_count);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6103
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6104 // At end of ":for" scope jump back to the FOR instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6105 generate_JUMP(cctx, JUMP_ALWAYS, forscope->fs_top_label);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6106
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6107 // Fill in the "end" label in the FOR statement so it can jump here
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6108 isn = ((isn_T *)instr->ga_data) + forscope->fs_top_label;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6109 isn->isn_arg.forloop.for_end = instr->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6110
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6111 // Fill in the "end" label any BREAK statements
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6112 compile_fill_jump_to_end(&forscope->fs_end_label, cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6113
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6114 // Below the ":for" scope drop the "expr" list from the stack.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6115 if (generate_instr_drop(cctx, ISN_DROP, 1) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6116 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6117
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6118 vim_free(scope);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6119
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6120 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6121 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6122
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6123 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6124 * compile "while expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6125 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6126 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6127 * top: EVAL expr Push result of "expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6128 * JUMP_IF_FALSE end jump if false
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6129 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6130 * JUMP top Jump back to repeat
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6131 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6132 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6133 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6134 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6135 compile_while(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6136 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6137 char_u *p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6138 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6139 scope_T *scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6140
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6141 scope = new_scope(cctx, WHILE_SCOPE);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6142 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6143 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6144
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6145 scope->se_u.se_while.ws_top_label = instr->ga_len;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6146
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6147 // compile "expr"
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	6148 if (compile_expr0(&p, cctx) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6149 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6150
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6151 // "while_end" is set when ":endwhile" is found
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6152 if (compile_jump_to_end(&scope->se_u.se_while.ws_end_label,
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6153 JUMP_IF_FALSE, cctx) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6154 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6155
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6156 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6157 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6158
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6159 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6160 * compile "endwhile"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6161 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6162 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6163 compile_endwhile(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6164 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6165 scope_T *scope = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6166
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6167 if (scope == NULL \|\| scope->se_type != WHILE_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6168 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6169 emsg(_(e_while));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6170 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6171 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6172 cctx->ctx_scope = scope->se_outer;
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	6173 unwind_locals(cctx, scope->se_local_count);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6174
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6175 // At end of ":for" scope jump back to the FOR instruction.
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6176 generate_JUMP(cctx, JUMP_ALWAYS, scope->se_u.se_while.ws_top_label);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6177
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6178 // Fill in the "end" label in the WHILE statement so it can jump here.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6179 // And in any jumps for ":break"
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6180 compile_fill_jump_to_end(&scope->se_u.se_while.ws_end_label, cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6181
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6182 vim_free(scope);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6183
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6184 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6185 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6186
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6187 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6188 * compile "continue"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6189 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6190 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6191 compile_continue(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6192 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6193 scope_T *scope = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6194
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6195 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6196 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6197 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6198 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6199 emsg(_(e_continue));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6200 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6201 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6202 if (scope->se_type == FOR_SCOPE \|\| scope->se_type == WHILE_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6203 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6204 scope = scope->se_outer;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6205 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6206
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6207 // Jump back to the FOR or WHILE instruction.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6208 generate_JUMP(cctx, JUMP_ALWAYS,
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6209 scope->se_type == FOR_SCOPE ? scope->se_u.se_for.fs_top_label
d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6210 : scope->se_u.se_while.ws_top_label);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6211 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6212 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6213
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6214 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6215 * compile "break"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6216 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6217 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6218 compile_break(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6219 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6220 scope_T *scope = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6221 endlabel_T **el;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6222
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6223 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6224 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6225 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6226 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6227 emsg(_(e_break));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6228 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6229 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6230 if (scope->se_type == FOR_SCOPE \|\| scope->se_type == WHILE_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6231 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6232 scope = scope->se_outer;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6233 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6234
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6235 // Jump to the end of the FOR or WHILE loop.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6236 if (scope->se_type == FOR_SCOPE)
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6237 el = &scope->se_u.se_for.fs_end_label;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6238 else
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6239 el = &scope->se_u.se_while.ws_end_label;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6240 if (compile_jump_to_end(el, JUMP_ALWAYS, cctx) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6241 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6242
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6243 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6244 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6245
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6246 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6247 * compile "{" start of block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6248 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6249 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6250 compile_block(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6251 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6252 if (new_scope(cctx, BLOCK_SCOPE) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6253 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6254 return skipwhite(arg + 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6255 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6256
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6257 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6258 * compile end of block: drop one scope
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6259 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6260 static void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6261 compile_endblock(cctx_T *cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6262 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6263 scope_T *scope = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6264
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6265 cctx->ctx_scope = scope->se_outer;
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	6266 unwind_locals(cctx, scope->se_local_count);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6267 vim_free(scope);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6268 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6269
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6270 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6271 * compile "try"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6272 * Creates a new scope for the try-endtry, pointing to the first catch and
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6273 * finally.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6274 * Creates another scope for the "try" block itself.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6275 * TRY instruction sets up exception handling at runtime.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6276 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6277 * "try"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6278 * TRY -> catch1, -> finally push trystack entry
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6279 * ... try block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6280 * "throw {exception}"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6281 * EVAL {exception}
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6282 * THROW create exception
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6283 * ... try block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6284 * " catch {expr}"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6285 * JUMP -> finally
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6286 * catch1: PUSH exeception
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6287 * EVAL {expr}
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6288 * MATCH
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6289 * JUMP nomatch -> catch2
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6290 * CATCH remove exception
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6291 * ... catch block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6292 * " catch"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6293 * JUMP -> finally
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6294 * catch2: CATCH remove exception
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6295 * ... catch block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6296 * " finally"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6297 * finally:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6298 * ... finally block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6299 * " endtry"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6300 * ENDTRY pop trystack entry, may rethrow
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6301 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6302 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6303 compile_try(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6304 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6305 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6306 scope_T *try_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6307 scope_T *scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6308
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6309 // scope that holds the jumps that go to catch/finally/endtry
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6310 try_scope = new_scope(cctx, TRY_SCOPE);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6311 if (try_scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6312 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6313
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6314 // "catch" is set when the first ":catch" is found.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6315 // "finally" is set when ":finally" or ":endtry" is found
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6316 try_scope->se_u.se_try.ts_try_label = instr->ga_len;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6317 if (generate_instr(cctx, ISN_TRY) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6318 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6319
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6320 // scope for the try block itself
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6321 scope = new_scope(cctx, BLOCK_SCOPE);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6322 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6323 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6324
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6325 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6326 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6327
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6328 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6329 * compile "catch {expr}"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6330 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6331 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6332 compile_catch(char_u arg, cctx_T cctx UNUSED)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6333 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6334 scope_T *scope = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6335 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6336 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6337 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6338
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6339 // end block scope from :try or :catch
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6340 if (scope != NULL && scope->se_type == BLOCK_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6341 compile_endblock(cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6342 scope = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6343
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6344 // Error if not in a :try scope
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6345 if (scope == NULL \|\| scope->se_type != TRY_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6346 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6347 emsg(_(e_catch));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6348 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6349 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6350
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6351 if (scope->se_u.se_try.ts_caught_all)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6352 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6353 emsg(_("E1033: catch unreachable after catch-all"));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6354 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6355 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6356
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6357 // Jump from end of previous block to :finally or :endtry
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6358 if (compile_jump_to_end(&scope->se_u.se_try.ts_end_label,
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6359 JUMP_ALWAYS, cctx) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6360 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6361
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6362 // End :try or :catch scope: set value in ISN_TRY instruction
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6363 isn = ((isn_T *)instr->ga_data) + scope->se_u.se_try.ts_try_label;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6364 if (isn->isn_arg.try.try_catch == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6365 isn->isn_arg.try.try_catch = instr->ga_len;
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6366 if (scope->se_u.se_try.ts_catch_label != 0)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6367 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6368 // Previous catch without match jumps here
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6369 isn = ((isn_T *)instr->ga_data) + scope->se_u.se_try.ts_catch_label;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6370 isn->isn_arg.jump.jump_where = instr->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6371 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6372
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6373 p = skipwhite(arg);
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	6374 if (ends_excmd2(arg, p))
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6375 {
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6376 scope->se_u.se_try.ts_caught_all = TRUE;
d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6377 scope->se_u.se_try.ts_catch_label = 0;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6378 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6379 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6380 {
19316 17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6381 char_u *end;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6382 char_u *pat;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6383 char_u *tofree = NULL;
19892 5feb426d2ea1 patch 8.2.0502: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19884 diff changeset	6384 int dropped = 0;
19388 3a579cadceb6 patch 8.2.0252: Windows compiler warns for using size_t Bram Moolenaar <Bram@vim.org> parents: 19342 diff changeset	6385 int len;
19316 17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6386
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6387 // Push v:exception, push {expr} and MATCH
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6388 generate_instr_type(cctx, ISN_PUSHEXC, &t_string);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6389
19892 5feb426d2ea1 patch 8.2.0502: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19884 diff changeset	6390 end = skip_regexp_ex(p + 1, *p, TRUE, &tofree, &dropped);
19316 17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6391 if (end != p)
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6392 {
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6393 semsg(_("E1067: Separator mismatch: %s"), p);
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6394 vim_free(tofree);
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6395 return FAIL;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6396 }
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6397 if (tofree == NULL)
19388 3a579cadceb6 patch 8.2.0252: Windows compiler warns for using size_t Bram Moolenaar <Bram@vim.org> parents: 19342 diff changeset	6398 len = (int)(end - (p + 1));
19316 17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6399 else
19892 5feb426d2ea1 patch 8.2.0502: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19884 diff changeset	6400 len = (int)(end - tofree);
5feb426d2ea1 patch 8.2.0502: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19884 diff changeset	6401 pat = vim_strnsave(tofree == NULL ? p + 1 : tofree, len);
19316 17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6402 vim_free(tofree);
19892 5feb426d2ea1 patch 8.2.0502: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19884 diff changeset	6403 p += len + 2 + dropped;
19316 17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6404 if (pat == NULL)
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6405 return FAIL;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6406 if (generate_PUSHS(cctx, pat) == FAIL)
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6407 return FAIL;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6408
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6409 if (generate_COMPARE(cctx, EXPR_MATCH, FALSE) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6410 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6411
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6412 scope->se_u.se_try.ts_catch_label = instr->ga_len;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6413 if (generate_JUMP(cctx, JUMP_IF_FALSE, 0) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6414 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6415 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6416
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6417 if (generate_instr(cctx, ISN_CATCH) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6418 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6419
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6420 if (new_scope(cctx, BLOCK_SCOPE) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6421 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6422 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6423 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6424
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6425 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6426 compile_finally(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6427 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6428 scope_T *scope = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6429 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6430 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6431
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6432 // end block scope from :try or :catch
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6433 if (scope != NULL && scope->se_type == BLOCK_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6434 compile_endblock(cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6435 scope = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6436
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6437 // Error if not in a :try scope
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6438 if (scope == NULL \|\| scope->se_type != TRY_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6439 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6440 emsg(_(e_finally));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6441 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6442 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6443
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6444 // End :catch or :finally scope: set value in ISN_TRY instruction
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6445 isn = ((isn_T *)instr->ga_data) + scope->se_u.se_try.ts_try_label;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6446 if (isn->isn_arg.try.try_finally != 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6447 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6448 emsg(_(e_finally_dup));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6449 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6450 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6451
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6452 // Fill in the "end" label in jumps at the end of the blocks.
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6453 compile_fill_jump_to_end(&scope->se_u.se_try.ts_end_label, cctx);
d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6454
19894 ea4f8e789627 patch 8.2.0503: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19892 diff changeset	6455 isn->isn_arg.try.try_finally = instr->ga_len;
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6456 if (scope->se_u.se_try.ts_catch_label != 0)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6457 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6458 // Previous catch without match jumps here
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6459 isn = ((isn_T *)instr->ga_data) + scope->se_u.se_try.ts_catch_label;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6460 isn->isn_arg.jump.jump_where = instr->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6461 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6462
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6463 // TODO: set index in ts_finally_label jumps
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6464
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6465 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6466 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6467
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6468 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6469 compile_endtry(char_u arg, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6470 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6471 scope_T *scope = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6472 garray_T *instr = &cctx->ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6473 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6474
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6475 // end block scope from :catch or :finally
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6476 if (scope != NULL && scope->se_type == BLOCK_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6477 compile_endblock(cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6478 scope = cctx->ctx_scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6479
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6480 // Error if not in a :try scope
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6481 if (scope == NULL \|\| scope->se_type != TRY_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6482 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6483 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6484 emsg(_(e_no_endtry));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6485 else if (scope->se_type == WHILE_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6486 emsg(_(e_endwhile));
19213 b18437efabac patch 8.2.0165: Coverity warning for using NULL pointer Bram Moolenaar <Bram@vim.org> parents: 19193 diff changeset	6487 else if (scope->se_type == FOR_SCOPE)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6488 emsg(_(e_endfor));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6489 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6490 emsg(_(e_endif));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6491 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6492 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6493
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6494 isn = ((isn_T *)instr->ga_data) + scope->se_u.se_try.ts_try_label;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6495 if (isn->isn_arg.try.try_catch == 0 && isn->isn_arg.try.try_finally == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6496 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6497 emsg(_("E1032: missing :catch or :finally"));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6498 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6499 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6500
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6501 // Fill in the "end" label in jumps at the end of the blocks, if not done
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6502 // by ":finally".
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6503 compile_fill_jump_to_end(&scope->se_u.se_try.ts_end_label, cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6504
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6505 // End :catch or :finally scope: set value in ISN_TRY instruction
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6506 if (isn->isn_arg.try.try_finally == 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6507 isn->isn_arg.try.try_finally = instr->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6508 compile_endblock(cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6509
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6510 if (generate_instr(cctx, ISN_ENDTRY) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6511 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6512 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6513 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6514
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6515 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6516 * compile "throw {expr}"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6517 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6518 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6519 compile_throw(char_u arg, cctx_T cctx UNUSED)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6520 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6521 char_u *p = skipwhite(arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6522
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	6523 if (compile_expr0(&p, cctx) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6524 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6525 if (may_generate_2STRING(-1, cctx) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6526 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6527 if (generate_instr_drop(cctx, ISN_THROW, 1) == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6528 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6529
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6530 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6531 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6532
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6533 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6534 * compile "echo expr"
20142 fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6535 * compile "echomsg expr"
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6536 * compile "echoerr expr"
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6537 * compile "execute expr"
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6538 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6539 static char_u *
20142 fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6540 compile_mult_expr(char_u arg, int cmdidx, cctx_T cctx)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6541 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6542 char_u *p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6543 int count = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6544
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	6545 for (;;)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6546 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	6547 if (compile_expr0(&p, cctx) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6548 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6549 ++count;
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	6550 p = skipwhite(p);
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	6551 if (ends_excmd(*p))
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	6552 break;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6553 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6554
20142 fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6555 if (cmdidx == CMD_echo \|\| cmdidx == CMD_echon)
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6556 generate_ECHO(cctx, cmdidx == CMD_echo, count);
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6557 else if (cmdidx == CMD_execute)
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6558 generate_MULT_EXPR(cctx, ISN_EXECUTE, count);
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6559 else if (cmdidx == CMD_echomsg)
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6560 generate_MULT_EXPR(cctx, ISN_ECHOMSG, count);
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6561 else
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6562 generate_MULT_EXPR(cctx, ISN_ECHOERR, count);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6563 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6564 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6565
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6566 /*
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6567 * A command that is not compiled, execute with legacy code.
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6568 */
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6569 static char_u *
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6570 compile_exec(char_u line, exarg_T eap, cctx_T *cctx)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6571 {
20172 1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6572 char_u *p;
20174 72b437855299 patch 8.2.0642: Vim9: using invalid index Bram Moolenaar <Bram@vim.org> parents: 20172 diff changeset	6573 int has_expr = FALSE;
21156 eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6574 char_u nextcmd = (char_u )"";
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6575
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	6576 if (cctx->ctx_skip == SKIP_YES)
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6577 goto theend;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6578
20174 72b437855299 patch 8.2.0642: Vim9: using invalid index Bram Moolenaar <Bram@vim.org> parents: 20172 diff changeset	6579 if (eap->cmdidx >= 0 && eap->cmdidx < CMD_SIZE)
21156 eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6580 {
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6581 long argt = excmd_get_argt(eap->cmdidx);
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6582 int usefilter = FALSE;
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6583
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6584 has_expr = argt & (EX_XFILE \| EX_EXPAND);
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6585
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6586 // If the command can be followed by a bar, find the bar and truncate
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6587 // it, so that the following command can be compiled.
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6588 // The '\|' is overwritten with a NUL, it is put back below.
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6589 if ((eap->cmdidx == CMD_write \|\| eap->cmdidx == CMD_read)
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6590 && *eap->arg == '!')
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6591 // :w !filter or :r !filter or :r! filter
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6592 usefilter = TRUE;
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6593 if ((argt & EX_TRLBAR) && !usefilter)
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6594 {
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6595 separate_nextcmd(eap);
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6596 if (eap->nextcmd != NULL)
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6597 nextcmd = eap->nextcmd;
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6598 }
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6599 }
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6600
20172 1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6601 if (eap->cmdidx == CMD_syntax && STRNCMP(eap->arg, "include ", 8) == 0)
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6602 {
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6603 // expand filename in "syntax include [@group] filename"
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6604 has_expr = TRUE;
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6605 eap->arg = skipwhite(eap->arg + 7);
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6606 if (*eap->arg == '@')
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6607 eap->arg = skiptowhite(eap->arg);
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6608 }
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6609
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6610 if (has_expr && (p = (char_u )strstr((char )eap->arg, "`=")) != NULL)
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6611 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6612 int count = 0;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6613 char_u *start = skipwhite(line);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6614
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6615 // :cmd xxx`=expr1`yyy`=expr2`zzz
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6616 // PUSHS ":cmd xxx"
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6617 // eval expr1
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6618 // PUSHS "yyy"
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6619 // eval expr2
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6620 // PUSHS "zzz"
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6621 // EXECCONCAT 5
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6622 for (;;)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6623 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6624 if (p > start)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6625 {
20830 9064044fd4f6 patch 8.2.0967: unnecessary type casts for vim_strnsave() Bram Moolenaar <Bram@vim.org> parents: 20538 diff changeset	6626 generate_PUSHS(cctx, vim_strnsave(start, p - start));
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6627 ++count;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6628 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6629 p += 2;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	6630 if (compile_expr0(&p, cctx) == FAIL)
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6631 return NULL;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6632 may_generate_2STRING(-1, cctx);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6633 ++count;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6634 p = skipwhite(p);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6635 if (*p != '`')
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6636 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6637 emsg(_("E1083: missing backtick"));
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6638 return NULL;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6639 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6640 start = p + 1;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6641
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6642 p = (char_u )strstr((char )start, "`=");
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6643 if (p == NULL)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6644 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6645 if (*skipwhite(start) != NUL)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6646 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6647 generate_PUSHS(cctx, vim_strsave(start));
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6648 ++count;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6649 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6650 break;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6651 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6652 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6653 generate_EXECCONCAT(cctx, count);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6654 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6655 else
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6656 generate_EXEC(cctx, line);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6657
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6658 theend:
21156 eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6659 if (*nextcmd != NUL)
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6660 {
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6661 // the parser expects a pointer to the bar, put it back
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6662 --nextcmd;
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6663 *nextcmd = '\|';
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6664 }
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6665
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6666 return nextcmd;
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6667 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6668
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6669 /*
20339 7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6670 * Add a function to the list of :def functions.
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6671 * This sets "ufunc->uf_dfunc_idx" but the function isn't compiled yet.
20339 7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6672 */
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	6673 static int
20339 7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6674 add_def_function(ufunc_T *ufunc)
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6675 {
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6676 dfunc_T *dfunc;
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6677
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6678 if (def_functions.ga_len == 0)
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6679 {
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6680 // The first position is not used, so that a zero uf_dfunc_idx means it
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6681 // wasn't set.
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6682 if (ga_grow(&def_functions, 1) == FAIL)
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6683 return FAIL;
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6684 ++def_functions.ga_len;
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6685 }
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6686
20339 7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6687 // Add the function to "def_functions".
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6688 if (ga_grow(&def_functions, 1) == FAIL)
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6689 return FAIL;
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6690 dfunc = ((dfunc_T *)def_functions.ga_data) + def_functions.ga_len;
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6691 CLEAR_POINTER(dfunc);
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6692 dfunc->df_idx = def_functions.ga_len;
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6693 ufunc->uf_dfunc_idx = dfunc->df_idx;
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6694 dfunc->df_ufunc = ufunc;
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6695 ++def_functions.ga_len;
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6696 return OK;
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6697 }
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6698
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6699 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6700 * After ex_function() has collected all the function lines: parse and compile
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6701 * the lines into instructions.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6702 * Adds the function to "def_functions".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6703 * When "set_return_type" is set then set ufunc->uf_ret_type to the type of the
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6704 * return statement (used for lambda).
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	6705 * "outer_cctx" is set for a nested function.
19864 8288884fdfe1 patch 8.2.0488: Vim9: compiling can break when using a lambda inside :def Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	6706 * This can be used recursively through compile_lambda(), which may reallocate
8288884fdfe1 patch 8.2.0488: Vim9: compiling can break when using a lambda inside :def Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	6707 * "def_functions".
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	6708 * Returns OK or FAIL.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6709 */
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	6710 int
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	6711 compile_def_function(ufunc_T ufunc, int set_return_type, cctx_T outer_cctx)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6712 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6713 char_u *line = NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6714 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6715 char *errormsg = NULL; // error message
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6716 cctx_T cctx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6717 garray_T *instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6718 int called_emsg_before = called_emsg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6719 int ret = FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6720 sctx_T save_current_sctx = current_sctx;
20538 9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6721 int do_estack_push;
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	6722 int emsg_before = called_emsg;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6723
20538 9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6724 // When using a function that was compiled before: Free old instructions.
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6725 // Otherwise add a new entry in "def_functions".
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6726 if (ufunc->uf_dfunc_idx > 0)
20339 7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6727 {
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6728 dfunc_T dfunc = ((dfunc_T )def_functions.ga_data)
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6729 + ufunc->uf_dfunc_idx;
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6730 delete_def_function_contents(dfunc);
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6731 }
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6732 else if (add_def_function(ufunc) == FAIL)
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	6733 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6734
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 20005 diff changeset	6735 CLEAR_FIELD(cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6736 cctx.ctx_ufunc = ufunc;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6737 cctx.ctx_lnum = -1;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	6738 cctx.ctx_outer = outer_cctx;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6739 ga_init2(&cctx.ctx_locals, sizeof(lvar_T), 10);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6740 ga_init2(&cctx.ctx_type_stack, sizeof(type_T *), 50);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6741 ga_init2(&cctx.ctx_imports, sizeof(imported_T), 10);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6742 cctx.ctx_type_list = &ufunc->uf_type_list;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6743 ga_init2(&cctx.ctx_instr, sizeof(isn_T), 50);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6744 instr = &cctx.ctx_instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6745
20538 9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6746 // Set the context to the function, it may be compiled when called from
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6747 // another script. Set the script version to the most modern one.
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6748 // The line number will be set in next_line_from_context().
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6749 current_sctx = ufunc->uf_script_ctx;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6750 current_sctx.sc_version = SCRIPT_VERSION_VIM9;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6751
20538 9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6752 // Make sure error messages are OK.
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6753 do_estack_push = !estack_top_is_ufunc(ufunc, 1);
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6754 if (do_estack_push)
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6755 estack_push_ufunc(ufunc, 1);
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6756
19328 e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6757 if (ufunc->uf_def_args.ga_len > 0)
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6758 {
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6759 int count = ufunc->uf_def_args.ga_len;
19946 8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6760 int first_def_arg = ufunc->uf_args.ga_len - count;
19328 e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6761 int i;
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6762 char_u *arg;
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6763 int off = STACK_FRAME_SIZE + (ufunc->uf_va_name != NULL ? 1 : 0);
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6764
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6765 // Produce instructions for the default values of optional arguments.
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6766 // Store the instruction index in uf_def_arg_idx[] so that we know
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6767 // where to start when the function is called, depending on the number
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6768 // of arguments.
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6769 ufunc->uf_def_arg_idx = ALLOC_CLEAR_MULT(int, count + 1);
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6770 if (ufunc->uf_def_arg_idx == NULL)
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6771 goto erret;
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6772 for (i = 0; i < count; ++i)
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6773 {
19946 8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6774 garray_T *stack = &cctx.ctx_type_stack;
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6775 type_T *val_type;
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6776 int arg_idx = first_def_arg + i;
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6777
19328 e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6778 ufunc->uf_def_arg_idx[i] = instr->ga_len;
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6779 arg = ((char_u **)(ufunc->uf_def_args.ga_data))[i];
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	6780 if (compile_expr0(&arg, &cctx) == FAIL)
19946 8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6781 goto erret;
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6782
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6783 // If no type specified use the type of the default value.
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6784 // Otherwise check that the default value type matches the
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6785 // specified type.
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6786 val_type = ((type_T **)stack->ga_data)[stack->ga_len - 1];
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6787 if (ufunc->uf_arg_types[arg_idx] == &t_unknown)
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6788 ufunc->uf_arg_types[arg_idx] = val_type;
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6789 else if (check_type(ufunc->uf_arg_types[i], val_type, FALSE)
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6790 == FAIL)
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6791 {
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6792 arg_type_mismatch(ufunc->uf_arg_types[arg_idx], val_type,
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6793 arg_idx + 1);
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6794 goto erret;
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6795 }
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6796
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6797 if (generate_STORE(&cctx, ISN_STORE, i - count - off, NULL) == FAIL)
19328 e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6798 goto erret;
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6799 }
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6800 ufunc->uf_def_arg_idx[count] = instr->ga_len;
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6801 }
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6802
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6803 /*
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6804 * Loop over all the lines of the function and generate instructions.
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6805 */
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6806 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6807 {
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6808 exarg_T ea;
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6809 int starts_with_colon = FALSE;
20982 bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	6810 char_u *cmd;
21172 96ae8622cfb6 patch 8.2.1137: Vim9: modifiers not cleared after compiling function Bram Moolenaar <Bram@vim.org> parents: 21160 diff changeset	6811 int save_msg_scroll = msg_scroll;
19473 b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6812
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	6813 // Bail out on the first error to avoid a flood of errors and report
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	6814 // the right line number when inside try/catch.
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	6815 if (emsg_before != called_emsg)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	6816 goto erret;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	6817
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6818 if (line != NULL && *line == '\|')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6819 // the line continues after a '\|'
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6820 ++line;
20949 62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	6821 else if (line != NULL && *skipwhite(line) != NUL
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	6822 && !(*line == '#' && (line == cctx.ctx_line_start
de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	6823 \|\| VIM_ISWHITE(line[-1]))))
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6824 {
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	6825 semsg(_("E488: Trailing characters: %s"), line);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6826 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6827 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6828 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6829 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	6830 line = next_line_from_context(&cctx, FALSE);
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	6831 if (cctx.ctx_lnum >= ufunc->uf_lines.ga_len)
20055 686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6832 // beyond the last line
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6833 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6834 }
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	6835 emsg_before = called_emsg;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6836
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 20005 diff changeset	6837 CLEAR_FIELD(ea);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6838 ea.cmdlinep = &line;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6839 ea.cmd = skipwhite(line);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6840
20055 686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6841 // Some things can be recognized by the first character.
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6842 switch (*ea.cmd)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6843 {
20055 686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6844 case '#':
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6845 // "#" starts a comment, but "#{" does not.
20055 686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6846 if (ea.cmd[1] != '{')
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6847 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6848 line = (char_u *)"";
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6849 continue;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6850 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6851 break;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6852
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6853 case '}':
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6854 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6855 // "}" ends a block scope
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6856 scopetype_T stype = cctx.ctx_scope == NULL
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6857 ? NO_SCOPE : cctx.ctx_scope->se_type;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6858
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6859 if (stype == BLOCK_SCOPE)
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6860 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6861 compile_endblock(&cctx);
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6862 line = ea.cmd;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6863 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6864 else
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6865 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6866 emsg(_("E1025: using } outside of a block scope"));
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6867 goto erret;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6868 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6869 if (line != NULL)
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6870 line = skipwhite(ea.cmd + 1);
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6871 continue;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6872 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6873
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6874 case '{':
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6875 // "{" starts a block scope
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6876 // "{'a': 1}->func() is something else
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6877 if (ends_excmd(*skipwhite(ea.cmd + 1)))
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6878 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6879 line = compile_block(ea.cmd, &cctx);
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6880 continue;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6881 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6882 break;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6883
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6884 case ':':
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6885 starts_with_colon = TRUE;
20055 686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6886 break;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6887 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6888
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6889 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6890 * COMMAND MODIFIERS
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6891 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6892 if (parse_command_modifiers(&ea, &errormsg, FALSE) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6893 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6894 if (errormsg != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6895 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6896 // empty line or comment
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6897 line = (char_u *)"";
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6898 continue;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6899 }
21172 96ae8622cfb6 patch 8.2.1137: Vim9: modifiers not cleared after compiling function Bram Moolenaar <Bram@vim.org> parents: 21160 diff changeset	6900 // TODO: use modifiers in the command
96ae8622cfb6 patch 8.2.1137: Vim9: modifiers not cleared after compiling function Bram Moolenaar <Bram@vim.org> parents: 21160 diff changeset	6901 undo_cmdmod(&ea, save_msg_scroll);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6902
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6903 // Skip ":call" to get to the function name.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6904 if (checkforcmd(&ea.cmd, "call", 3))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6905 ea.cmd = skipwhite(ea.cmd);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6906
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6907 if (!starts_with_colon)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6908 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6909 char_u *pskip;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6910
19473 b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6911 // Assuming the command starts with a variable or function name,
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6912 // find what follows.
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6913 // Skip over "var.member", "var[idx]" and the like.
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6914 // Also "&opt = val", "$ENV = val" and "@r = val".
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6915 pskip = (ea.cmd == '&' \|\| ea.cmd == '$' \|\| *ea.cmd == '@')
19473 b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6916 ? ea.cmd + 1 : ea.cmd;
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6917 p = to_name_end(pskip, TRUE);
19862 846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19860 diff changeset	6918 if (p > ea.cmd && *p != NUL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6919 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6920 char_u *var_end;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6921 int oplen;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6922 int heredoc;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6923
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6924 var_end = find_name_end(pskip, NULL, NULL,
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6925 FNE_CHECK_START \| FNE_INCL_BR);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6926 oplen = assignment_len(skipwhite(var_end), &heredoc);
19473 b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6927 if (oplen > 0)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6928 {
20355 fc2d76e0994c patch 8.2.0733: Vim9: assigning to dict or list argument does not work Bram Moolenaar <Bram@vim.org> parents: 20349 diff changeset	6929 size_t len = p - ea.cmd;
fc2d76e0994c patch 8.2.0733: Vim9: assigning to dict or list argument does not work Bram Moolenaar <Bram@vim.org> parents: 20349 diff changeset	6930
19473 b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6931 // Recognize an assignment if we recognize the variable
b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6932 // name:
b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6933 // "g:var = expr"
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	6934 // "local = expr" where "local" is a local var.
ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	6935 // "script = expr" where "script" is a script-local var.
ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	6936 // "import = expr" where "import" is an imported var
19473 b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6937 // "&opt = expr"
b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6938 // "$ENV = expr"
b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6939 // "@r = expr"
b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6940 if (*ea.cmd == '&'
b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6941 \|\| *ea.cmd == '$'
b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6942 \|\| *ea.cmd == '@'
20355 fc2d76e0994c patch 8.2.0733: Vim9: assigning to dict or list argument does not work Bram Moolenaar <Bram@vim.org> parents: 20349 diff changeset	6943 \|\| ((len) > 2 && ea.cmd[1] == ':')
fc2d76e0994c patch 8.2.0733: Vim9: assigning to dict or list argument does not work Bram Moolenaar <Bram@vim.org> parents: 20349 diff changeset	6944 \|\| lookup_local(ea.cmd, len, &cctx) != NULL
fc2d76e0994c patch 8.2.0733: Vim9: assigning to dict or list argument does not work Bram Moolenaar <Bram@vim.org> parents: 20349 diff changeset	6945 \|\| lookup_arg(ea.cmd, len, NULL, NULL,
fc2d76e0994c patch 8.2.0733: Vim9: assigning to dict or list argument does not work Bram Moolenaar <Bram@vim.org> parents: 20349 diff changeset	6946 NULL, &cctx) == OK
fc2d76e0994c patch 8.2.0733: Vim9: assigning to dict or list argument does not work Bram Moolenaar <Bram@vim.org> parents: 20349 diff changeset	6947 \|\| lookup_script(ea.cmd, len) == OK
fc2d76e0994c patch 8.2.0733: Vim9: assigning to dict or list argument does not work Bram Moolenaar <Bram@vim.org> parents: 20349 diff changeset	6948 \|\| find_imported(ea.cmd, len, &cctx) != NULL)
19473 b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6949 {
b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6950 line = compile_assignment(ea.cmd, &ea, CMD_SIZE, &cctx);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6951 if (line == NULL \|\| line == ea.cmd)
19473 b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6952 goto erret;
b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6953 continue;
b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6954 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6955 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6956 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6957
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6958 if (*ea.cmd == '[')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6959 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6960 // [var, var] = expr
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6961 line = compile_assignment(ea.cmd, &ea, CMD_SIZE, &cctx);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6962 if (line == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6963 goto erret;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6964 if (line != ea.cmd)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6965 continue;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6966 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6967 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6968
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6969 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6970 * COMMAND after range
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6971 */
20982 bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	6972 cmd = ea.cmd;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6973 ea.cmd = skip_range(ea.cmd, NULL);
20982 bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	6974 if (ea.cmd > cmd && !starts_with_colon)
bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	6975 {
bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	6976 emsg(_(e_colon_required));
bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	6977 goto erret;
bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	6978 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6979 p = find_ex_command(&ea, NULL, starts_with_colon ? NULL
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6980 : (void ()(char_u , size_t, cctx_T ))lookup_local,
19473 b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6981 &cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6982
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6983 if (p == ea.cmd && ea.cmdidx != CMD_SIZE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6984 {
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	6985 if (cctx.ctx_skip == SKIP_YES)
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	6986 {
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	6987 line += STRLEN(line);
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	6988 continue;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	6989 }
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	6990
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6991 // Expression or function call.
21196 f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	6992 if (ea.cmdidx != CMD_eval)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6993 {
21196 f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	6994 // CMD_let cannot happen, compile_assignment() above is used
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	6995 iemsg("Command from find_ex_command() not handled");
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	6996 goto erret;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6997 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6998 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6999
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7000 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7001
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	7002 if (cctx.ctx_skip == SKIP_YES
20929 808e39c257de patch 8.2.1016: Vim9: test fails when channel feature is missing Bram Moolenaar <Bram@vim.org> parents: 20909 diff changeset	7003 && ea.cmdidx != CMD_if
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	7004 && ea.cmdidx != CMD_elseif
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	7005 && ea.cmdidx != CMD_else
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	7006 && ea.cmdidx != CMD_endif)
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	7007 {
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7008 line = (char_u *)"";
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	7009 continue;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	7010 }
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	7011
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7012 if (ea.cmdidx != CMD_elseif
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7013 && ea.cmdidx != CMD_else
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7014 && ea.cmdidx != CMD_endif
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7015 && ea.cmdidx != CMD_endfor
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7016 && ea.cmdidx != CMD_endwhile
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7017 && ea.cmdidx != CMD_catch
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7018 && ea.cmdidx != CMD_finally
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7019 && ea.cmdidx != CMD_endtry)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7020 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7021 if (cctx.ctx_had_return)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7022 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7023 emsg(_("E1095: Unreachable code after :return"));
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7024 goto erret;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7025 }
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7026 }
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7027
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7028 switch (ea.cmdidx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7029 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7030 case CMD_def:
20279 49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	7031 ea.arg = p;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	7032 line = compile_nested_function(&ea, &cctx);
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	7033 break;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	7034
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7035 case CMD_function:
20279 49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	7036 emsg(_("E1086: Cannot use :function inside :def"));
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7037 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7038
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7039 case CMD_return:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7040 line = compile_return(p, set_return_type, &cctx);
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7041 cctx.ctx_had_return = TRUE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7042 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7043
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7044 case CMD_let:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7045 case CMD_const:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7046 line = compile_assignment(p, &ea, ea.cmdidx, &cctx);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	7047 if (line == p)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	7048 line = NULL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7049 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7050
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7051 case CMD_unlet:
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7052 case CMD_unlockvar:
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7053 case CMD_lockvar:
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7054 line = compile_unletlock(p, &ea, &cctx);
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7055 break;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7056
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7057 case CMD_import:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7058 line = compile_import(p, &cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7059 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7060
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7061 case CMD_if:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7062 line = compile_if(p, &cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7063 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7064 case CMD_elseif:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7065 line = compile_elseif(p, &cctx);
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7066 cctx.ctx_had_return = FALSE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7067 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7068 case CMD_else:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7069 line = compile_else(p, &cctx);
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7070 cctx.ctx_had_return = FALSE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7071 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7072 case CMD_endif:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7073 line = compile_endif(p, &cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7074 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7075
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7076 case CMD_while:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7077 line = compile_while(p, &cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7078 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7079 case CMD_endwhile:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7080 line = compile_endwhile(p, &cctx);
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7081 cctx.ctx_had_return = FALSE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7082 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7083
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7084 case CMD_for:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7085 line = compile_for(p, &cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7086 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7087 case CMD_endfor:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7088 line = compile_endfor(p, &cctx);
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7089 cctx.ctx_had_return = FALSE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7090 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7091 case CMD_continue:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7092 line = compile_continue(p, &cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7093 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7094 case CMD_break:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7095 line = compile_break(p, &cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7096 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7097
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7098 case CMD_try:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7099 line = compile_try(p, &cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7100 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7101 case CMD_catch:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7102 line = compile_catch(p, &cctx);
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7103 cctx.ctx_had_return = FALSE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7104 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7105 case CMD_finally:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7106 line = compile_finally(p, &cctx);
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7107 cctx.ctx_had_return = FALSE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7108 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7109 case CMD_endtry:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7110 line = compile_endtry(p, &cctx);
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7111 cctx.ctx_had_return = FALSE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7112 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7113 case CMD_throw:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7114 line = compile_throw(p, &cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7115 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7116
21196 f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7117 case CMD_eval:
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7118 if (compile_expr0(&p, &cctx) == FAIL)
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7119 goto erret;
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7120
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7121 // drop the return value
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7122 generate_instr_drop(&cctx, ISN_DROP, 1);
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7123
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7124 line = skipwhite(p);
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7125 break;
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7126
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7127 case CMD_echo:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7128 case CMD_echon:
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	7129 case CMD_execute:
20142 fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	7130 case CMD_echomsg:
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	7131 case CMD_echoerr:
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	7132 line = compile_mult_expr(p, ea.cmdidx, &cctx);
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	7133 break;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7134
20982 bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	7135 // TODO: other commands with an expression argument
bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	7136
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7137 default:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7138 // Not recognized, execute with do_cmdline_cmd().
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7139 ea.arg = p;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7140 line = compile_exec(line, &ea, &cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7141 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7142 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7143 if (line == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7144 goto erret;
19894 ea4f8e789627 patch 8.2.0503: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19892 diff changeset	7145 line = skipwhite(line);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7146
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7147 if (cctx.ctx_type_stack.ga_len < 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7148 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7149 iemsg("Type stack underflow");
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7150 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7151 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7152 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7153
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7154 if (cctx.ctx_scope != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7155 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7156 if (cctx.ctx_scope->se_type == IF_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7157 emsg(_(e_endif));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7158 else if (cctx.ctx_scope->se_type == WHILE_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7159 emsg(_(e_endwhile));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7160 else if (cctx.ctx_scope->se_type == FOR_SCOPE)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7161 emsg(_(e_endfor));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7162 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7163 emsg(_("E1026: Missing }"));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7164 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7165 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7166
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7167 if (!cctx.ctx_had_return)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7168 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7169 if (ufunc->uf_ret_type->tt_type != VAR_VOID)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7170 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7171 emsg(_("E1027: Missing return statement"));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7172 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7173 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7174
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7175 // Return zero if there is no return at the end.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7176 generate_PUSHNR(&cctx, 0);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7177 generate_instr(&cctx, ISN_RETURN);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7178 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7179
19864 8288884fdfe1 patch 8.2.0488: Vim9: compiling can break when using a lambda inside :def Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	7180 {
8288884fdfe1 patch 8.2.0488: Vim9: compiling can break when using a lambda inside :def Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	7181 dfunc_T dfunc = ((dfunc_T )def_functions.ga_data)
8288884fdfe1 patch 8.2.0488: Vim9: compiling can break when using a lambda inside :def Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	7182 + ufunc->uf_dfunc_idx;
8288884fdfe1 patch 8.2.0488: Vim9: compiling can break when using a lambda inside :def Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	7183 dfunc->df_deleted = FALSE;
8288884fdfe1 patch 8.2.0488: Vim9: compiling can break when using a lambda inside :def Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	7184 dfunc->df_instr = instr->ga_data;
8288884fdfe1 patch 8.2.0488: Vim9: compiling can break when using a lambda inside :def Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	7185 dfunc->df_instr_count = instr->ga_len;
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	7186 dfunc->df_varcount = cctx.ctx_locals_count;
20247 e46e72aaff74 patch 8.2.0679: Vim9: incomplete support for closures Bram Moolenaar <Bram@vim.org> parents: 20244 diff changeset	7187 dfunc->df_closure_count = cctx.ctx_closure_count;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	7188 if (cctx.ctx_outer_used)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	7189 ufunc->uf_flags \|= FC_CLOSURE;
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	7190 ufunc->uf_def_status = UF_COMPILED;
19864 8288884fdfe1 patch 8.2.0488: Vim9: compiling can break when using a lambda inside :def Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	7191 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7192
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7193 ret = OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7194
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7195 erret:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7196 if (ret == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7197 {
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7198 int idx;
19864 8288884fdfe1 patch 8.2.0488: Vim9: compiling can break when using a lambda inside :def Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	7199 dfunc_T dfunc = ((dfunc_T )def_functions.ga_data)
8288884fdfe1 patch 8.2.0488: Vim9: compiling can break when using a lambda inside :def Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	7200 + ufunc->uf_dfunc_idx;
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7201
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7202 for (idx = 0; idx < instr->ga_len; ++idx)
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7203 delete_instr(((isn_T *)instr->ga_data) + idx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7204 ga_clear(instr);
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7205
20534 ae758aa4ee5e patch 8.2.0821: Vim9: memory leak in expr test Bram Moolenaar <Bram@vim.org> parents: 20532 diff changeset	7206 // if using the last entry in the table we might as well remove it
ae758aa4ee5e patch 8.2.0821: Vim9: memory leak in expr test Bram Moolenaar <Bram@vim.org> parents: 20532 diff changeset	7207 if (!dfunc->df_deleted
ae758aa4ee5e patch 8.2.0821: Vim9: memory leak in expr test Bram Moolenaar <Bram@vim.org> parents: 20532 diff changeset	7208 && ufunc->uf_dfunc_idx == def_functions.ga_len - 1)
ae758aa4ee5e patch 8.2.0821: Vim9: memory leak in expr test Bram Moolenaar <Bram@vim.org> parents: 20532 diff changeset	7209 --def_functions.ga_len;
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	7210 ufunc->uf_def_status = UF_NOT_COMPILED;
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7211
19896 92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	7212 while (cctx.ctx_scope != NULL)
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	7213 drop_scope(&cctx);
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	7214
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7215 // Don't execute this function body.
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7216 ga_clear_strings(&ufunc->uf_lines);
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7217
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7218 if (errormsg != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7219 emsg(errormsg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7220 else if (called_emsg == called_emsg_before)
19411 bc880a130120 patch 8.2.0263: a few new Vim9 messages are not localized Bram Moolenaar <Bram@vim.org> parents: 19392 diff changeset	7221 emsg(_("E1028: compile_def_function failed"));
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7222 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7223
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7224 current_sctx = save_current_sctx;
20538 9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	7225 if (do_estack_push)
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	7226 estack_pop();
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	7227
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7228 free_imported(&cctx);
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	7229 free_locals(&cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7230 ga_clear(&cctx.ctx_type_stack);
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	7231 return ret;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7232 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7233
20532 cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7234 void
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7235 set_function_type(ufunc_T *ufunc)
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7236 {
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7237 int varargs = ufunc->uf_va_name != NULL;
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7238 int argcount = ufunc->uf_args.ga_len;
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7239
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7240 // Create a type for the function, with the return type and any
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7241 // argument types.
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7242 // A vararg is included in uf_args.ga_len but not in uf_arg_types.
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7243 // The type is included in "tt_args".
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7244 if (argcount > 0 \|\| varargs)
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7245 {
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7246 ufunc->uf_func_type = alloc_func_type(ufunc->uf_ret_type,
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7247 argcount, &ufunc->uf_type_list);
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7248 // Add argument types to the function type.
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7249 if (func_type_add_arg_types(ufunc->uf_func_type,
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7250 argcount + varargs,
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7251 &ufunc->uf_type_list) == FAIL)
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7252 return;
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7253 ufunc->uf_func_type->tt_argcount = argcount + varargs;
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7254 ufunc->uf_func_type->tt_min_argcount =
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7255 argcount - ufunc->uf_def_args.ga_len;
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7256 if (ufunc->uf_arg_types == NULL)
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7257 {
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7258 int i;
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7259
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7260 // lambda does not have argument types.
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7261 for (i = 0; i < argcount; ++i)
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7262 ufunc->uf_func_type->tt_args[i] = &t_any;
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7263 }
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7264 else
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7265 mch_memmove(ufunc->uf_func_type->tt_args,
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7266 ufunc->uf_arg_types, sizeof(type_T ) argcount);
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7267 if (varargs)
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7268 {
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7269 ufunc->uf_func_type->tt_args[argcount] =
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7270 ufunc->uf_va_type == NULL ? &t_any : ufunc->uf_va_type;
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7271 ufunc->uf_func_type->tt_flags = TTFLAG_VARARGS;
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7272 }
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7273 }
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7274 else
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7275 // No arguments, can use a predefined type.
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7276 ufunc->uf_func_type = get_func_type(ufunc->uf_ret_type,
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7277 argcount, &ufunc->uf_type_list);
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7278 }
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7279
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7280
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7281 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7282 * Delete an instruction, free what it contains.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7283 */
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7284 void
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7285 delete_instr(isn_T *isn)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7286 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7287 switch (isn->isn_type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7288 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7289 case ISN_EXEC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7290 case ISN_LOADENV:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7291 case ISN_LOADG:
20089 7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	7292 case ISN_LOADB:
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	7293 case ISN_LOADW:
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	7294 case ISN_LOADT:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7295 case ISN_LOADOPT:
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	7296 case ISN_STRINGMEMBER:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7297 case ISN_PUSHEXC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7298 case ISN_PUSHS:
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7299 case ISN_STOREENV:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7300 case ISN_STOREG:
20089 7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	7301 case ISN_STOREB:
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	7302 case ISN_STOREW:
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	7303 case ISN_STORET:
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7304 case ISN_PUSHFUNC:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7305 vim_free(isn->isn_arg.string);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7306 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7307
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7308 case ISN_LOADS:
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7309 case ISN_STORES:
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7310 vim_free(isn->isn_arg.loadstore.ls_name);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7311 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7312
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7313 case ISN_UNLET:
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	7314 case ISN_UNLETENV:
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7315 vim_free(isn->isn_arg.unlet.ul_name);
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7316 break;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7317
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7318 case ISN_STOREOPT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7319 vim_free(isn->isn_arg.storeopt.so_name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7320 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7321
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7322 case ISN_PUSHBLOB: // push blob isn_arg.blob
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7323 blob_unref(isn->isn_arg.blob);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7324 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7325
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7326 case ISN_PUSHJOB:
19562 6b7719b8f9b9 patch 8.2.0338: build failure without the channel feature Bram Moolenaar <Bram@vim.org> parents: 19558 diff changeset	7327 #ifdef FEAT_JOB_CHANNEL
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7328 job_unref(isn->isn_arg.job);
19562 6b7719b8f9b9 patch 8.2.0338: build failure without the channel feature Bram Moolenaar <Bram@vim.org> parents: 19558 diff changeset	7329 #endif
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7330 break;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7331
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7332 case ISN_PUSHCHANNEL:
19562 6b7719b8f9b9 patch 8.2.0338: build failure without the channel feature Bram Moolenaar <Bram@vim.org> parents: 19558 diff changeset	7333 #ifdef FEAT_JOB_CHANNEL
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7334 channel_unref(isn->isn_arg.channel);
19562 6b7719b8f9b9 patch 8.2.0338: build failure without the channel feature Bram Moolenaar <Bram@vim.org> parents: 19558 diff changeset	7335 #endif
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7336 break;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7337
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7338 case ISN_UCALL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7339 vim_free(isn->isn_arg.ufunc.cuf_name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7340 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7341
20283 934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7342 case ISN_FUNCREF:
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7343 {
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7344 dfunc_T dfunc = ((dfunc_T )def_functions.ga_data)
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7345 + isn->isn_arg.funcref.fr_func;
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7346 func_ptr_unref(dfunc->df_ufunc);
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7347 }
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7348 break;
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7349
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7350 case ISN_2BOOL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7351 case ISN_2STRING:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7352 case ISN_ADDBLOB:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7353 case ISN_ADDLIST:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7354 case ISN_BCALL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7355 case ISN_CATCH:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7356 case ISN_CHECKNR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7357 case ISN_CHECKTYPE:
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	7358 case ISN_CHECKLEN:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7359 case ISN_COMPAREANY:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7360 case ISN_COMPAREBLOB:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7361 case ISN_COMPAREBOOL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7362 case ISN_COMPAREDICT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7363 case ISN_COMPAREFLOAT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7364 case ISN_COMPAREFUNC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7365 case ISN_COMPARELIST:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7366 case ISN_COMPARENR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7367 case ISN_COMPARESPECIAL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7368 case ISN_COMPARESTRING:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7369 case ISN_CONCAT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7370 case ISN_DCALL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7371 case ISN_DROP:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7372 case ISN_ECHO:
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7373 case ISN_ECHOERR:
20142 fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	7374 case ISN_ECHOMSG:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7375 case ISN_ENDTRY:
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7376 case ISN_EXECCONCAT:
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7377 case ISN_EXECUTE:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7378 case ISN_FOR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7379 case ISN_INDEX:
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	7380 case ISN_GETITEM:
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	7381 case ISN_SLICE:
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	7382 case ISN_MEMBER:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7383 case ISN_JUMP:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7384 case ISN_LOAD:
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	7385 case ISN_LOADOUTER:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7386 case ISN_LOADSCRIPT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7387 case ISN_LOADREG:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7388 case ISN_LOADV:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7389 case ISN_NEGATENR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7390 case ISN_NEWDICT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7391 case ISN_NEWLIST:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7392 case ISN_OPNR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7393 case ISN_OPFLOAT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7394 case ISN_OPANY:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7395 case ISN_PCALL:
19862 846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19860 diff changeset	7396 case ISN_PCALL_END:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7397 case ISN_PUSHF:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7398 case ISN_PUSHNR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7399 case ISN_PUSHBOOL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7400 case ISN_PUSHSPEC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7401 case ISN_RETURN:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7402 case ISN_STORE:
20295 bc2c9ea94ec1 patch 8.2.0703: Vim9: closure cannot store value in outer context Bram Moolenaar <Bram@vim.org> parents: 20283 diff changeset	7403 case ISN_STOREOUTER:
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7404 case ISN_STOREV:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7405 case ISN_STORENR:
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7406 case ISN_STOREREG:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7407 case ISN_STORESCRIPT:
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	7408 case ISN_STOREDICT:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	7409 case ISN_STORELIST:
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7410 case ISN_THROW:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7411 case ISN_TRY:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7412 // nothing allocated
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7413 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7414 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7415 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7416
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7417 /*
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7418 * Free all instructions for "dfunc".
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7419 */
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7420 static void
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7421 delete_def_function_contents(dfunc_T *dfunc)
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7422 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7423 int idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7424
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7425 ga_clear(&dfunc->df_def_args_isn);
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7426
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7427 if (dfunc->df_instr != NULL)
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7428 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7429 for (idx = 0; idx < dfunc->df_instr_count; ++idx)
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7430 delete_instr(dfunc->df_instr + idx);
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7431 VIM_CLEAR(dfunc->df_instr);
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7432 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7433
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7434 dfunc->df_deleted = TRUE;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7435 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7436
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7437 /*
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	7438 * When a user function is deleted, clear the contents of any associated def
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	7439 * function. The position in def_functions can be re-used.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7440 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7441 void
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	7442 clear_def_function(ufunc_T *ufunc)
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	7443 {
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	7444 if (ufunc->uf_dfunc_idx > 0)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7445 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7446 dfunc_T dfunc = ((dfunc_T )def_functions.ga_data)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7447 + ufunc->uf_dfunc_idx;
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7448
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7449 delete_def_function_contents(dfunc);
20943 1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	7450 ufunc->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: diff changeset	7451 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7452 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7453
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7454 #if defined(EXITFREE) \|\| defined(PROTO)
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7455 /*
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7456 * Free all functions defined with ":def".
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7457 */
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7458 void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7459 free_def_functions(void)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7460 {
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7461 int idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7462
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7463 for (idx = 0; idx < def_functions.ga_len; ++idx)
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7464 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7465 dfunc_T dfunc = ((dfunc_T )def_functions.ga_data) + idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7466
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7467 delete_def_function_contents(dfunc);
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7468 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7469
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7470 ga_clear(&def_functions);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7471 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7472 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7473
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7474
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7475 #endif // FEAT_EVAL

Mercurial > vim

annotate src/vim9compile.c @ 21196:f45ce1ce284c v8.2.1149