vim: src/vim9compile.c annotate

annotate src/vim9compile.c @ 21040:d9e0db9b2b99 v8.2.1071

patch 8.2.1071: Vim9: no line break allowed inside a lambda Commit: https://github.com/vim/vim/commit/e40fbc2ca9fda07332a4da5af1fcaba91bed865b Author: Bram Moolenaar <Bram@vim.org> Date: Sat Jun 27 18:06:45 2020 +0200 patch 8.2.1071: Vim9: no line break allowed inside a lambda Problem: Vim9: no line break allowed inside a lambda. Solution: Handle line break inside a lambda in Vim9 script.

author	Bram Moolenaar <Bram@vim.org>
date	Sat, 27 Jun 2020 18:15:03 +0200
parents	2f8b0812819f
children	8fb0e507491d

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
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	291 check_defined(char_u p, int len, cctx_T cctx)
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 {
19191 133ef7ba4e4e patch 8.2.0154: reallocating the list of scripts is inefficient Bram Moolenaar <Bram@vim.org> parents: 19181 diff changeset	2339 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	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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2342 if (cctx != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2343 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	2344 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2345 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	2346 + idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2347
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2348 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	2349 : 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	2350 && 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	2351 return import;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2352 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2353
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2354 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	2355 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2356 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	2357
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2358 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	2359 : 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	2360 && 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	2361 return import;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2362 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2363 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2364 }
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 /*
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2367 * 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	2368 */
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2369 static void
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2370 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	2371 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2372 int idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2373
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2374 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	2375 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2376 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	2377
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2378 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	2379 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2380 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	2381 }
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 /*
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2384 * 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	2385 */
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2386 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	2387 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	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 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	2390 }
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 /*
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2393 * 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	2394 * 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	2395 * 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	2396 */
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2397 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	2398 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	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 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	2401
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2402 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	2403 {
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2404 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	2405 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	2406
d561e3c6cd65 patch 8.2.1037: Vim9: crash when using line continuation inside :def Bram Moolenaar <Bram@vim.org> parents: 20966 diff changeset	2407 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	2408 break;
d561e3c6cd65 patch 8.2.1037: Vim9: crash when using line continuation inside :def Bram Moolenaar <Bram@vim.org> parents: 20966 diff changeset	2409 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	2410 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	2411 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	2412 }
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2413 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	2414 }
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 /*
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2417 * 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	2418 * 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	2419 * 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	2420 * 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	2421 */
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2422 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	2423 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	2424 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2425 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	2426
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2427 *nextp = NULL;
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2428 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	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 = 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	2431 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	2432 return *nextp;
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2433 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2434 return p;
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2435 }
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 /*
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2438 * 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	2439 * 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	2440 * 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	2441 */
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2442 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	2443 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	2444 {
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	2445 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	2446
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2447 do
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2448 {
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2449 ++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	2450 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	2451 {
de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	2452 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	2453 break;
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	2454 }
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2455 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	2456 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	2457 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	2458 } 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	2459 \|\| (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	2460 return line;
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2461 }
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2462
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2463 /*
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2464 * 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	2465 * 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	2466 * 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	2467 */
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2468 static int
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2469 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	2470 {
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2471 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	2472 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2473 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	2474
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2475 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	2476 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2477 *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	2478 }
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2479 return OK;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2480 }
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2481
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2482 // 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	2483 // 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	2484 // 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	2485 // 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	2486 // 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	2487 // 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	2488 #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	2489 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	2490 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	2491 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	2492 } 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	2493
20336 2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	2494 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	2495 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	2496
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2497 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2498 * 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	2499 * "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	2500 * 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	2501 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2502 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	2503 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	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 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	2506 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2507 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	2508 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2509 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	2510 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2511 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	2512 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	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_SPECIAL:
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_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	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_NUMBER:
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_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	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 #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	2521 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	2522 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	2523 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2524 #endif
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2525 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	2526 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	2527 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	2528 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2529 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	2530 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	2531 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	2532 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2533 default:
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2534 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	2535 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	2536 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	2537 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2538 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	2539 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2540 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	2541 }
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 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2544 * 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	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 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	2547 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	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 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	2550 int ret = OK;
20332 a407e243c55c patch 8.2.0721: Vim9: leaking memory when skipping Bram Moolenaar <Bram@vim.org> parents: 20328 diff changeset	2551 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	2552
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	2553 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	2554 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	2555 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	2556 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	2557 ppconst->pp_used = 0;
20332 a407e243c55c patch 8.2.0721: Vim9: leaking memory when skipping Bram Moolenaar <Bram@vim.org> parents: 20328 diff changeset	2558 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	2559 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	2560 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2561
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2562 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2563 * 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	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 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	2566 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	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 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	2569
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2570 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	2571 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	2572 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	2573 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2574
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2575 /*
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2576 * 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	2577 * leading "s:".
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2578 * 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	2579 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2580 static int
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2581 compile_load_scriptvar(
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2582 cctx_T *cctx,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2583 char_u *name, // variable NUL terminated
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2584 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	2585 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	2586 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	2587 {
19191 133ef7ba4e4e patch 8.2.0154: reallocating the list of scripts is inefficient Bram Moolenaar <Bram@vim.org> parents: 19181 diff changeset	2588 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	2589 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	2590 imported_T *import;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2591
19451 b26e96f7c12f patch 8.2.0283: Vim9: failing to load script var not tested Bram Moolenaar <Bram@vim.org> parents: 19437 diff changeset	2592 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	2593 {
19451 b26e96f7c12f patch 8.2.0283: Vim9: failing to load script var not tested Bram Moolenaar <Bram@vim.org> parents: 19437 diff changeset	2594 // 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	2595 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	2596 &t_any);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2597 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2598 if (idx >= 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2599 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2600 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	2601
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	2602 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	2603 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	2604 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2605 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2606
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2607 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	2608 if (import != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2609 {
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2610 if (import->imp_all)
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2611 {
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2612 char_u p = skipwhite(end);
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2613 int name_len;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2614 ufunc_T *ufunc;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2615 type_T *type;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2616
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2617 // 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	2618 if (*p != '.')
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2619 {
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2620 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	2621 return FAIL;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2622 }
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2623 ++p;
19818 c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2624 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	2625 {
c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2626 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	2627 return FAIL;
c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2628 }
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2629
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2630 idx = find_exported(import->imp_sid, &p, &name_len, &ufunc, &type);
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2631 // 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	2632 if (idx < 0)
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2633 return FAIL;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2634 *end = p;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2635
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2636 generate_VIM9SCRIPT(cctx, ISN_LOADSCRIPT,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2637 import->imp_sid,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2638 idx,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2639 type);
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2640 }
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2641 else
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2642 {
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2643 // 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	2644 generate_VIM9SCRIPT(cctx, ISN_LOADSCRIPT,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2645 import->imp_sid,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2646 import->imp_var_vals_idx,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2647 import->imp_type);
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2648 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2649 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2650 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2651
19530 48e71f948360 patch 8.2.0322: Vim9: error checks not tested Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	2652 if (error)
48e71f948360 patch 8.2.0322: Vim9: error checks not tested Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	2653 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	2654 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2655 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 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 static int
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2658 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	2659 {
20189 63cc54100ae4 patch 8.2.0650: Vim9: script function can be deleted Bram Moolenaar <Bram@vim.org> parents: 20174 diff changeset	2660 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	2661
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2662 if (ufunc == NULL)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2663 return FAIL;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2664
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2665 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	2666 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2667
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2668 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2669 * 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	2670 * "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	2671 * 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	2672 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2673 static int
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2674 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	2675 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2676 type_T *type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2677 char_u *name;
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2678 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	2679 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	2680 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	2681
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2682 if ((arg + 1) == ':')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2683 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2684 // load namespaced variable
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2685 if (end <= *arg + 2)
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2686 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	2687 else
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2688 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	2689 if (name == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2690 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2691
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2692 if (**arg == 'v')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2693 {
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	2694 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	2695 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2696 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	2697 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2698 // 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	2699 // 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	2700 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	2701 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2702 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	2703 {
19530 48e71f948360 patch 8.2.0322: Vim9: error checks not tested Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	2704 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	2705 }
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2706 else if (**arg == 'b')
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2707 {
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	2708 // 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	2709 // 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	2710 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	2711 }
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2712 else if (**arg == 'w')
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2713 {
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	2714 // 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	2715 // 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	2716 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	2717 }
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2718 else if (**arg == 't')
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2719 {
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	2720 // 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	2721 // 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	2722 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	2723 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2724 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2725 {
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2726 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	2727 goto theend;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2728 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2729 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2730 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2731 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2732 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	2733 int idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2734 int gen_load = FALSE;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2735 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	2736
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2737 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	2738 if (name == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2739 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2740
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	2741 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	2742 {
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	2743 if (!gen_load_outer)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	2744 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	2745 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2746 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2747 {
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	2748 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	2749
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	2750 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	2751 {
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	2752 type = lvar->lv_type;
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	2753 idx = lvar->lv_idx;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2754 if (lvar->lv_from_outer)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2755 gen_load_outer = TRUE;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2756 else
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2757 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	2758 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2759 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2760 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2761 // "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	2762 // 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	2763 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	2764 == 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	2765 \|\| 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	2766 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	2767 FALSE);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2768
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2769 // 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	2770 // 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	2771 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	2772 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	2773 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2774 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2775 if (gen_load)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2776 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	2777 if (gen_load_outer)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2778 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	2779 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2780
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2781 *arg = end;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2782
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2783 theend:
19818 c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2784 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	2785 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	2786 vim_free(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2787 return res;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2790 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2791 * 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	2792 * "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	2793 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2794 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2795 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	2796 {
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2797 char_u p = arg;
c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2798 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	2799
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2800 for (;;)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2801 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2802 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	2803 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	2804 if (*p == ')')
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2805 {
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2806 *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	2807 return OK;
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2808 }
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2809
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2810 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	2811 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2812 ++*argcount;
19437 5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2813
5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2814 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	2815 {
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2816 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	2817 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	2818 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2819 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	2820 {
5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2821 ++p;
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2822 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	2823 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	2824 }
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2825 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	2826 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	2827 }
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2828 failret:
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2829 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	2830 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2831 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2832
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2833 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2834 * 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	2835 * "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	2836 * "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	2837 * Instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2838 * EVAL arg1
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2839 * EVAL arg2
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2840 * BCALL / DCALL / UCALL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2841 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2842 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	2843 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	2844 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	2845 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	2846 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	2847 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	2848 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	2849 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2850 char_u name = arg;
19257 5aab9c306181 patch 8.2.0187: reduntant code Bram Moolenaar <Bram@vim.org> parents: 19253 diff changeset	2851 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	2852 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	2853 char_u namebuf[100];
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2854 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	2855 char_u *tofree = NULL;
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2856 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	2857 ufunc_T *ufunc;
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2858 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	2859
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2860 // 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	2861 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	2862 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2863 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	2864 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	2865
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2866 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	2867 if (*s == '"')
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2868 (void)get_string_tv(&s, &argvars[0], TRUE);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2869 else if (*s == '\'')
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2870 (void)get_lit_string_tv(&s, &argvars[0], TRUE);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2871 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	2872 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	2873 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2874 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	2875
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2876 *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	2877 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	2878 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	2879 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	2880 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	2881 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	2882 ++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	2883 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	2884 }
20332 a407e243c55c patch 8.2.0721: Vim9: leaking memory when skipping Bram Moolenaar <Bram@vim.org> parents: 20328 diff changeset	2885 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	2886 }
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 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	2889 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	2890
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2891 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	2892 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2893 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	2894 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2895 }
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2896 vim_strncpy(namebuf, *arg, varlen);
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2897 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	2898
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2899 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	2900 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	2901 goto theend;
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2902
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2903 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	2904 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2905 int idx;
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 // builtin function
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2908 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	2909 if (idx >= 0)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2910 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	2911 else
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2912 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	2913 goto theend;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2914 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2915
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2916 // 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	2917 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	2918 if (ufunc != NULL)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2919 {
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2920 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	2921 goto theend;
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2922 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2923
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2924 // 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	2925 // 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	2926 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	2927 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	2928 && 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	2929 {
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	2930 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	2931 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	2932
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	2933 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	2934 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	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
20140 39a18a0df429 patch 8.2.0625: Vim9: confusing error when calling unknown function Bram Moolenaar <Bram@vim.org> parents: 20138 diff changeset	2938 // 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	2939 // 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	2940 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	2941 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	2942 else
39a18a0df429 patch 8.2.0625: Vim9: confusing error when calling unknown function Bram Moolenaar <Bram@vim.org> parents: 20138 diff changeset	2943 semsg(_(e_unknownfunc), namebuf);
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2944
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2945 theend:
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2946 vim_free(tofree);
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2947 return res;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2948 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2949
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2950 // 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	2951 #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	2952
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2953 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2954 * 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	2955 * 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	2956 * 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	2957 * 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	2958 * valid name.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2959 */
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	2960 static char_u *
ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	2961 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	2962 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2963 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2964
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2965 // 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	2966 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	2967 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2968
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2969 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	2970 // 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	2971 // 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	2972 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	2973 \|\| !namespace
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2974 \|\| 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	2975 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2976 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2977 }
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2980 * Like to_name_end() but also skip over a list or dict constant.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2981 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2982 char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2983 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	2984 {
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	2985 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	2986 typval_T rettv;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2987
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2988 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	2989 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2990
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2991 // Can be "[1, 2, 3]->Func()".
21028 7acceb76669f patch 8.2.1065: Vim9: no line break allowed inside a list Bram Moolenaar <Bram@vim.org> parents: 20988 diff changeset	2992 if (get_list_tv(&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	2993 p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2994 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2995 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	2996 {
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2997 // 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	2998 ++p;
21034 2f8b0812819f patch 8.2.1068: Vim9: no line break allowed inside a dict Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	2999 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	3000 p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3001 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3002 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	3003 {
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	3004 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	3005
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	3006 // Can be "{x -> ret}()".
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	3007 // 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	3008 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	3009 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	3010 if (ret != OK)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3011 p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3012 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3013
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3014 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3015 }
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3018 * 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	3019 * "*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	3020 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3021 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3022 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	3023 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3024 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	3025 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	3026 int count = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3027
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3028 for (;;)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3029 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3030 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	3031 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3032 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	3033 return FAIL;
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3034 }
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3035 if (*p == ']')
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3036 {
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3037 ++p;
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3038 // 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	3039 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	3040 p += STRLEN(p);
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3041 break;
19830 6500dcaf8e1a patch 8.2.0471: missing change to compile_list() Bram Moolenaar <Bram@vim.org> parents: 19822 diff changeset	3042 }
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3043 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	3044 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3045 ++count;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3046 if (*p == ',')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3047 ++p;
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3048 whitep = p;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3049 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3050 }
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3051 *arg = p;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3052
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3053 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	3054 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3055 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3056
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3057 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3058 * 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	3059 * "*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	3060 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3061 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3062 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	3063 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3064 typval_T rettv;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3065 ufunc_T *ufunc;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3066
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3067 // 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	3068 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	3069 return FAIL;
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3070
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3071 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	3072 ++ufunc->uf_refcount;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3073 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	3074 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	3075
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3076 // 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	3077 // Compile it into instructions.
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	3078 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	3079
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	3080 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	3081 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	3082 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3083 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3084
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3085 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3086 * 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	3087 * "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	3088 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3089 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3090 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	3091 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3092 ufunc_T *ufunc;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3093 typval_T rettv;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3094 int argcount = 1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3095 int ret = FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3096
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3097 // 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	3098 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	3099 return FAIL;
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 if (**arg != '(')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3102 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3103 if (skipwhite(arg) == '(')
19760 9daed26b788b patch 8.2.0436: no warnings for incorrect printf arguments Bram Moolenaar <Bram@vim.org> parents: 19726 diff changeset	3104 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	3105 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3106 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	3107 clear_tv(&rettv);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3108 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3109 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3110
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3111 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	3112 ++ufunc->uf_refcount;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3113 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	3114 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	3115
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3116 // 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	3117 // Compile it into instructions.
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	3118 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	3119
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3120 // compile the arguments
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3121 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	3122 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	3123 // 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	3124 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	3125
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3126 return ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3127 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3128
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3129 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3130 * 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	3131 * "*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	3132 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3133 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3134 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	3135 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3136 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	3137 int count = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3138 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	3139 dictitem_T *item;
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3140 char_u whitep = arg;
c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3141 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	3142
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3143 if (d == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3144 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3145 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	3146 for (;;)
19181 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 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	3149
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3150 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	3151 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3152 *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	3153 goto failret;
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3154 }
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3155
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3156 if (**arg == '}')
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3157 break;
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3158
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3159 if (literal)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3160 {
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3161 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	3162
c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3163 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	3164 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3165 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	3166 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3167 }
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3168 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	3169 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	3170 return FAIL;
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3171 *arg = end;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3172 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3173 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3174 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3175 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3176
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3177 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	3178 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3179 // 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	3180 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	3181 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	3182 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	3183 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3184
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3185 // 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	3186 if (key != NULL)
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 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	3189 if (item != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3190 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3191 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	3192 goto failret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3193 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3194 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	3195 if (item != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3196 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3197 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	3198 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	3199 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	3200 dictitem_free(item);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3201 }
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3204 arg = skipwhite(arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3205 if (**arg != ':')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3206 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3207 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	3208 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3209 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3210
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3211 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	3212 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	3213 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	3214 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3215 *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	3216 goto failret;
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3217 }
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3218
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3219 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	3220 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3221 ++count;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3222
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3223 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	3224 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	3225 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	3226 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3227 *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	3228 goto failret;
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3229 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3230 if (**arg == '}')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3231 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3232 if (**arg != ',')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3233 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3234 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	3235 goto failret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3236 }
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3237 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	3238 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	3239 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3240
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3241 arg = arg + 1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3242
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3243 // 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	3244 p = skipwhite(*arg);
c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3245 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	3246 arg += STRLEN(arg);
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3247
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3248 dict_unref(d);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3249 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	3250
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3251 failret:
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3252 if (*arg == NULL)
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3253 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	3254 dict_unref(d);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3255 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3256 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3257
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3258 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3259 * Compile "&option".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3260 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3261 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3262 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	3263 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3264 typval_T rettv;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3265 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	3266 int ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3267
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3268 // 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	3269 rettv.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	3270 ret = get_option_tv(arg, &rettv, TRUE);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3271 if (ret == OK)
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 // include the '&' in the name, get_option_tv() expects it.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3274 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	3275 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	3276
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3277 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	3278 vim_free(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3279 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3280 clear_tv(&rettv);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3281
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3282 return ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3283 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3284
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3285 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3286 * Compile "$VAR".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3287 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3288 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3289 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	3290 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3291 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	3292 int len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3293 int ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3294 char_u *name;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3295
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3296 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3297 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	3298 if (len == 0)
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 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	3301 return FAIL;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3304 // include the '$' in the name, get_env_tv() expects it.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3305 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	3306 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	3307 vim_free(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3308 return ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3309 }
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3312 * Compile "@r".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3313 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3314 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3315 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	3316 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3317 int ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3318
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3319 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3320 if (**arg == NUL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3321 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3322 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	3323 return FAIL;
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 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	3326 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3327 emsg_invreg(**arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3328 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3329 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3330 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	3331 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3332 return 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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3335 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3336 * 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	3337 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3338 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3339 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	3340 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3341 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	3342
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3343 // 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	3344 while (p > start)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3345 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3346 --p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3347 if (p == '-' \|\| p == '+')
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 // 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	3350 #ifdef FEAT_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3351 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	3352 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3353 if (*p == '-')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3354 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	3355 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3356 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3357 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3358 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3359 varnumber_T val;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3360 int error = FALSE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3361
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3362 // 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	3363 // here
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3364 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	3365 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3366 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	3367 clear_tv(rettv);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3368 if (error)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3369 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3370 if (*p == '-')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3371 val = -val;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3372 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	3373 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	3374 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3375 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3376 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3377 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3378 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	3379
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3380 // '!' 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	3381 clear_tv(rettv);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3382 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	3383 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	3384 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3385 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3386 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3387 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3388
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 * 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	3391 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3392 static void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3393 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	3394 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3395 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	3396 {
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 = VVAL_TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3399 *arg += 6;
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 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	3402 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3403 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	3404 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	3405 *arg += 7;
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 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	3408 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3409 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	3410 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	3411 *arg += 6;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3412 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3413 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	3414 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3415 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	3416 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	3417 *arg += 6;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3418 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3419 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3420
20305 9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3421 static exptype_T
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3422 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	3423 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3424 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	3425 int i;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3426
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3427 switch (p[0])
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3428 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3429 case '=': if (p[1] == '=')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3430 type = EXPR_EQUAL;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3431 else if (p[1] == '~')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3432 type = EXPR_MATCH;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3433 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3434 case '!': if (p[1] == '=')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3435 type = EXPR_NEQUAL;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3436 else if (p[1] == '~')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3437 type = EXPR_NOMATCH;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3438 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3439 case '>': if (p[1] != '=')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3440 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3441 type = EXPR_GREATER;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3442 *len = 1;
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 else
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3445 type = EXPR_GEQUAL;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3446 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3447 case '<': if (p[1] != '=')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3448 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3449 type = EXPR_SMALLER;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3450 *len = 1;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3451 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3452 else
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3453 type = EXPR_SEQUAL;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3454 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3455 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	3456 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3457 // "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	3458 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	3459 *len = 5;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3460 i = p[*len];
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3461 if (!isalnum(i) && i != '_')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3462 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3463 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	3464 *type_is = TRUE;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3465 }
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 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3468 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3469 return type;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3470 }
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 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3473 * 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	3474 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3475 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3476 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	3477 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3478 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	3479
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3480 // 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	3481 while (p > start)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3482 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3483 --p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3484 if (p == '-' \|\| p == '+')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3485 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3486 int negate = *p == '-';
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3487 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3488
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3489 // TODO: check type
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3490 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	3491 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3492 --p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3493 if (*p == '-')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3494 negate = !negate;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3495 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3496 // 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	3497 if (negate)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3498 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	3499 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3500 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	3501 if (isn == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3502 return FAIL;
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 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3505 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3506 int invert = TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3507
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3508 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	3509 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3510 --p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3511 invert = !invert;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3512 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3513 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	3514 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3515 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3516 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3517 return OK;
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
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 * 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	3522 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3523 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3524 compile_subscript(
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3525 char_u **arg,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3526 cctx_T *cctx,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3527 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	3528 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	3529 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	3530 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3531 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3532 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3533 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	3534
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3535 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	3536 {
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3537 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	3538
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3539 // 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	3540 // 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	3541 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	3542 && (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	3543 {
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3544 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	3545 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	3546 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	3547 *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	3548 }
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
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3551 if (**arg == '(')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3552 {
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	3553 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	3554 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	3555 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	3556
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3557 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	3558 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3559
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3560 // 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	3561 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	3562
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3563 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	3564 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	3565 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	3566 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	3567 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3568 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3569 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	3570 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3571 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	3572 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3573
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3574 // something->method()
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3575 // 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	3576 // -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	3577 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	3578 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3579 *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	3580
20949 62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3581 p = *arg + 2;
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3582 *arg = skipwhite(p);
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3583 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	3584 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3585 if (**arg == '{')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3586 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3587 // 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	3588 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	3589 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3590 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3591 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3592 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3593 // 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	3594 p = *arg;
36d629aa3d6e patch 8.2.0480: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19830 diff changeset	3595 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	3596 p += 2;
36d629aa3d6e patch 8.2.0480: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19830 diff changeset	3597 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	3598 ;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3599 if (*p != '(')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3600 {
19848 36d629aa3d6e patch 8.2.0480: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19830 diff changeset	3601 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	3602 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3603 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3604 // 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	3605 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	3606 return FAIL;
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 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3609 else if (**arg == '[')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3610 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3611 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	3612 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	3613
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3614 // 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	3615 // 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	3616 // 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	3617 // 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	3618 // 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	3619 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	3620 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3621
20949 62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3622 p = *arg + 1;
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3623 *arg = skipwhite(p);
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3624 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	3625 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	3626 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	3627 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3628
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3629 if (**arg != ']')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3630 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3631 emsg(_(e_missbrac));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3632 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3633 }
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	3634 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	3635
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3636 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	3637 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	3638 {
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3639 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	3640 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	3641 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	3642 return FAIL;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3643 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3644 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	3645 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3646 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	3647 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	3648 return FAIL;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3649 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	3650 return FAIL;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3651 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3652 else
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 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	3655 return FAIL;
f3e8e74cb747 patch 8.2.0269: Vim9: operator after list index does not work Bram Moolenaar <Bram@vim.org> parents: 19411 diff changeset	3656 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3657 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3658 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	3659 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3660 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	3661 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3662
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3663 ++*arg;
20949 62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3664 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	3665 return FAIL;
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3666 // 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	3667 p = *arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3668 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	3669 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	3670 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	3671 if (p == *arg)
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 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	3674 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3675 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3676 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	3677 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3678 *arg = p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3679 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3680 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3681 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3682 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3683
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3684 // 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	3685 // 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	3686 // 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	3687 // 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	3688
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3689 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3690 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3691
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3692 /*
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3693 * 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	3694 * "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	3695 *
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3696 * 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	3697 * 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	3698 *
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3699 * 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	3700 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3701
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3702 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3703 * number number constant
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3704 * 0zFFFFFFFF Blob constant
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3705 * "string" string constant
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3706 * '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	3707 * &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	3708 * @r register contents
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3709 * identifier variable value
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3710 * function() function call
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3711 * $VAR environment variable
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3712 * (expression) nested expression
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3713 * [expr, expr] List
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3714 * {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	3715 * #{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	3716 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3717 * Also handle:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3718 * ! 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	3719 * - 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	3720 * + 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	3721 * 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	3722 * 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	3723 * 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	3724 * 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	3725 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3726 static int
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3727 compile_expr7(
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3728 char_u **arg,
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3729 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	3730 ppconst_T *ppconst)
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3731 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3732 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	3733 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	3734 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	3735 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	3736
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3737 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3738 * 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	3739 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3740 start_leader = *arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3741 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	3742 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	3743 end_leader = *arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3744
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3745 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	3746 switch (**arg)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3747 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3748 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3749 * Number constant.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3750 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3751 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	3752 case '1':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3753 case '2':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3754 case '3':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3755 case '4':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3756 case '5':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3757 case '6':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3758 case '7':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3759 case '8':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3760 case '9':
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3761 case '.': if (get_number_tv(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	3762 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3763 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3764
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 * String constant: "string".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3767 */
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3768 case '"': if (get_string_tv(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	3769 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3770 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3771
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3772 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3773 * 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	3774 */
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3775 case '\'': if (get_lit_string_tv(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	3776 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3777 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3778
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 * Constant Vim variable.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3781 */
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3782 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	3783 ret = NOTDONE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3784 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3785
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3786 /*
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3787 * "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	3788 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3789 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	3790 && !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	3791 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3792 *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	3793 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	3794 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	3795 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3796 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3797 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	3798 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3799
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3800 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3801 * "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	3802 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3803 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	3804 && !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	3805 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3806 *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	3807 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	3808 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	3809 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3810 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3811 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	3812 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3813
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3814 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3815 * List: [expr, expr]
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3816 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3817 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	3818 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3819
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3820 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3821 * 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	3822 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3823 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	3824 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3825 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3826 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	3827 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3828 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3829 ret = NOTDONE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3830 break;
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3833 * 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	3834 * 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	3835 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3836 case '{': {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3837 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	3838
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3839 // Find out what comes after the arguments.
20015 c001ee73519a patch 8.2.0563: Vim9: cannot split a function line Bram Moolenaar <Bram@vim.org> parents: 20013 diff changeset	3840 // TODO: pass getline function
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3841 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	3842 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	3843 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	3844 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	3845 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3846 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	3847 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3848 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3849
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 * Option value: &name
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3852 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3853 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	3854 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3855
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3856 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3857 * Environment variable: $VAR.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3858 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3859 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	3860 break;
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3863 * Register contents: @r.
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 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	3866 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3867 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3868 * nested expression: (expression).
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 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	3871
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3872 // recursive!
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3873 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	3874 {
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3875 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	3876 }
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3877 else
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3878 {
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3879 // 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	3880 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	3881 return FAIL;
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3882 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	3883 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3884 arg = skipwhite(arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3885 if (**arg == ')')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3886 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3887 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	3888 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3889 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	3890 ret = FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3891 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3892 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3893
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3894 default: ret = NOTDONE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3895 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3896 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3897 if (ret == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3898 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3899
20336 2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3900 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	3901 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3902 // 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	3903 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	3904 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3905 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	3906 return FAIL;
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 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	3909
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	3910 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	3911 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	3912 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3913 // 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	3914 // 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	3915 ++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	3916 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3917 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	3918 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3919 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3920 int r;
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 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	3923 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3924 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	3925 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3926 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3927
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3928 // "name" or "name()"
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	3929 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	3930 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	3931 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3932 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	3933 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3934 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	3935 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3936 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	3937 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3938 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	3939 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3940 if (r == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3941 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3942 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3943
20322 a3e78893a90b patch 8.2.0716: Vim9: another memory leak Bram Moolenaar <Bram@vim.org> parents: 20320 diff changeset	3944 // Handle following "[]", ".member", etc.
a3e78893a90b patch 8.2.0716: Vim9: another memory leak Bram Moolenaar <Bram@vim.org> parents: 20320 diff changeset	3945 // 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	3946 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	3947 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	3948 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	3949 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	3950 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3951 // 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	3952 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	3953 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	3954 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	3955 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	3956 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3957 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	3958 return FAIL;
20322 a3e78893a90b patch 8.2.0716: Vim9: another memory leak Bram Moolenaar <Bram@vim.org> parents: 20320 diff changeset	3959 return OK;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3960 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3961
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3962 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3963 * * number multiplication
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3964 * / number division
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3965 * % number modulo
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3966 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3967 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	3968 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	3969 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3970 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	3971 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	3972 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	3973
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3974 // 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	3975 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	3976 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3977
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3978 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3979 * 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	3980 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3981 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3982 {
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	3983 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	3984 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	3985 break;
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	3986 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	3987 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	3988 *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	3989 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	3990 }
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3991
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	3992 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	3993 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3994 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	3995
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3996 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	3997 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	3998 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3999 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4000 *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	4001 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	4002 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4003
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4004 // 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	4005 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	4006 return FAIL;
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4007
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4008 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	4009 && 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	4010 && 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	4011 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4012 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	4013 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	4014 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	4015
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4016 // 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	4017 switch (*op)
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4018 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4019 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	4020 break;
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4021 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	4022 break;
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4023 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	4024 break;
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 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	4027 --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	4028 }
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4029 else
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4030 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4031 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	4032 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	4033 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4034 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4035
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4036 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4037 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4038
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4039 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4040 * + number addition
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4041 * - number subtraction
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4042 * .. string concatenation
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4043 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4044 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	4045 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	4046 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4047 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	4048 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	4049 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	4050 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	4051
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4052 // 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	4053 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	4054 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4055
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4056 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4057 * 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	4058 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4059 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4060 {
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4061 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	4062 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	4063 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4064 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	4065 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	4066 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4067 *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	4068 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	4069 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4070
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4071 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	4072 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4073 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	4074
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4075 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	4076 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	4077 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4078 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4079
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4080 *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	4081 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	4082 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4083
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4084 // 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	4085 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	4086 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	4087
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4088 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	4089 && (*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	4090 ? (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	4091 && 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	4092 : (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	4093 && 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	4094 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4095 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	4096 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	4097
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4098 // 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	4099 if (*op == '+')
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4100 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	4101 else if (*op == '-')
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4102 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	4103 else
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4104 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4105 // concatenate constant strings
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4106 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	4107 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	4108 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	4109
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4110 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	4111 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	4112 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4113 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	4114 return FAIL;
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4115 }
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4116 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	4117 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	4118 vim_free(s1);
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4119 vim_free(s2);
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4120 }
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4121 --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	4122 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4123 else
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4124 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4125 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	4126 if (*op == '.')
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4127 {
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4128 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	4129 \|\| 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	4130 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4131 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	4132 }
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4133 else
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4134 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	4135 }
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4136 }
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4137
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4138 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4139 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4140
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4141 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4142 * expr5a == expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4143 * expr5a =~ expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4144 * expr5a != expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4145 * expr5a !~ expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4146 * expr5a > expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4147 * expr5a >= expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4148 * expr5a < expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4149 * expr5a <= expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4150 * expr5a is expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4151 * expr5a isnot expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4152 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4153 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4154 * 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	4155 * 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	4156 * 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	4157 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4158 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	4159 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	4160 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4161 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	4162 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	4163 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	4164 int len = 2;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4165 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	4166 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	4167
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4168 // 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	4169 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	4170 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4171
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4172 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	4173 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	4174
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4175 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4176 * 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	4177 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4178 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	4179 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4180 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	4181
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4182 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	4183 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4184 *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	4185 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	4186 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4187 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	4188 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4189 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	4190 return FAIL;
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 // 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	4193 if (p[len] == '?')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4194 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4195 ic = TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4196 ++len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4197 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4198 // 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	4199 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	4200 ++len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4201 // 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	4202
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4203 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	4204 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4205 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	4206
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4207 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	4208 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	4209 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4210 }
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 // 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	4213 *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	4214 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	4215 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4216
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4217 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	4218 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4219
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4220 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	4221 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4222 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	4223 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	4224 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	4225
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4226 // 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	4227 // 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	4228 // 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	4229 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	4230 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	4231 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4232 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4233 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	4234 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	4235 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	4236 ? 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	4237 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	4238 --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	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 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	4241 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4242
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4243 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	4244 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	4245 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4246
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4247 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4248 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4249
20334 b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	4250 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	4251
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4252 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4253 * Compile \|\| or &&.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4254 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4255 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	4256 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	4257 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	4258 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	4259 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	4260 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	4261 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	4262 {
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4263 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	4264 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	4265 int opchar = *op;
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 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	4268 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4269 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	4270 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	4271
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4272 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4273 * 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	4274 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4275 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	4276 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	4277 {
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4278 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	4279 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4280 *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	4281 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	4282 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4283
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4284 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	4285 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4286 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	4287 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4288 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4289
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4290 // 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	4291 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	4292
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4293 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	4294 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4295 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	4296 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4297 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4298 (((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	4299 ++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	4300 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	4301 ? 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	4302
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4303 // 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	4304 *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	4305 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	4306 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4307
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4308 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	4309 : 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	4310 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4311 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	4312 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4313 }
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4314
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4315 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	4316 }
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4317 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	4318
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4319 // 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	4320 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	4321 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4322 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4323
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4324 --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	4325 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	4326 + (((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	4327 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	4328 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4329 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	4330 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4331
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4332 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4333 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4334
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 * 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	4337 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4338 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4339 * 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	4340 * 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	4341 * 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	4342 * 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	4343 * 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	4344 * end:
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 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	4347 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	4348 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4349 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	4350
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4351 // 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	4352 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	4353 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4354
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4355 // \|\| 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	4356 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	4357 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4358
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 * 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	4361 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4362 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4363 * 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	4364 * 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	4365 * 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	4366 * 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	4367 * 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	4368 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4369 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4370 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	4371 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	4372 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4373 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	4374
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4375 // 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	4376 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	4377 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4378
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4379 // \|\| 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	4380 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	4381 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4382
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 * 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	4385 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4386 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4387 * 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	4388 * 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	4389 * EVAL expr1a
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4390 * JUMP_ALWAYS end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4391 * alt: EVAL expr1b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4392 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4393 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4394 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	4395 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	4396 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4397 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	4398 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	4399 char_u *next;
20305 9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	4400
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	4401 // 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	4402 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	4403 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4404
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4405 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	4406 if (*p == '?')
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 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	4409 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	4410 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	4411 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	4412 isn_T *isn;
20966 0ee7de260208 patch 8.2.1034: compiler warning for uninitialized variables Bram Moolenaar <Bram@vim.org> parents: 20961 diff changeset	4413 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	4414 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	4415 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	4416 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	4417 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	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 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	4420 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4421 *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	4422 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	4423 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4424
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4425 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	4426 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4427 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	4428 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4429 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4430
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4431 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	4432 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4433 // 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	4434 // 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	4435 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	4436 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	4437 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	4438 --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	4439 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	4440 ? 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	4441 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4442 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4443 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4444 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	4445 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	4446 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4447
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4448 // 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	4449 *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	4450 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	4451 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	4452 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	4453 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4454
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 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	4456 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4457 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	4458
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4459 // 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	4460 --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	4461 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	4462
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4463 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	4464 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	4465
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4466 // 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	4467 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	4468 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	4469 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4470
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4471 // 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	4472 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	4473 if (*p != ':')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4474 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4475 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	4476 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4477 }
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4478 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	4479 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4480 *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	4481 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	4482 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4483
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4484 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	4485 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4486 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	4487 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4488 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4489
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4490 // 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	4491 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	4492 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	4493 ? 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	4494 *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	4495 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	4496 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	4497 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	4498 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4499
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4500 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	4501 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4502 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	4503
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4504 // 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	4505 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	4506 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	4507
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4508 // 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	4509 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	4510 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	4511 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4512
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4513 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	4514 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4515 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	4516 }
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 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4519 * 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	4520 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4521 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	4522 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	4523 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4524 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	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 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	4527 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	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 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	4530 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	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 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	4533 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4534 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4535 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4536
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4537 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4538 * compile "return [expr]"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4539 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4540 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4541 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	4542 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4543 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	4544 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	4545 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	4546
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4547 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	4548 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4549 // 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	4550 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	4551 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4552
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4553 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	4554 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	4555 cctx->ctx_ufunc->uf_ret_type = stack_type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4556 else if (need_type(stack_type, cctx->ctx_ufunc->uf_ret_type, -1, cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4557 == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4558 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4559 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4560 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4561 {
19860 37c4779ca8f5 patch 8.2.0486: Vim9: some code and error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19858 diff changeset	4562 // "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	4563 // 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	4564 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	4565 && 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	4566 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4567 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	4568 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4569 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4570
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4571 // 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	4572 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	4573 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4574
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4575 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	4576 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4577
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4578 // "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	4579 return skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4580 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4581
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4582 /*
20279 49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4583 * 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	4584 * 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	4585 * 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	4586 */
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4587 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	4588 exarg_getline(
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4589 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	4590 void *cookie,
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4591 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	4592 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	4593 {
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4594 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	4595
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4596 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	4597 {
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4598 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	4599 return NULL;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4600 }
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4601 ++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	4602 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	4603 [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	4604 }
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4605
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4606 /*
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4607 * 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	4608 */
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4609 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	4610 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	4611 {
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4612 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	4613 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	4614 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	4615 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	4616 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	4617
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4618 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	4619 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	4620 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	4621 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	4622 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	4623 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	4624
489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	4625 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	4626 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	4627 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	4628 && 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	4629 return NULL;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4630
20281 ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	4631 // 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	4632 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	4633 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	4634
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	4635 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	4636 \|\| 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	4637 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	4638
20305 9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	4639 // 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	4640 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	4641 }
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4642
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4643 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4644 * 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	4645 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4646 int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4647 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	4648 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4649 if (*p == '=')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4650 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4651 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	4652 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4653 *heredoc = TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4654 return 3;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4655 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4656 return 1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4657 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4658 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	4659 return 2;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4660 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	4661 return 3;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4662 return 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4663 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4664
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4665 // 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	4666 static char *reserved[] = {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4667 "true",
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4668 "false",
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4669 NULL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4670 };
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4671
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4672 typedef enum {
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4673 dest_local,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4674 dest_option,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4675 dest_env,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4676 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	4677 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	4678 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	4679 dest_tab,
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4680 dest_vimvar,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4681 dest_script,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4682 dest_reg,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4683 } assign_dest_T;
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4684
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4685 /*
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4686 * 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	4687 */
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4688 static void
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4689 generate_loadvar(
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4690 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	4691 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	4692 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	4693 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	4694 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	4695 {
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4696 switch (dest)
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4697 {
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4698 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	4699 // 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	4700 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	4701 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4702 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	4703 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	4704 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4705 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	4706 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	4707 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4708 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	4709 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	4710 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4711 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	4712 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	4713 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4714 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	4715 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	4716 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	4717 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4718 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	4719 // 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	4720 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	4721 break;
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_reg:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4723 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	4724 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4725 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	4726 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	4727 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4728 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	4729 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	4730 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	4731 NULL, type);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4732 else
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_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	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 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4736 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4737
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4738 void
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4739 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	4740 {
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4741 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	4742
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4743 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	4744 {
20961 0e01976dfd3b patch 8.2.1032: error message for declaring a variable cannot be translated Bram Moolenaar <Bram@vim.org> parents: 20955 diff changeset	4745 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	4746 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	4747 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	4748 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	4749 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	4750 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	4751 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	4752 }
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4753 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	4754 }
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4755
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4756 /*
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4757 * Compile declaration and assignment:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4758 * "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	4759 * "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	4760 * 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	4761 * 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	4762 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4763 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4764 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	4765 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4766 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	4767 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	4768 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	4769 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	4770 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	4771 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	4772 int semicolon = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4773 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	4774 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	4775 char_u *op;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4776 int oplen = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4777 int heredoc = FALSE;
19872 8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	4778 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	4779 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	4780 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	4781 char_u *sp;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4782 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	4783
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4784 // 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	4785 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	4786 if (p == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4787 return *arg == '[' ? arg : NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4788
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4789 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	4790 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4791 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	4792 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4793 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4794
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4795 sp = p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4796 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4797 op = p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4798 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	4799
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4800 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	4801 // 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	4802 return arg;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4803
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4804 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	4805 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4806 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	4807
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4808 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	4809 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	4810 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	4811 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4812
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4813 if (heredoc)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4814 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4815 list_T *l;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4816 listitem_T *li;
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 // [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	4819 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	4820 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	4821 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	4822
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4823 // 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	4824 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	4825 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4826 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	4827 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	4828 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4829 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	4830 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	4831 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	4832 list_free(l);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4833 p += STRLEN(p);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4834 end = p;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4835 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4836 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	4837 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4838 // 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	4839 // list of variables below.
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4840
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4841 p = skipwhite(op + oplen);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4842 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	4843 return NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4844 end = p;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4845
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	4846 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	4847 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4848 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	4849
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	4850 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	4851 : ((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	4852 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	4853 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4854 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	4855 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4856 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4857 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	4858 goto theend;
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	4859 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	4860 semicolon);
20859 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 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4863
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 * 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	4866 * 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	4867 */
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4868 if (var_count > 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4869 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	4870 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4871 var_start = arg;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4872 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	4873 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4874 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	4875 size_t varlen;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4876 int new_local = FALSE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4877 int opt_type;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4878 int opt_flags = 0;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4879 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	4880 int vimvaridx = -1;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4881 lvar_T *lvar = NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4882 lvar_T arg_lvar;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4883 int has_type = FALSE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4884 int has_index = FALSE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4885 int instr_count = -1;
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 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	4888 \|\| *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	4889 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	4890
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4891 // "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	4892 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	4893 --var_end;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4894 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	4895 --p;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4896
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4897 varlen = p - var_start;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4898 vim_free(name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4899 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	4900 if (name == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4901 return NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4902 if (!heredoc)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4903 type = &t_any;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4904
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	4905 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	4906 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4907 if (*var_start == '&')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4908 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4909 int cc;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4910 long numval;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4911
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4912 dest = dest_option;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4913 if (cmdidx == CMD_const)
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 emsg(_(e_const_option));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4916 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4917 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4918 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4919 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4920 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	4921 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4922 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4923 p = var_start;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4924 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	4925 if (p == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4926 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4927 // cannot happen?
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4928 emsg(_(e_letunexp));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4929 goto theend;
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 cc = *p;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4932 *p = NUL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4933 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	4934 NULL, opt_flags);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4935 *p = cc;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4936 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	4937 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4938 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	4939 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4940 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4941 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	4942 type = &t_string;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4943 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4944 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	4945 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4946 else if (*var_start == '$')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4947 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4948 dest = dest_env;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4949 type = &t_string;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4950 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4951 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4952 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	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 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4956 else if (*var_start == '@')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4957 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4958 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	4959 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4960 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	4961 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4962 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4963 dest = dest_reg;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4964 type = &t_string;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4965 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4966 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4967 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	4968 goto theend;
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 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4971 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	4972 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4973 dest = dest_global;
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 (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	4981 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4982 dest = dest_buffer;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4983 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4984 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4985 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	4986 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4987 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4988 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4989 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	4990 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4991 dest = dest_window;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4992 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4993 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4994 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	4995 goto theend;
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 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4998 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	4999 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5000 dest = dest_tab;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5001 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5002 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	5003 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	5004 goto theend;
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 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5007 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	5008 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5009 typval_T *vtv;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5010 int di_flags;
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 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	5013 if (vimvaridx < 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 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	5016 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5017 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5018 // 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	5019 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	5020 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5021 dest = dest_vimvar;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5022 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	5023 type = typval2type(vtv);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5024 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5025 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	5026 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	5027 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5028 }
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 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5031 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5032 int idx;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5033
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5034 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	5035 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	5036 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5037 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	5038 goto theend;
b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	5039 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5040
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5041 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	5042 if (lvar == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5043 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5044 CLEAR_FIELD(arg_lvar);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5045 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	5046 &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	5047 &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	5048 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5049 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5050 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5051 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	5052 goto theend;
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 lvar = &arg_lvar;
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 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5057 if (lvar != NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5058 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5059 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5060 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5061 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	5062 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5063 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5064 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	5065 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5066 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	5067 name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5068 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5069 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5070 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5071 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	5072 \|\| 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	5073 \|\| 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	5074 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5075 dest = dest_script;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5076 if (is_decl)
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	5077 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5078 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	5079 name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5080 goto theend;
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	5081 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5082 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5083 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	5084 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5085 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	5086 name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5087 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5088 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5089 else if (!is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5090 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5091 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	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 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5096
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5097 // 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	5098 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	5099 p = var_end;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5100
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5101 if (dest != dest_option)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5102 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5103 if (is_decl && *p == ':')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5104 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5105 // 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	5106 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	5107 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5108 semsg(_(e_white_after), ":");
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5109 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5110 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5111 p = skipwhite(p + 1);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5112 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	5113 has_type = TRUE;
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 else if (lvar != NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5116 type = lvar->lv_type;
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 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	5120 && 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	5121 && 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	5122 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5123 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	5124 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5125 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5126
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	5127 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	5128 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5129 if (oplen > 1 && !heredoc)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5130 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5131 // +=, /=, 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	5132 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	5133 name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5134 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5135 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5136
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5137 // new local variable
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5138 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	5139 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5140 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	5141 cmdidx == CMD_const, type);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5142 if (lvar == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5143 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5144 new_local = TRUE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5145 }
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 member_type = type;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5148 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	5149 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5150 // 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	5151 if (is_decl)
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 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	5154 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5155 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5156
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5157 if (var_start[varlen] == '[')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5158 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5159 has_index = TRUE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5160 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	5161 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5162 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	5163 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5164 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5165 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	5166 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5167 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5168 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5169 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	5170 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5171 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5172 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5173 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	5174 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5175 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	5176 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5177 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5178
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5179 if (!heredoc)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5180 {
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	5181 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	5182 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5183 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	5184 {
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5185 // 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	5186 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	5187 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	5188 }
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5189 }
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5190 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	5191 {
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5192 type_T *stacktype;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5193
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5194 // 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	5195 if (var_count == 0)
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 int r;
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 // 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	5200 if (*op != '=')
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 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	5203
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5204 if (has_index)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5205 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5206 // 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	5207 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	5208 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5209 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5210 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5211
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5212 // 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	5213 // 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	5214 if (new_local)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5215 --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	5216 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	5217 p = skipwhite(op + oplen);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5218 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	5219 if (new_local)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5220 ++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	5221 if (r == FAIL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5222 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5223 }
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5224 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	5225 {
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5226 // 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	5227 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	5228 goto theend;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5229 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5230 else
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5231 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5232 // 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	5233 // list.
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5234 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	5235 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5236 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5237
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5238 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	5239 : ((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	5240 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	5241 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5242 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	5243 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5244 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	5245 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5246 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	5247 goto theend;
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5248 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5249 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5250 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5251 // 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	5252 // 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	5253 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	5254 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	5255 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	5256 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	5257 else
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5258 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	5259 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5260 }
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5261 else
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5262 {
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5263 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	5264
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5265 if (has_index)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5266 {
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5267 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	5268 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	5269 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	5270 }
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5271 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	5272 == FAIL)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5273 goto theend;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5274 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5275 }
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5276 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	5277 cctx) == FAIL)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5278 goto theend;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5279 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5280 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	5281 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5282 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	5283 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5284 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5285 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	5286 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5287 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	5288 goto theend;
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5289 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5290 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5291 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5292 // variables are always initialized
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5293 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	5294 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5295 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	5296 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5297 case VAR_BOOL:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5298 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	5299 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5300 case VAR_FLOAT:
19336 1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	5301 #ifdef FEAT_FLOAT
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5302 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	5303 #endif
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5304 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5305 case VAR_STRING:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5306 generate_PUSHS(cctx, NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5307 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5308 case VAR_BLOB:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5309 generate_PUSHBLOB(cctx, NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5310 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5311 case VAR_FUNC:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5312 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	5313 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5314 case VAR_LIST:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5315 generate_NEWLIST(cctx, 0);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5316 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5317 case VAR_DICT:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5318 generate_NEWDICT(cctx, 0);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5319 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5320 case VAR_JOB:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5321 generate_PUSHJOB(cctx, NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5322 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5323 case VAR_CHANNEL:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5324 generate_PUSHCHANNEL(cctx, NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5325 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5326 case VAR_NUMBER:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5327 case VAR_UNKNOWN:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5328 case VAR_ANY:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5329 case VAR_PARTIAL:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5330 case VAR_VOID:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5331 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	5332 generate_PUSHNR(cctx, 0);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5333 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5334 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5335 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5336 if (var_count == 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5337 end = p;
19336 1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	5338 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5339
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5340 // 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	5341 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	5342 break;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5343
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5344 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	5345 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5346 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	5347 type_T *stacktype;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5348
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5349 // 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	5350
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5351 if (*op == '.')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5352 expected = &t_string;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5353 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	5354 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	5355 goto theend;
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5356
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5357 if (*op == '.')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5358 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	5359 else
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5360 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5361 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	5362
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5363 if (isn == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5364 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5365 switch (*op)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5366 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5367 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	5368 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	5369 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	5370 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	5371 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	5372 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5373 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5374 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5375
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5376 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	5377 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5378 int r;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5379
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5380 // 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	5381 if (new_local)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5382 --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	5383 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	5384 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	5385 if (new_local)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5386 ++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	5387 if (r == FAIL)
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 if (*skipwhite(p) != ']')
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 emsg(_(e_missbrac));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5392 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5393 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5394 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	5395 && 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	5396 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5397 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	5398 && ((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	5399 != VAR_NUMBER)
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5400 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5401 emsg(_(e_number_exp));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5402 goto theend;
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
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5405 // 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	5406 // - value
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5407 // - index
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5408 // - variable
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5409 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	5410
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5411 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	5412 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5413 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	5414 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5415 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5416 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	5417 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5418 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	5419 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5420 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5421 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5422 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5423 emsg(_(e_listreq));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5424 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5425 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5426 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5427 else
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5428 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5429 switch (dest)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5430 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5431 case dest_option:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5432 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	5433 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5434 case dest_global:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5435 // 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	5436 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	5437 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5438 case dest_buffer:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5439 // 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	5440 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	5441 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5442 case dest_window:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5443 // 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	5444 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	5445 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5446 case dest_tab:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5447 // 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	5448 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	5449 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5450 case dest_env:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5451 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	5452 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5453 case dest_reg:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5454 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	5455 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5456 case dest_vimvar:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5457 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	5458 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5459 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	5460 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5461 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	5462 imported_T *import = NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5463 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	5464 int idx;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5465
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5466 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	5467 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5468 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	5469 if (import != NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5470 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	5471 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5472
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5473 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	5474 // TODO: specific type
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5475 if (idx < 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5476 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5477 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	5478
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5479 // 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	5480 if (name[1] != ':')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5481 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5482 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	5483
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5484 name_s = alloc(len);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5485 if (name_s == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5486 name_s = name;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5487 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5488 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	5489 "s:%s", name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5490 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5491 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	5492 &t_any);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5493 if (name_s != name)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5494 vim_free(name_s);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5495 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5496 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5497 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	5498 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	5499 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5500 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5501 case dest_local:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5502 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	5503 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5504 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	5505 + instr->ga_len - 1;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5506
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5507 // 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	5508 // 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	5509 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	5510 && 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	5511 && 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	5512 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5513 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	5514
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5515 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	5516 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	5517 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	5518 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	5519 --stack->ga_len;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5520 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5521 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	5522 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	5523 NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5524 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5525 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	5526 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5527 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5528 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5529 }
20859 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 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	5532 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	5533 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5534
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5535 // 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	5536 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	5537 {
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5538 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	5539 goto theend;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5540 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5541
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5542 ret = end;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5543
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5544 theend:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5545 vim_free(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5546 return ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5547 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5548
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5549 /*
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5550 * 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	5551 */
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5552 int
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5553 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	5554 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5555 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	5556 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5557 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	5558 return FAIL;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5559 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5560 return OK;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5561 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5562
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5563 /*
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5564 * Callback passed to ex_unletlock().
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5565 */
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5566 static int
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5567 compile_unlet(
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5568 lval_T *lvp,
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5569 char_u *name_end,
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5570 exarg_T *eap,
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5571 int deep UNUSED,
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5572 void *coookie)
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5573 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5574 cctx_T *cctx = coookie;
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 if (lvp->ll_tv == NULL)
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5577 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5578 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	5579 int cc = *name_end;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5580 int ret = OK;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5581
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5582 // 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	5583 *name_end = NUL;
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	5584 if (*p == '$')
058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	5585 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	5586 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	5587 ret = FAIL;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5588 else
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	5589 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	5590
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5591 *name_end = cc;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5592 return ret;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5593 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5594
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5595 // TODO: unlet {list}[idx]
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5596 // TODO: unlet {dict}[key]
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5597 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	5598 return FAIL;
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
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 * 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	5603 * "arg" points to "var".
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5604 */
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5605 static char_u *
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5606 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	5607 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5608 char_u *p = arg;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5609
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5610 if (eap->cmdidx != CMD_unlet)
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5611 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5612 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	5613 return NULL;
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
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5616 if (*p == '!')
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 p = skipwhite(p + 1);
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5619 eap->forceit = TRUE;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5620 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5621
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5622 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	5623 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	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 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5627 * 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	5628 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5629 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5630 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	5631 {
19623 2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	5632 return handle_import(arg, &cctx->ctx_imports, 0, cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5633 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5634
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5635 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5636 * 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	5637 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5638 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5639 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	5640 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5641 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	5642 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	5643
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5644 if (endlabel == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5645 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5646 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	5647 *el = endlabel;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5648 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	5649
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5650 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	5651 return OK;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5654 static void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5655 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	5656 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5657 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	5658
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5659 while (*el != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5660 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5661 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	5662 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5663
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5664 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	5665 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	5666 *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	5667 vim_free(cur);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5668 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5669 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5670
19896 92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5671 static void
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5672 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	5673 {
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5674 while (*el != NULL)
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5675 {
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5676 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	5677
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5678 *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	5679 vim_free(cur);
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5680 }
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5681 }
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5682
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5683 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5684 * 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	5685 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5686 static scope_T *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5687 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	5688 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5689 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	5690
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5691 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5692 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5693 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	5694 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	5695 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	5696 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	5697 return scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5698 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5699
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5700 /*
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5701 * 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	5702 */
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5703 static void
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5704 drop_scope(cctx_T *cctx)
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5705 {
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5706 scope_T *scope = cctx->ctx_scope;
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5707
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5708 if (scope == NULL)
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5709 {
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5710 iemsg("calling drop_scope() without a scope");
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5711 return;
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5712 }
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5713 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	5714 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	5715 {
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5716 case IF_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5717 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	5718 case FOR_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5719 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	5720 case WHILE_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5721 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	5722 case TRY_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5723 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	5724 case NO_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5725 case BLOCK_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5726 break;
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5727 }
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5728 vim_free(scope);
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
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5731 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5732 * compile "if expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5733 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5734 * "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	5735 * 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	5736 * 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	5737 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5738 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5739 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5740 * "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	5741 * 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	5742 * 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	5743 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5744 * JUMP_ALWAYS end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5745 * else:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5746 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5747 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5748 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5749 * "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	5750 * 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	5751 * 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	5752 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5753 * JUMP_ALWAYS end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5754 * elseif:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5755 * 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	5756 * 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	5757 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5758 * JUMP_ALWAYS end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5759 * else:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5760 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5761 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5762 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5763 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5764 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	5765 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5766 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	5767 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	5768 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	5769 scope_T *scope;
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5770 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	5771 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	5772
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5773 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	5774 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	5775 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5776 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	5777 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	5778 }
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5779 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	5780 clear_ppconst(&ppconst);
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5781 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	5782 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5783 // 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	5784 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	5785 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	5786 }
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5787 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	5788 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5789 // 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	5790 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	5791 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	5792 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	5793 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5794
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5795 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	5796 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5797 return NULL;
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5798 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	5799 // "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	5800 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	5801
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5802 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	5803 {
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5804 // "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	5805 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	5806 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	5807 }
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5808 else
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5809 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	5810
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5811 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5812 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5813
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5814 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5815 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	5816 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5817 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	5818 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	5819 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	5820 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5821 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	5822 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	5823
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5824 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	5825 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5826 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	5827 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5828 }
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	5829 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	5830 if (!cctx->ctx_had_return)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5831 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	5832
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5833 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	5834 {
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5835 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	5836 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	5837 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	5838 // 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	5839 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	5840 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	5841 }
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5842
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5843 // 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	5844 CLEAR_FIELD(ppconst);
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5845 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	5846 {
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5847 clear_ppconst(&ppconst);
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5848 return NULL;
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5849 }
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5850 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	5851 clear_ppconst(&ppconst);
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5852 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	5853 {
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5854 // 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	5855 // 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	5856 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	5857 clear_ppconst(&ppconst);
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5858 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	5859 }
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5860 else
20334 b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5861 {
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5862 // 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	5863 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	5864 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	5865 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	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 // "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	5868 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	5869 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	5870 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5871
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5872 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5873 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5874
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5875 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5876 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	5877 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5878 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	5879 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	5880 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5881 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	5882
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5883 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	5884 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5885 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	5886 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5887 }
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	5888 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	5889 if (!cctx->ctx_had_return)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5890 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	5891 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	5892
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5893 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	5894 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5895 // 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	5896 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	5897 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5898 if (!cctx->ctx_had_return
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5899 && 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	5900 JUMP_ALWAYS, cctx) == FAIL)
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5901 return NULL;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5902 }
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5903
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5904 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	5905 {
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5906 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	5907 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5908 // 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	5909 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	5910 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	5911 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	5912 }
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5913 }
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5914
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5915 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	5916 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	5917 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5918
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5919 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5920 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5921
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5922 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5923 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	5924 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5925 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	5926 ifscope_T *ifscope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5927 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	5928 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5929
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5930 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	5931 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5932 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	5933 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5934 }
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	5935 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	5936 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	5937 if (!cctx->ctx_had_return)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5938 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	5939
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5940 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	5941 {
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5942 // 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	5943 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	5944 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	5945 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5946 // 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	5947 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	5948 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	5949
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5950 // 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	5951 // had_return flag is set.
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5952 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	5953
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5954 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	5955 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5956 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5957
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5958 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5959 * 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	5960 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5961 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5962 * PUSHNR -1
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5963 * 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	5964 * 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	5965 * 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	5966 * - 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	5967 * - 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	5968 * 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	5969 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5970 * 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	5971 * 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	5972 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5973 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5974 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5975 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	5976 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5977 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5978 size_t varlen;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5979 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	5980 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	5981 scope_T *scope;
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	5982 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	5983 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	5984 type_T *vartype;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5985
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5986 // 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	5987 // parse "var"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5988 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	5989 ;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5990 varlen = p - arg;
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	5991 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	5992 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	5993 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5994 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	5995 return NULL;
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 // consume "in"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5999 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6000 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	6001 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6002 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	6003 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6004 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6005 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	6006
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6007
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6008 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	6009 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6010 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6011
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6012 // 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	6013 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	6014 if (loop_lvar == NULL)
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6015 {
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6016 // out of memory
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6017 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	6018 return NULL;
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6019 }
19181 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 // 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	6022 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	6023 if (var_lvar == NULL)
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6024 {
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6025 // 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	6026 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	6027 return NULL;
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6028 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6029
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6030 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	6031
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6032 // 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	6033 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	6034 if (compile_expr0(&arg, cctx) == FAIL)
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6035 {
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6036 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	6037 return NULL;
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6038 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6039
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6040 // now we know the type of "var"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6041 vartype = ((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	6042 if (vartype->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	6043 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6044 emsg(_("E1024: need a List to iterate over"));
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6045 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	6046 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6047 }
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	6048 if (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	6049 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	6050
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6051 // "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	6052 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	6053
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6054 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	6055 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	6056
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6057 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6058 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6059
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6060 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6061 * compile "endfor"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6062 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6063 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6064 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	6065 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6066 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	6067 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	6068 forscope_T *forscope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6069 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6070
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6071 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	6072 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6073 emsg(_(e_for));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6074 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6075 }
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6076 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	6077 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	6078 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	6079
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6080 // 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	6081 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	6082
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6083 // 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	6084 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	6085 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	6086
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6087 // 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	6088 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	6089
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6090 // 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	6091 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	6092 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6093
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6094 vim_free(scope);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6095
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6096 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6097 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6098
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6099 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6100 * compile "while expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6101 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6102 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6103 * 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	6104 * 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	6105 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6106 * 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	6107 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6108 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6109 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6110 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6111 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	6112 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6113 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	6114 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	6115 scope_T *scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6116
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6117 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	6118 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6119 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6120
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6121 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	6122
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6123 // 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	6124 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	6125 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6126
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6127 // "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	6128 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	6129 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	6130 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6131
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6132 return p;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6135 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6136 * compile "endwhile"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6137 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6138 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6139 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	6140 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6141 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	6142
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6143 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	6144 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6145 emsg(_(e_while));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6146 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6147 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6148 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	6149 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	6150
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6151 // 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	6152 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	6153
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6154 // 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	6155 // 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	6156 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	6157
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6158 vim_free(scope);
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 return arg;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6163 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6164 * compile "continue"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6165 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6166 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6167 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	6168 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6169 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	6170
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6171 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6172 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6173 if (scope == NULL)
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 emsg(_(e_continue));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6176 return NULL;
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 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	6179 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6180 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	6181 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6182
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6183 // 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	6184 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	6185 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	6186 : 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	6187 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6188 }
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6191 * compile "break"
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 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6194 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	6195 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6196 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	6197 endlabel_T **el;
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 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6200 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6201 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6202 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6203 emsg(_(e_break));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6204 return NULL;
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 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	6207 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6208 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	6209 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6210
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6211 // 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	6212 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	6213 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	6214 else
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6215 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	6216 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	6217 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6218
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6219 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6220 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6221
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 * 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	6224 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6225 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6226 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	6227 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6228 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	6229 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6230 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	6231 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6232
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 * 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	6235 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6236 static void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6237 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	6238 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6239 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	6240
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6241 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	6242 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	6243 vim_free(scope);
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 "try"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6248 * 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	6249 * finally.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6250 * 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	6251 * 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	6252 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6253 * "try"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6254 * 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	6255 * ... try block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6256 * "throw {exception}"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6257 * EVAL {exception}
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6258 * THROW create exception
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6259 * ... try block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6260 * " catch {expr}"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6261 * JUMP -> finally
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6262 * catch1: PUSH exeception
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6263 * EVAL {expr}
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6264 * MATCH
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6265 * JUMP nomatch -> catch2
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6266 * CATCH remove exception
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6267 * ... catch block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6268 * " catch"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6269 * JUMP -> finally
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6270 * 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	6271 * ... catch block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6272 * " finally"
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 * ... finally block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6275 * " endtry"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6276 * 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	6277 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6278 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6279 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	6280 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6281 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	6282 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	6283 scope_T *scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6284
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6285 // 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	6286 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	6287 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	6288 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6289
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6290 // "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	6291 // "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	6292 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	6293 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	6294 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6295
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6296 // 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	6297 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	6298 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6299 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6300
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6301 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6302 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6303
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 * compile "catch {expr}"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6306 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6307 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6308 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	6309 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6310 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	6311 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	6312 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6313 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6314
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6315 // 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	6316 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	6317 compile_endblock(cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6318 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	6319
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6320 // 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	6321 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	6322 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6323 emsg(_(e_catch));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6324 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6325 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6326
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6327 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	6328 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6329 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	6330 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6331 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6332
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6333 // 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	6334 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	6335 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	6336 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6337
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6338 // 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	6339 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	6340 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	6341 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	6342 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	6343 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6344 // 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	6345 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	6346 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	6347 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6348
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6349 p = skipwhite(arg);
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	6350 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	6351 {
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6352 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	6353 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	6354 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6355 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6356 {
19316 17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6357 char_u *end;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6358 char_u *pat;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6359 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	6360 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	6361 int len;
19316 17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6362
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6363 // 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	6364 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	6365
19892 5feb426d2ea1 patch 8.2.0502: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19884 diff changeset	6366 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	6367 if (end != p)
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6368 {
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6369 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	6370 vim_free(tofree);
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6371 return FAIL;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6372 }
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6373 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	6374 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	6375 else
19892 5feb426d2ea1 patch 8.2.0502: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19884 diff changeset	6376 len = (int)(end - tofree);
5feb426d2ea1 patch 8.2.0502: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19884 diff changeset	6377 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	6378 vim_free(tofree);
19892 5feb426d2ea1 patch 8.2.0502: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19884 diff changeset	6379 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	6380 if (pat == NULL)
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6381 return FAIL;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6382 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	6383 return FAIL;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6384
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6385 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	6386 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6387
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6388 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	6389 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	6390 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6391 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6392
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6393 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	6394 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6395
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6396 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	6397 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6398 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6399 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6400
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6401 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6402 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	6403 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6404 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	6405 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	6406 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6407
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6408 // 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	6409 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	6410 compile_endblock(cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6411 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	6412
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6413 // 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	6414 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	6415 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6416 emsg(_(e_finally));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6417 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6418 }
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 // 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	6421 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	6422 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	6423 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6424 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	6425 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6426 }
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 // 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	6429 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	6430
19894 ea4f8e789627 patch 8.2.0503: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19892 diff changeset	6431 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	6432 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	6433 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6434 // 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	6435 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	6436 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	6437 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6438
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6439 // 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	6440
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6441 return arg;
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 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6445 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	6446 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6447 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	6448 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	6449 isn_T *isn;
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 // 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	6452 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	6453 compile_endblock(cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6454 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	6455
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6456 // 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	6457 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	6458 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6459 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6460 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	6461 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	6462 emsg(_(e_endwhile));
19213 b18437efabac patch 8.2.0165: Coverity warning for using NULL pointer Bram Moolenaar <Bram@vim.org> parents: 19193 diff changeset	6463 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	6464 emsg(_(e_endfor));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6465 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6466 emsg(_(e_endif));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6467 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6468 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6469
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6470 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	6471 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	6472 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6473 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	6474 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6475 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6476
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6477 // 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	6478 // by ":finally".
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6479 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	6480
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6481 // 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	6482 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	6483 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	6484 compile_endblock(cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6485
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6486 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	6487 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6488 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6489 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6490
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6491 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6492 * compile "throw {expr}"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6493 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6494 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6495 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	6496 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6497 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	6498
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	6499 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	6500 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6501 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	6502 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6503 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	6504 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6505
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6506 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6507 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6508
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 * 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	6511 * 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	6512 * 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	6513 * 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	6514 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6515 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	6516 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	6517 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6518 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	6519 int count = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6520
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	6521 for (;;)
19181 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 ++count;
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	6526 p = skipwhite(p);
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	6527 if (ends_excmd(*p))
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	6528 break;
19181 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
20142 fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6531 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	6532 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	6533 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	6534 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	6535 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	6536 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	6537 else
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6538 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	6539 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6540 }
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 /*
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6543 * 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	6544 */
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6545 static char_u *
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6546 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	6547 {
20172 1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6548 char_u *p;
20174 72b437855299 patch 8.2.0642: Vim9: using invalid index Bram Moolenaar <Bram@vim.org> parents: 20172 diff changeset	6549 int has_expr = FALSE;
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6550
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	6551 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	6552 goto theend;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6553
20174 72b437855299 patch 8.2.0642: Vim9: using invalid index Bram Moolenaar <Bram@vim.org> parents: 20172 diff changeset	6554 if (eap->cmdidx >= 0 && eap->cmdidx < CMD_SIZE)
72b437855299 patch 8.2.0642: Vim9: using invalid index Bram Moolenaar <Bram@vim.org> parents: 20172 diff changeset	6555 has_expr = (excmd_get_argt(eap->cmdidx) & (EX_XFILE \| EX_EXPAND));
20172 1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6556 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	6557 {
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6558 // 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	6559 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	6560 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	6561 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	6562 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	6563 }
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6564
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6565 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	6566 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6567 int count = 0;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6568 char_u *start = skipwhite(line);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6569
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6570 // :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	6571 // PUSHS ":cmd xxx"
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6572 // eval expr1
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6573 // PUSHS "yyy"
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6574 // eval expr2
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6575 // PUSHS "zzz"
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6576 // EXECCONCAT 5
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6577 for (;;)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6578 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6579 if (p > start)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6580 {
20830 9064044fd4f6 patch 8.2.0967: unnecessary type casts for vim_strnsave() Bram Moolenaar <Bram@vim.org> parents: 20538 diff changeset	6581 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	6582 ++count;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6583 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6584 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	6585 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	6586 return NULL;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6587 may_generate_2STRING(-1, cctx);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6588 ++count;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6589 p = skipwhite(p);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6590 if (*p != '`')
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6591 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6592 emsg(_("E1083: missing backtick"));
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6593 return NULL;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6594 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6595 start = p + 1;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6596
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6597 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	6598 if (p == NULL)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6599 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6600 if (*skipwhite(start) != NUL)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6601 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6602 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	6603 ++count;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6604 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6605 break;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6606 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6607 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6608 generate_EXECCONCAT(cctx, count);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6609 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6610 else
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6611 generate_EXEC(cctx, line);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6612
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6613 theend:
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6614 return (char_u *)"";
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6615 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6616
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6617 /*
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	6618 * 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	6619 * 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	6620 */
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	6621 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	6622 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	6623 {
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6624 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	6625
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	6626 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	6627 {
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6628 // 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	6629 // 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	6630 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	6631 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	6632 ++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	6633 }
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6634
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	6635 // 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	6636 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	6637 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	6638 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	6639 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	6640 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	6641 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	6642 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	6643 ++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	6644 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	6645 }
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6646
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6647 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6648 * 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	6649 * 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	6650 * 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	6651 * 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	6652 * 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	6653 * "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	6654 * 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	6655 * "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	6656 * 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	6657 */
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	6658 int
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	6659 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	6660 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6661 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	6662 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6663 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	6664 cctx_T cctx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6665 garray_T *instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6666 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	6667 int ret = FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6668 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	6669 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	6670 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	6671
20538 9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6672 // 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	6673 // 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	6674 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	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 = ((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	6677 + 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	6678 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	6679 }
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6680 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	6681 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6682
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 20005 diff changeset	6683 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	6684 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	6685 cctx.ctx_lnum = -1;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	6686 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	6687 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	6688 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	6689 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	6690 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	6691 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	6692 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	6693
20538 9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6694 // 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	6695 // 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	6696 // 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	6697 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	6698 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	6699
20538 9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6700 // 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	6701 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	6702 if (do_estack_push)
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6703 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	6704
19328 e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6705 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	6706 {
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6707 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	6708 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	6709 int i;
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6710 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	6711 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	6712
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6713 // 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	6714 // 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	6715 // 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	6716 // of arguments.
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6717 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	6718 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	6719 goto erret;
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6720 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	6721 {
19946 8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6722 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	6723 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	6724 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	6725
19328 e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6726 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	6727 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	6728 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	6729 goto erret;
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6730
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6731 // 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	6732 // 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	6733 // specified type.
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6734 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	6735 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	6736 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	6737 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	6738 == FAIL)
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6739 {
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6740 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	6741 arg_idx + 1);
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6742 goto erret;
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6743 }
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6744
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6745 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	6746 goto erret;
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6747 }
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6748 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	6749 }
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6750
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6751 /*
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6752 * 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	6753 */
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6754 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6755 {
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6756 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	6757 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	6758 char_u *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	6759
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	6760 // 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	6761 // 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	6762 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	6763 goto erret;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	6764
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6765 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	6766 // 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	6767 ++line;
20949 62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	6768 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	6769 && !(*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	6770 \|\| 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	6771 {
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	6772 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	6773 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6774 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6775 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6776 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	6777 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	6778 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	6779 // 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	6780 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6781 }
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	6782 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	6783
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 20005 diff changeset	6784 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	6785 ea.cmdlinep = &line;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6786 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	6787
20055 686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6788 // 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	6789 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	6790 {
20055 686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6791 case '#':
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6792 // "#" 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	6793 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	6794 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6795 line = (char_u *)"";
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6796 continue;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6797 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6798 break;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6799
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6800 case '}':
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6801 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6802 // "}" 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	6803 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	6804 ? 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	6805
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6806 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	6807 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6808 compile_endblock(&cctx);
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6809 line = ea.cmd;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6810 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6811 else
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6812 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6813 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	6814 goto erret;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6815 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6816 if (line != NULL)
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6817 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	6818 continue;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6819 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6820
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6821 case '{':
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6822 // "{" 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	6823 // "{'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	6824 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	6825 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6826 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	6827 continue;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6828 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6829 break;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6830
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6831 case ':':
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6832 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	6833 break;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6834 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6835
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6836 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6837 * COMMAND MODIFIERS
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6838 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6839 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	6840 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6841 if (errormsg != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6842 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6843 // 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	6844 line = (char_u *)"";
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6845 continue;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6846 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6847
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6848 // 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	6849 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	6850 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	6851
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6852 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	6853 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6854 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	6855
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	6856 // 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	6857 // 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	6858 // 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	6859 // 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	6860 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	6861 ? 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	6862 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	6863 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	6864 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6865 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	6866 int oplen;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6867 int heredoc;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6868
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6869 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	6870 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	6871 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	6872 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	6873 {
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	6874 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	6875
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	6876 // 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	6877 // 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	6878 // "g:var = expr"
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	6879 // "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	6880 // "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	6881 // "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	6882 // "&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	6883 // "$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	6884 // "@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	6885 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	6886 \|\| *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	6887 \|\| *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	6888 \|\| ((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	6889 \|\| 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	6890 \|\| 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	6891 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	6892 \|\| 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	6893 \|\| 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	6894 {
b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6895 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	6896 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	6897 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	6898 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	6899 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6900 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6901 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6902
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6903 if (*ea.cmd == '[')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6904 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6905 // [var, var] = expr
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6906 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	6907 if (line == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6908 goto erret;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6909 if (line != ea.cmd)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6910 continue;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6911 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6912 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6913
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6914 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6915 * COMMAND after range
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6916 */
20982 bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	6917 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	6918 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	6919 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	6920 {
bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	6921 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	6922 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	6923 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6924 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	6925 : (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	6926 &cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6927
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6928 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	6929 {
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	6930 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	6931 {
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	6932 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	6933 continue;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	6934 }
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	6935
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6936 // Expression or function call.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6937 if (ea.cmdidx == CMD_eval)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6938 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6939 p = ea.cmd;
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	6940 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	6941 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6942
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6943 // drop the return value
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6944 generate_instr_drop(&cctx, ISN_DROP, 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6945 line = p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6946 continue;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6947 }
19894 ea4f8e789627 patch 8.2.0503: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19892 diff changeset	6948 // CMD_let cannot happen, compile_assignment() above is used
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6949 iemsg("Command from find_ex_command() not handled");
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6950 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6951 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6952
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6953 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6954
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	6955 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	6956 && 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	6957 && 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	6958 && 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	6959 && 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	6960 {
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6961 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	6962 continue;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	6963 }
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	6964
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6965 if (ea.cmdidx != CMD_elseif
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6966 && ea.cmdidx != CMD_else
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6967 && ea.cmdidx != CMD_endif
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6968 && ea.cmdidx != CMD_endfor
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6969 && ea.cmdidx != CMD_endwhile
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6970 && ea.cmdidx != CMD_catch
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6971 && ea.cmdidx != CMD_finally
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6972 && ea.cmdidx != CMD_endtry)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6973 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6974 if (cctx.ctx_had_return)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6975 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6976 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	6977 goto erret;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6978 }
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6979 }
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	6980
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6981 switch (ea.cmdidx)
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 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	6984 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	6985 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	6986 break;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	6987
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6988 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	6989 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	6990 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6991
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6992 case CMD_return:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6993 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	6994 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	6995 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6996
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6997 case CMD_let:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6998 case CMD_const:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6999 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	7000 if (line == p)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	7001 line = NULL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7002 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7003
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7004 case CMD_unlet:
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7005 case CMD_unlockvar:
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7006 case CMD_lockvar:
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7007 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	7008 break;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7009
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7010 case CMD_import:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7011 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	7012 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7013
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7014 case CMD_if:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7015 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	7016 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7017 case CMD_elseif:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7018 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	7019 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	7020 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7021 case CMD_else:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7022 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	7023 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	7024 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7025 case CMD_endif:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7026 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	7027 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7028
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7029 case CMD_while:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7030 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	7031 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7032 case CMD_endwhile:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7033 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	7034 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	7035 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7036
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7037 case CMD_for:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7038 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	7039 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7040 case CMD_endfor:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7041 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	7042 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	7043 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7044 case CMD_continue:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7045 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	7046 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7047 case CMD_break:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7048 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	7049 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7050
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7051 case CMD_try:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7052 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	7053 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7054 case CMD_catch:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7055 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	7056 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	7057 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7058 case CMD_finally:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7059 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	7060 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	7061 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7062 case CMD_endtry:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7063 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	7064 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	7065 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7066 case CMD_throw:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7067 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	7068 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7069
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7070 case CMD_echo:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7071 case CMD_echon:
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	7072 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	7073 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	7074 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	7075 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	7076 break;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7077
20982 bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	7078 // 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	7079
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7080 default:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7081 // 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	7082 ea.arg = p;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7083 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	7084 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7085 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7086 if (line == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7087 goto erret;
19894 ea4f8e789627 patch 8.2.0503: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19892 diff changeset	7088 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	7089
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7090 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	7091 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7092 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	7093 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7094 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7095 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7096
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7097 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	7098 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7099 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	7100 emsg(_(e_endif));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7101 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	7102 emsg(_(e_endwhile));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7103 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	7104 emsg(_(e_endfor));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7105 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7106 emsg(_("E1026: Missing }"));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7107 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7108 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7109
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7110 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	7111 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7112 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	7113 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7114 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	7115 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7116 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7117
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7118 // 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	7119 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	7120 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	7121 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7122
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	7123 {
8288884fdfe1 patch 8.2.0488: Vim9: compiling can break when using a lambda inside :def Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	7124 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	7125 + 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	7126 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	7127 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	7128 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	7129 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	7130 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	7131 if (cctx.ctx_outer_used)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	7132 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	7133 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	7134 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7135
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7136 ret = OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7137
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7138 erret:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7139 if (ret == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7140 {
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7141 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	7142 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	7143 + 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	7144
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7145 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	7146 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	7147 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	7148
20534 ae758aa4ee5e patch 8.2.0821: Vim9: memory leak in expr test Bram Moolenaar <Bram@vim.org> parents: 20532 diff changeset	7149 // 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	7150 if (!dfunc->df_deleted
ae758aa4ee5e patch 8.2.0821: Vim9: memory leak in expr test Bram Moolenaar <Bram@vim.org> parents: 20532 diff changeset	7151 && 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	7152 --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	7153 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	7154
19896 92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	7155 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	7156 drop_scope(&cctx);
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	7157
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7158 // 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	7159 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	7160
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7161 if (errormsg != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7162 emsg(errormsg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7163 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	7164 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	7165 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7166
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7167 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	7168 if (do_estack_push)
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	7169 estack_pop();
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	7170
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7171 free_imported(&cctx);
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	7172 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	7173 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	7174 return ret;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7175 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7176
20532 cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7177 void
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7178 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	7179 {
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7180 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	7181 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	7182
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7183 // 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	7184 // argument types.
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7185 // 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	7186 // 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	7187 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	7188 {
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7189 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	7190 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	7191 // 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	7192 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	7193 argcount + varargs,
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7194 &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	7195 return;
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7196 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	7197 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	7198 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	7199 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	7200 {
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7201 int i;
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7202
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7203 // 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	7204 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	7205 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	7206 }
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7207 else
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7208 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	7209 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	7210 if (varargs)
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7211 {
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7212 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	7213 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	7214 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	7215 }
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7216 }
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7217 else
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7218 // 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	7219 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	7220 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	7221 }
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7222
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7223
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7224 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7225 * 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	7226 */
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7227 void
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7228 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	7229 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7230 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	7231 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7232 case ISN_EXEC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7233 case ISN_LOADENV:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7234 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	7235 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	7236 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	7237 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	7238 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	7239 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	7240 case ISN_PUSHEXC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7241 case ISN_PUSHS:
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7242 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	7243 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	7244 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	7245 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	7246 case ISN_STORET:
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7247 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	7248 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	7249 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7250
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7251 case ISN_LOADS:
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7252 case ISN_STORES:
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7253 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	7254 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7255
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7256 case ISN_UNLET:
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	7257 case ISN_UNLETENV:
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7258 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	7259 break;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7260
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7261 case ISN_STOREOPT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7262 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	7263 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7264
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7265 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	7266 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	7267 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7268
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7269 case ISN_PUSHJOB:
19562 6b7719b8f9b9 patch 8.2.0338: build failure without the channel feature Bram Moolenaar <Bram@vim.org> parents: 19558 diff changeset	7270 #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	7271 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	7272 #endif
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7273 break;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7274
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7275 case ISN_PUSHCHANNEL:
19562 6b7719b8f9b9 patch 8.2.0338: build failure without the channel feature Bram Moolenaar <Bram@vim.org> parents: 19558 diff changeset	7276 #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	7277 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	7278 #endif
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7279 break;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 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 case ISN_UCALL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7282 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	7283 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7284
20283 934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7285 case ISN_FUNCREF:
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7286 {
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7287 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	7288 + 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	7289 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	7290 }
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7291 break;
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7292
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7293 case ISN_2BOOL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7294 case ISN_2STRING:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7295 case ISN_ADDBLOB:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7296 case ISN_ADDLIST:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7297 case ISN_BCALL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7298 case ISN_CATCH:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7299 case ISN_CHECKNR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7300 case ISN_CHECKTYPE:
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	7301 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	7302 case ISN_COMPAREANY:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7303 case ISN_COMPAREBLOB:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7304 case ISN_COMPAREBOOL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7305 case ISN_COMPAREDICT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7306 case ISN_COMPAREFLOAT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7307 case ISN_COMPAREFUNC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7308 case ISN_COMPARELIST:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7309 case ISN_COMPARENR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7310 case ISN_COMPARESPECIAL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7311 case ISN_COMPARESTRING:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7312 case ISN_CONCAT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7313 case ISN_DCALL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7314 case ISN_DROP:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7315 case ISN_ECHO:
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7316 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	7317 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	7318 case ISN_ENDTRY:
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7319 case ISN_EXECCONCAT:
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7320 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	7321 case ISN_FOR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7322 case ISN_INDEX:
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	7323 case ISN_GETITEM:
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	7324 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	7325 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	7326 case ISN_JUMP:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7327 case ISN_LOAD:
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	7328 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	7329 case ISN_LOADSCRIPT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7330 case ISN_LOADREG:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7331 case ISN_LOADV:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7332 case ISN_NEGATENR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7333 case ISN_NEWDICT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7334 case ISN_NEWLIST:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7335 case ISN_OPNR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7336 case ISN_OPFLOAT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7337 case ISN_OPANY:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7338 case ISN_PCALL:
19862 846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19860 diff changeset	7339 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	7340 case ISN_PUSHF:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7341 case ISN_PUSHNR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7342 case ISN_PUSHBOOL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7343 case ISN_PUSHSPEC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7344 case ISN_RETURN:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7345 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	7346 case ISN_STOREOUTER:
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7347 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	7348 case ISN_STORENR:
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7349 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	7350 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	7351 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	7352 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	7353 case ISN_THROW:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7354 case ISN_TRY:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7355 // nothing allocated
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7356 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7357 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7358 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7359
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7360 /*
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7361 * 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	7362 */
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7363 static void
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7364 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	7365 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7366 int idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7367
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7368 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	7369
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7370 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	7371 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7372 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	7373 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	7374 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	7375 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7376
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7377 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	7378 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7379
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7380 /*
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	7381 * 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	7382 * 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	7383 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7384 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	7385 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	7386 {
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	7387 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	7388 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7389 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	7390 + 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	7391
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7392 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	7393 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	7394 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7395 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7396
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7397 #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	7398 /*
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7399 * 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	7400 */
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7401 void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7402 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	7403 {
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7404 int idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7405
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7406 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	7407 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7408 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	7409
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7410 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	7411 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7412
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7413 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	7414 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7415 #endif
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7418 #endif // FEAT_EVAL

Mercurial > vim

annotate src/vim9compile.c @ 21040:d9e0db9b2b99 v8.2.1071