vim: src/vim9compile.c annotate

annotate src/vim9compile.c @ 21218:1f4d0375f947 v8.2.1160

patch 8.2.1160: Vim9: memory leak in allocated types Commit: https://github.com/vim/vim/commit/6110e79a5872dd6c5529f909d1bd670e3325927b Author: Bram Moolenaar <Bram@vim.org> Date: Wed Jul 8 19:35:21 2020 +0200 patch 8.2.1160: Vim9: memory leak in allocated types Problem: Vim9: memory leak in allocated types. Solution: Free the type pointers.

author	Bram Moolenaar <Bram@vim.org>
date	Wed, 08 Jul 2020 19:45:04 +0200
parents	bcd08812cde3
children	ad13736a1783

rev	line source
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1 /* vi:set ts=8 sts=4 sw=4 noet:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3 * VIM - Vi IMproved by Bram Moolenaar
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5 * Do ":help uganda" in Vim to read copying and usage conditions.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6 * Do ":help credits" in Vim to see a list of people who contributed.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7 * See README.txt for an overview of the Vim source code.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	8 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	9
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	10 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	11 * vim9compile.c: :def and dealing with instructions
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	12 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	13
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	14 #define USING_FLOAT_STUFF
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	15 #include "vim.h"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	16
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	17 #if defined(FEAT_EVAL) \|\| defined(PROTO)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	18
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	19 #ifdef VMS
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	20 # include <float.h>
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	21 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	22
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	23 #define DEFINE_VIM9_GLOBALS
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	24 #include "vim9.h"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	25
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	26 // values for ctx_skip
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	27 typedef enum {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	28 SKIP_NOT, // condition is a constant, produce code
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	29 SKIP_YES, // condition is a constant, do NOT produce code
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	30 SKIP_UNKNOWN // condition is not a constant, produce code
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	31 } skip_T;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	32
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	33 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	34 * Chain of jump instructions where the end label needs to be set.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	35 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	36 typedef struct endlabel_S endlabel_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	37 struct endlabel_S {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	38 endlabel_T *el_next; // chain end_label locations
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	39 int el_end_label; // instruction idx where to set end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	40 };
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	41
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	42 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	43 * info specific for the scope of :if / elseif / else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	44 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	45 typedef struct {
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	46 int is_seen_else;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	47 int is_had_return; // every block ends in :return
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	48 int is_if_label; // instruction idx at IF or ELSEIF
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	49 endlabel_T *is_end_label; // instructions to set end label
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	50 } ifscope_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	51
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	52 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	53 * info specific for the scope of :while
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	54 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	55 typedef struct {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	56 int ws_top_label; // instruction idx at WHILE
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	57 endlabel_T *ws_end_label; // instructions to set end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	58 } whilescope_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	59
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	60 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	61 * info specific for the scope of :for
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	62 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	63 typedef struct {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	64 int fs_top_label; // instruction idx at FOR
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	65 endlabel_T *fs_end_label; // break instructions
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	66 } forscope_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	67
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	68 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	69 * info specific for the scope of :try
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	70 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	71 typedef struct {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	72 int ts_try_label; // instruction idx at TRY
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	73 endlabel_T *ts_end_label; // jump to :finally or :endtry
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	74 int ts_catch_label; // instruction idx of last CATCH
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	75 int ts_caught_all; // "catch" without argument encountered
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	76 } tryscope_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	77
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	78 typedef enum {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	79 NO_SCOPE,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	80 IF_SCOPE,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	81 WHILE_SCOPE,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	82 FOR_SCOPE,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	83 TRY_SCOPE,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	84 BLOCK_SCOPE
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	85 } scopetype_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	86
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	87 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	88 * Info for one scope, pointed to by "ctx_scope".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	89 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	90 typedef struct scope_S scope_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	91 struct scope_S {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	92 scope_T *se_outer; // scope containing this one
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	93 scopetype_T se_type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	94 int se_local_count; // ctx_locals.ga_len before scope
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	95 skip_T se_skip_save; // ctx_skip before the block
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	96 union {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	97 ifscope_T se_if;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	98 whilescope_T se_while;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	99 forscope_T se_for;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	100 tryscope_T se_try;
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	101 } se_u;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	102 };
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	103
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	104 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	105 * Entry for "ctx_locals". Used for arguments and local variables.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	106 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	107 typedef struct {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	108 char_u *lv_name;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	109 type_T *lv_type;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	110 int lv_idx; // index of the variable on the stack
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	111 int lv_from_outer; // when TRUE using ctx_outer scope
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	112 int lv_const; // when TRUE cannot be assigned to
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	113 int lv_arg; // when TRUE this is an argument
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	114 } lvar_T;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	115
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	116 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	117 * Context for compiling lines of Vim script.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	118 * Stores info about the local variables and condition stack.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	119 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	120 struct cctx_S {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	121 ufunc_T *ctx_ufunc; // current function
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	122 int ctx_lnum; // line number in current function
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	123 char_u *ctx_line_start; // start of current line or NULL
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	124 garray_T ctx_instr; // generated instructions
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	125
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	126 garray_T ctx_locals; // currently visible local variables
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	127 int ctx_locals_count; // total number of local variables
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	128
20247 e46e72aaff74 patch 8.2.0679: Vim9: incomplete support for closures Bram Moolenaar <Bram@vim.org> parents: 20244 diff changeset	129 int ctx_closure_count; // number of closures created in the
e46e72aaff74 patch 8.2.0679: Vim9: incomplete support for closures Bram Moolenaar <Bram@vim.org> parents: 20244 diff changeset	130 // function
e46e72aaff74 patch 8.2.0679: Vim9: incomplete support for closures Bram Moolenaar <Bram@vim.org> parents: 20244 diff changeset	131
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	132 garray_T ctx_imports; // imported items
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	133
20907 4eeda7139133 patch 8.2.1005: Vim9: using TRUE/FALSE/MAYBE for ctx_skip is confusing Bram Moolenaar <Bram@vim.org> parents: 20899 diff changeset	134 skip_T ctx_skip;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	135 scope_T *ctx_scope; // current scope, NULL at toplevel
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	136 int ctx_had_return; // last seen statement was "return"
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	137
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	138 cctx_T *ctx_outer; // outer scope for lambda or nested
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	139 // function
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	140 int ctx_outer_used; // var in ctx_outer was used
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	141
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	142 garray_T ctx_type_stack; // type of each item on the stack
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	143 garray_T *ctx_type_list; // list of pointers to allocated types
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	144 };
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	145
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	146 static char e_var_notfound[] = N_("E1001: variable not found: %s");
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	147 static char e_syntax_at[] = N_("E1002: Syntax error at %s");
20355 fc2d76e0994c patch 8.2.0733: Vim9: assigning to dict or list argument does not work Bram Moolenaar <Bram@vim.org> parents: 20349 diff changeset	148 static char e_used_as_arg[] = N_("E1006: %s is used as an argument");
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	149 static char e_cannot_use_void[] = N_("E1031: Cannot use void value");
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	150
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	151 static void delete_def_function_contents(dfunc_T *dfunc);
19944 3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	152 static void arg_type_mismatch(type_T expected, type_T actual, int argidx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	153
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	154 /*
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	155 * Lookup variable "name" in the local scope and return it.
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	156 * Return NULL if not found.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	157 */
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	158 static lvar_T *
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	159 lookup_local(char_u name, size_t len, cctx_T cctx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	160 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	161 int idx;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	162 lvar_T *lvar;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	163
19392 5b6f420e7352 patch 8.2.0254: compiler warning for checking size_t to be negative Bram Moolenaar <Bram@vim.org> parents: 19388 diff changeset	164 if (len == 0)
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	165 return NULL;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	166
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	167 // Find local in current function scope.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	168 for (idx = 0; idx < cctx->ctx_locals.ga_len; ++idx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	169 {
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	170 lvar = ((lvar_T *)cctx->ctx_locals.ga_data) + idx;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	171 if (STRNCMP(name, lvar->lv_name, len) == 0
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	172 && STRLEN(lvar->lv_name) == len)
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	173 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	174 lvar->lv_from_outer = FALSE;
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	175 return lvar;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	176 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	177 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	178
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	179 // Find local in outer function scope.
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	180 if (cctx->ctx_outer != NULL)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	181 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	182 lvar = lookup_local(name, len, cctx->ctx_outer);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	183 if (lvar != NULL)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	184 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	185 // TODO: are there situations we should not mark the outer scope as
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	186 // used?
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	187 cctx->ctx_outer_used = TRUE;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	188 lvar->lv_from_outer = TRUE;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	189 return lvar;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	190 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	191 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	192
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	193 return NULL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	194 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	195
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	196 /*
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	197 * Lookup an argument in the current function and an enclosing function.
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	198 * Returns the argument index in "idxp"
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	199 * Returns the argument type in "type"
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	200 * Sets "gen_load_outer" to TRUE if found in outer scope.
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	201 * Returns OK when found, FAIL otherwise.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	202 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	203 static int
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	204 lookup_arg(
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	205 char_u *name,
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	206 size_t len,
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	207 int *idxp,
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	208 type_T **type,
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	209 int *gen_load_outer,
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	210 cctx_T *cctx)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	211 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	212 int idx;
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	213 char_u *va_name;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	214
19392 5b6f420e7352 patch 8.2.0254: compiler warning for checking size_t to be negative Bram Moolenaar <Bram@vim.org> parents: 19388 diff changeset	215 if (len == 0)
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	216 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	217 for (idx = 0; idx < cctx->ctx_ufunc->uf_args.ga_len; ++idx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	218 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	219 char_u *arg = FUNCARG(cctx->ctx_ufunc, idx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	220
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	221 if (STRNCMP(name, arg, len) == 0 && arg[len] == NUL)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	222 {
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	223 if (idxp != NULL)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	224 {
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	225 // Arguments are located above the frame pointer. One further
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	226 // if there is a vararg argument
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	227 *idxp = idx - (cctx->ctx_ufunc->uf_args.ga_len
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	228 + STACK_FRAME_SIZE)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	229 + (cctx->ctx_ufunc->uf_va_name != NULL ? -1 : 0);
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	230
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	231 if (cctx->ctx_ufunc->uf_arg_types != NULL)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	232 *type = cctx->ctx_ufunc->uf_arg_types[idx];
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	233 else
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	234 *type = &t_any;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	235 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	236 return OK;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	237 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	238 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	239
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	240 va_name = cctx->ctx_ufunc->uf_va_name;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	241 if (va_name != NULL
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	242 && STRNCMP(name, va_name, len) == 0 && va_name[len] == NUL)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	243 {
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	244 if (idxp != NULL)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	245 {
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	246 // varargs is always the last argument
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	247 *idxp = -STACK_FRAME_SIZE - 1;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	248 *type = cctx->ctx_ufunc->uf_va_type;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	249 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	250 return OK;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	251 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	252
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	253 if (cctx->ctx_outer != NULL)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	254 {
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	255 // Lookup the name for an argument of the outer function.
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	256 if (lookup_arg(name, len, idxp, type, gen_load_outer, cctx->ctx_outer)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	257 == OK)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	258 {
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	259 *gen_load_outer = TRUE;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	260 return OK;
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	261 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	262 }
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	263
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	264 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	265 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	266
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	267 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	268 * Lookup a variable in the current script.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	269 * Returns OK or FAIL.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	270 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	271 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	272 lookup_script(char_u *name, size_t len)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	273 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	274 int cc;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	275 hashtab_T *ht = &SCRIPT_VARS(current_sctx.sc_sid);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	276 dictitem_T *di;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	277
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	278 cc = name[len];
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	279 name[len] = NUL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	280 di = find_var_in_ht(ht, 0, name, TRUE);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	281 name[len] = cc;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	282 return di == NULL ? FAIL: OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	283 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	284
19623 2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	285 /*
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	286 * Check if "p[len]" is already defined, either in script "import_sid" or in
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	287 * compilation context "cctx".
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	288 * Return FAIL and give an error if it defined.
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	289 */
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	290 int
21194 afed2045ffc9 patch 8.2.1148: warning for using int instead of size_t Bram Moolenaar <Bram@vim.org> parents: 21188 diff changeset	291 check_defined(char_u p, size_t len, cctx_T cctx)
19623 2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	292 {
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	293 if (lookup_script(p, len) == OK
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	294 \|\| (cctx != NULL
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	295 && (lookup_local(p, len, cctx) != NULL
19623 2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	296 \|\| find_imported(p, len, cctx) != NULL)))
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	297 {
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	298 semsg("E1073: imported name already defined: %s", p);
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	299 return FAIL;
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	300 }
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	301 return OK;
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	302 }
2fee087c94cb patch 8.2.0368: Vim9: import that redefines local variable does not fail Bram Moolenaar <Bram@vim.org> parents: 19597 diff changeset	303
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	304 /*
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	305 * Allocate memory for a type_T and add the pointer to type_gap, so that it can
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	306 * be freed later.
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	307 */
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	308 static type_T *
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	309 alloc_type(garray_T *type_gap)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	310 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	311 type_T *type;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	312
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	313 if (ga_grow(type_gap, 1) == FAIL)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	314 return NULL;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	315 type = ALLOC_CLEAR_ONE(type_T);
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	316 if (type != NULL)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	317 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	318 ((type_T **)type_gap->ga_data)[type_gap->ga_len] = type;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	319 ++type_gap->ga_len;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	320 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	321 return type;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	322 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	323
21218 1f4d0375f947 patch 8.2.1160: Vim9: memory leak in allocated types Bram Moolenaar <Bram@vim.org> parents: 21216 diff changeset	324 void
1f4d0375f947 patch 8.2.1160: Vim9: memory leak in allocated types Bram Moolenaar <Bram@vim.org> parents: 21216 diff changeset	325 clear_type_list(garray_T *gap)
1f4d0375f947 patch 8.2.1160: Vim9: memory leak in allocated types Bram Moolenaar <Bram@vim.org> parents: 21216 diff changeset	326 {
1f4d0375f947 patch 8.2.1160: Vim9: memory leak in allocated types Bram Moolenaar <Bram@vim.org> parents: 21216 diff changeset	327 while (gap->ga_len > 0)
1f4d0375f947 patch 8.2.1160: Vim9: memory leak in allocated types Bram Moolenaar <Bram@vim.org> parents: 21216 diff changeset	328 vim_free(((type_T **)gap->ga_data)[--gap->ga_len]);
1f4d0375f947 patch 8.2.1160: Vim9: memory leak in allocated types Bram Moolenaar <Bram@vim.org> parents: 21216 diff changeset	329 ga_clear(gap);
1f4d0375f947 patch 8.2.1160: Vim9: memory leak in allocated types Bram Moolenaar <Bram@vim.org> parents: 21216 diff changeset	330 }
1f4d0375f947 patch 8.2.1160: Vim9: memory leak in allocated types Bram Moolenaar <Bram@vim.org> parents: 21216 diff changeset	331
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	332 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	333 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	334 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	335 type_T *type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	336
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	337 // 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	338 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	339 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	340 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	341 \|\| 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	342 return &t_list_empty;
19521 860b39ed0e0b patch 8.2.0318: Vim9: types not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19509 diff changeset	343 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	344 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	345 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	346 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	347 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	348 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	349
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	350 // 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	351 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	352 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	353 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	354 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	355 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	356 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	357 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	358 return type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	359 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	360
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	361 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	362 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	363 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	364 type_T *type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	365
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	366 // 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	367 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	368 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	369 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	370 \|\| 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	371 return &t_dict_empty;
19521 860b39ed0e0b patch 8.2.0318: Vim9: types not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19509 diff changeset	372 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	373 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	374 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	375 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	376 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	377 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	378
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	379 // 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	380 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	381 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	382 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	383 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	384 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	385 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	386 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	387 return type;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	388 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	389
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	390 /*
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	391 * 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	392 */
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	393 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	394 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	395 {
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	396 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	397
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	398 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	399 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	400 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	401 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	402 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	403 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	404 return type;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	405 }
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	406
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	407 /*
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	408 * 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	409 * 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	410 * 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	411 */
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	412 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	413 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	414 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	415 // 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	416 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	417 {
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	418 if (ret_type == &t_unknown)
b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	419 {
b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	420 // (argcount == 0) is not possible
b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	421 return &t_func_unknown;
b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	422 }
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	423 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	424 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	425 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	426 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	427 else
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	428 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	429 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	430 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	431 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	432 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	433 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	434 else
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	435 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	436 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	437 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	438 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	439 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	440 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	441 else
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	442 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	443 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	444 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	445 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	446 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	447 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	448 else
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	449 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	450 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	451 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	452
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	453 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	454 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	455
19872 8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	456 /*
19914 6babfd2d15e9 patch 8.2.0513: reading past allocate memory when using varargs Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	457 * 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	458 * vararg).
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	459 */
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	460 static int
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	461 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	462 type_T *functype,
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	463 int argcount,
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	464 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	465 {
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	466 // 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	467 // 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	468 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	469 return FAIL;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	470 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	471 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	472 return FAIL;
19918 ccfeae6af59e patch 8.2.0515: some compilers cannot add to "void " Bram Moolenaar <Bram@vim.org>* parents: 19914 diff changeset	473 ((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	474 (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	475 ++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	476 return OK;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	477 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	478
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	479 /*
19872 8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	480 * 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	481 */
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	482 type_T *
19872 8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	483 typval2type(typval_T *tv)
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	484 {
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_NUMBER)
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	486 return &t_number;
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	487 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	488 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	489 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	490 return &t_string;
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	491 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	492 return &t_list_string;
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	493 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	494 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	495 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	496 }
8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	497
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	498 static void
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	499 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	500 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	501 char tofree1, tofree2;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	502
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	503 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	504 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	505 vim_free(tofree1);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	506 vim_free(tofree2);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	507 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	508
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	509 static void
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	510 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	511 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	512 char tofree1, tofree2;
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 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	515 argidx,
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	516 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	517 vim_free(tofree1);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	518 vim_free(tofree2);
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
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 * 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	523 * 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	524 */
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	525 int
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	526 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	527 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	528 int ret = OK;
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 // 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	531 // 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	532 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	533 && !(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	534
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 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	537 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	538 if (give_msg)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	539 type_mismatch(expected, actual);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	540 return FAIL;
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_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	543 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	544 // "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	545 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	546 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	547 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	548 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	549 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	550 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	551 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	552 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	553 && (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	554 \|\| 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	555 ret = FAIL;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	556 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	557 if (ret == FAIL && give_msg)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	558 type_mismatch(expected, actual);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	559 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	560 return ret;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	561 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	562
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	563 /////////////////////////////////////////////////////////////////////
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	564 // 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	565
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	566 #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	567 #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	568
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	569 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	570 * 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	571 * 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	572 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	573 static isn_T *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	574 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	575 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	576 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	577 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	578
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	579 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	580 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	581 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	582 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	583 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	584 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	585 ++instr->ga_len;
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 return isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	588 }
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	591 * 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	592 * "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	593 * 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	594 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	595 static isn_T *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	596 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	597 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	598 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	599
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	600 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	601 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	602 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	603 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	604
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 * 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	607 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	608 static isn_T *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	609 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	610 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	611 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	612 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	613
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	614 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	615 return NULL;
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 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	618 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	619 ((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	620 ++stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	621
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	622 return isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	623 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	624
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	625 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	626 * 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	627 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	628 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	629 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	630 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	631 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	632 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	633 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	634
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	635 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	636 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	637 *type = &t_string;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	638
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	639 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	640 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	641 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	642
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	643 return OK;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	646 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	647 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	648 {
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	649 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	650 && (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	651 \|\| 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	652 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	653 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	654 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	655 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	656 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	657 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	658 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	659 return OK;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	662 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	663 * 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	664 * 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	665 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	666 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	667 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	668 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	669 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	670 type_T *type1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	671 type_T *type2;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	672 vartype_T vartype;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	673 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	674
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	675 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	676
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	677 // 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	678 // 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	679 // checking.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	680 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	681 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	682 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	683 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	684 && (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	685 \|\| 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	686 #ifdef FEAT_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	687 \|\| 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	688 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	689 \|\| 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	690 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	691
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	692 switch (*op)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	693 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	694 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	695 && 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	696 && 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	697 && 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	698 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	699 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	700 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	701 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	702 : 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	703 : 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	704 #ifdef FEAT_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	705 : 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	706 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	707 : ISN_OPANY, 1);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	708 if (isn != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	709 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	710 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	711
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	712 case '-':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	713 case '*':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	714 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	715 op) == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	716 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	717 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	718 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	719 #ifdef FEAT_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	720 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	721 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	722 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	723 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	724 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	725 if (isn != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	726 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	727 ? 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	728 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	729
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	730 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	731 && 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	732 \|\| (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	733 && 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	734 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	735 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	736 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	737 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	738 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	739 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	740 if (isn != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	741 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	742 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	743 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	744
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	745 // 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	746 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	747 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	748 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	749
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	750 #ifdef FEAT_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	751 // 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	752 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	753 && (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	754 type = &t_float;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	755 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	756 ((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	757 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	758
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	759 return OK;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	762 /*
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	763 * 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	764 * 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	765 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	766 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	767 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	768 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	769 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	770
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	771 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	772 type1 = VAR_ANY;
1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	773 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	774 type2 = VAR_ANY;
1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	775
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	776 if (type1 == type2)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	777 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	778 switch (type1)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	779 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	780 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	781 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	782 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	783 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	784 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	785 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	786 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	787 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	788 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	789 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	790 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	791 }
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	792 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	793 \|\| ((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	794 && (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	795 isntype = ISN_COMPAREANY;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	796
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	797 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	798 && (isntype == ISN_COMPAREBOOL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	799 \|\| isntype == ISN_COMPARESPECIAL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	800 \|\| isntype == ISN_COMPARENR
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	801 \|\| isntype == ISN_COMPAREFLOAT))
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	802 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	803 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	804 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	805 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	806 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	807 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	808 \|\| ((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	809 && (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	810 \|\| 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	811 \|\| ((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	812 && 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	813 && (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	814 \|\| 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	815 {
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	816 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	817 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	818 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	819 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	820 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	821 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	822
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	823 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	824 * 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	825 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	826 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	827 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	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 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	830 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	831 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	832 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	833 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	834
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	835 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	836
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	837 // 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	838 // 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	839 // checking.
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	840 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	841 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	842 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	843 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	844 return FAIL;
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 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	847 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	848 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	849 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	850
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	851 // 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	852 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	853 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	854 --stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	855 ((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	856 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	857
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	858 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	859 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	860
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	861 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	862 * 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	863 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	864 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	865 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	866 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	867 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	868 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	869
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	870 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	871 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	872 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	873 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	874
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	875 // type becomes bool
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	876 ((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	877
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	878 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	879 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	880
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	881 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	882 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	883 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	884 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	885 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	886
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	887 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	888 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	889 return FAIL;
20207 3c247d9cd6f9 patch 8.2.0659: Vim9: no test for equal func type Bram Moolenaar <Bram@vim.org> parents: 20203 diff changeset	890 // 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	891 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	892 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	893
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	894 // 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	895 ((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	896
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	897 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	898 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	899
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	900 /*
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	901 * Check that
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	902 * - "actual" is "expected" type or
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	903 * - "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	904 * - return FAIL.
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	905 */
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	906 static int
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	907 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	908 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	909 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	910 return OK;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	911 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	912 && actual->tt_type != VAR_UNKNOWN
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	913 && !(actual->tt_type == VAR_FUNC
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	914 && (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	915 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	916 type_mismatch(expected, actual);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	917 return FAIL;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	918 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	919 generate_TYPECHECK(cctx, expected, offset);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	920 return OK;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	921 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	922
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	923 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	924 * 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	925 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	926 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	927 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	928 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	929 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	930
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	931 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	932 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	933 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	934 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	935
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	936 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	937 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	938
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	939 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	940 * 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	941 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	942 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	943 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	944 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	945 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	946
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	947 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	948 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	949 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	950 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	951
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	952 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	953 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	954
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	955 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	956 * 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	957 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	958 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	959 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	960 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	961 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	962
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	963 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	964 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	965 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	966 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	967
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	968 return OK;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	971 #ifdef FEAT_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	972 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	973 * 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	974 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	975 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	976 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	977 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	978 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	979
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	980 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	981 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	982 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	983 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	984
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	985 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	986 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	987 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	988
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	989 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	990 * 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	991 * Consumes "str".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	992 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	993 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	994 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	995 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	996 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	997
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	998 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	999 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	1000 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1001 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	1002
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1003 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1004 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1005
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1006 /*
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1007 * 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	1008 * Consumes "channel".
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1009 */
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1010 static int
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1011 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	1012 {
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1013 isn_T *isn;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1014
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1015 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	1016 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	1017 return FAIL;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1018 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	1019
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1020 return OK;
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
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1023 /*
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1024 * 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	1025 * Consumes "job".
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1026 */
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1027 static int
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1028 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	1029 {
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1030 isn_T *isn;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1031
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1032 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	1033 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	1034 return FAIL;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1035 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	1036
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1037 return OK;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1038 }
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1039
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1040 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1041 * 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	1042 * Consumes "blob".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1043 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1044 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1045 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	1046 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1047 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1048
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1049 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	1050 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	1051 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1052 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	1053
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1054 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1055 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1056
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1057 /*
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1058 * 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	1059 * Consumes "name".
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1060 */
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1061 static int
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1062 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	1063 {
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1064 isn_T *isn;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1065
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1066 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	1067 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	1068 return FAIL;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1069 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	1070
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1071 return OK;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1072 }
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1073
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	1074 /*
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1075 * 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	1076 */
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1077 static int
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1078 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	1079 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1080 isn_T *isn;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1081 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	1082 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	1083 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	1084
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1085 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	1086
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1087 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	1088 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	1089 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	1090 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1091 emsg(_(e_listreq));
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 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1094 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	1095 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1096 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	1097
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1098 // 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	1099 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	1100 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1101 ((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	1102 ++stack->ga_len;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1103 return OK;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1104 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1105
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	1106 /*
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1107 * 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	1108 */
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1109 static int
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1110 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	1111 {
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1112 isn_T *isn;
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 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	1115 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	1116 return FAIL;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1117 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	1118 return OK;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1119 }
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 /*
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1122 * 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	1123 */
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1124 static int
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1125 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	1126 {
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1127 isn_T *isn;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1128
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1129 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	1130
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1131 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	1132 return FAIL;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1133 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	1134 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	1135
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1136 return OK;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1137 }
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1138
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	1139 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1140 * 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	1141 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1142 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1143 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	1144 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1145 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1146
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1147 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	1148 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	1149 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1150 if (name != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1151 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	1152 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1153 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	1154
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1155 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1156 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1157
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1158 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1159 * 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	1160 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1161 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1162 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	1163 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1164 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1165
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1166 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	1167 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	1168 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	1169 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	1170 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	1171
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1172 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1173 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1174
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1175 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1176 * 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	1177 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1178 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1179 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	1180 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1181 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1182
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1183 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	1184 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	1185 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1186 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	1187 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	1188
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1189 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1190 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1191
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1192 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1193 * 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	1194 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1195 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1196 generate_LOAD(
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1197 cctx_T *cctx,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1198 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	1199 int idx,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1200 char_u *name,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1201 type_T *type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1202 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1203 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1204
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1205 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	1206 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	1207 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1208 if (name != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1209 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	1210 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1211 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	1212
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1213 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1214 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1215
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 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 * 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	1218 */
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1219 static int
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1220 generate_LOADV(
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1221 cctx_T *cctx,
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1222 char_u *name,
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1223 int error)
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1224 {
19960 3c11b9f6fa03 patch 8.2.0536: Vim9: some compilation code not tested Bram Moolenaar <Bram@vim.org> parents: 19946 diff changeset	1225 int di_flags;
3c11b9f6fa03 patch 8.2.0536: Vim9: some compilation code not tested Bram Moolenaar <Bram@vim.org> parents: 19946 diff changeset	1226 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	1227 type_T *type;
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1228
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1229 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	1230 if (vidx < 0)
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 if (error)
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1233 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	1234 return FAIL;
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1235 }
19960 3c11b9f6fa03 patch 8.2.0536: Vim9: some compilation code not tested Bram Moolenaar <Bram@vim.org> parents: 19946 diff changeset	1236 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	1237
3c11b9f6fa03 patch 8.2.0536: Vim9: some compilation code not tested Bram Moolenaar <Bram@vim.org> parents: 19946 diff changeset	1238 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	1239 }
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1240
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1241 /*
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1242 * Generate an ISN_UNLET instruction.
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1243 */
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1244 static int
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	1245 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	1246 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1247 isn_T *isn;
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 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	1250 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	1251 return FAIL;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1252 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	1253 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	1254
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1255 return OK;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1256 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1257
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	1258 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1259 * 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	1260 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1261 static int
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1262 generate_OLDSCRIPT(
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1263 cctx_T *cctx,
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1264 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	1265 char_u *name,
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1266 int sid,
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1267 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	1268 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1269 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1270
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1271 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	1272 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	1273 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	1274 else
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1275 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	1276 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	1277 return FAIL;
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1278 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	1279 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	1280
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1281 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1282 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1283
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1284 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1285 * 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	1286 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1287 static int
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	1288 generate_VIM9SCRIPT(
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1289 cctx_T *cctx,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1290 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	1291 int sid,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1292 int idx,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1293 type_T *type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1294 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1295 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1296
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1297 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	1298 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	1299 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	1300 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1301 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	1302 if (isn == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1303 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1304 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	1305 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	1306 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1307 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1308
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1309 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1310 * 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	1311 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1312 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1313 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	1314 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1315 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1316 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	1317 type_T *type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1318 type_T *member;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1319
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1320 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	1321 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	1322 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1323 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	1324
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1325 // 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	1326 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	1327
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1328 // 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	1329 // empty list.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1330 if (count > 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1331 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	1332 else
19467 f41e46f02c8c patch 8.2.0291: Vim9: assigning [] to list<string> doesn't work Bram Moolenaar <Bram@vim.org> parents: 19461 diff changeset	1333 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	1334 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	1335
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1336 // 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	1337 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	1338 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1339 ((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	1340 ++stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1341
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1342 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1343 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1344
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1345 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1346 * 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	1347 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1348 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1349 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	1350 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1351 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1352 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	1353 type_T *type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1354 type_T *member;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1355
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1356 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	1357 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	1358 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1359 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	1360
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1361 // 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	1362 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	1363
19467 f41e46f02c8c patch 8.2.0291: Vim9: assigning [] to list<string> doesn't work Bram Moolenaar <Bram@vim.org> parents: 19461 diff changeset	1364 // 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	1365 // empty dict.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1366 if (count > 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1367 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	1368 else
19467 f41e46f02c8c patch 8.2.0291: Vim9: assigning [] to list<string> doesn't work Bram Moolenaar <Bram@vim.org> parents: 19461 diff changeset	1369 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	1370 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	1371
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1372 // 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	1373 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	1374 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1375 ((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	1376 ++stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1377
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1378 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1379 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1380
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1381 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1382 * 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	1383 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1384 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1385 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	1386 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1387 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1388 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	1389
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1390 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	1391 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	1392 return FAIL;
20247 e46e72aaff74 patch 8.2.0679: Vim9: incomplete support for closures Bram Moolenaar <Bram@vim.org> parents: 20244 diff changeset	1393 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	1394 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	1395
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1396 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	1397 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	1398 ((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	1399 // 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	1400 ++stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1401
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1402 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1403 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1404
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1405 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1406 * 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	1407 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1408 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1409 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	1410 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1411 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1412 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	1413
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1414 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	1415 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	1416 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1417 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	1418 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	1419
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1420 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	1421 --stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1422
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1423 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1424 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1425
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1426 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1427 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	1428 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1429 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1430 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	1431
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1432 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	1433 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	1434 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1435 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	1436
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1437 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	1438 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1439 // 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	1440 ((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	1441 ++stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1442
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1443 return OK;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1446 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1447 * 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	1448 * 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	1449 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1450 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1451 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	1452 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1453 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1454 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	1455 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	1456 int i;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1457
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1458 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	1459 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	1460 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1461
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1462 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	1463 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1464 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	1465 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	1466
19564 06f29b6ea04a patch 8.2.0339: Vim9: function return type may depend on arguments Bram Moolenaar <Bram@vim.org> parents: 19562 diff changeset	1467 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	1468 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	1469
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1470 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	1471 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	1472 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1473 ((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	1474 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	1475 ++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	1476
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1477 return OK;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1480 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1481 * 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	1482 * 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	1483 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1484 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	1485 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	1486 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1487 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1488 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	1489 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	1490 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	1491
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1492 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	1493 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	1494 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1495 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	1496 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1497 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1498 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	1499 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1500 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	1501 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1502 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1503
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	1504 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	1505 {
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1506 int i;
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1507
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1508 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	1509 {
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1510 type_T *expected;
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1511 type_T *actual;
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1512
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1513 if (i < regular_args)
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1514 {
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1515 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	1516 continue;
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1517 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	1518 }
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1519 else
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1520 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	1521 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	1522 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	1523 {
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1524 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	1525 return FAIL;
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1526 }
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1527 }
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	1528 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	1529 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	1530 return FAIL;
19944 3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1531 }
3055cd26e139 patch 8.2.0528: Vim9: function arguments insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19942 diff changeset	1532
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1533 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	1534 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	1535 : 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	1536 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	1537 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	1538 {
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.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	1540 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	1541 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1542 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1543 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1544 // 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	1545 // 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	1546 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	1547 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	1548 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1549
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1550 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	1551 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	1552 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1553 // add return value
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1554 ((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	1555 ++stack->ga_len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1556
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1557 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1558 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1559
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1560 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1561 * 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	1562 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1563 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1564 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	1565 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1566 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1567 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	1568
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1569 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	1570 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	1571 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1572 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	1573 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	1574
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1575 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	1576 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	1577 return FAIL;
2a63b7f5802a patch 8.2.0206: calling Vim9 function using default argument fails Bram Moolenaar <Bram@vim.org> parents: 19285 diff changeset	1578 // add return value
2a63b7f5802a patch 8.2.0206: calling Vim9 function using default argument fails Bram Moolenaar <Bram@vim.org> parents: 19285 diff changeset	1579 ((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	1580 ++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	1581
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1582 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1583 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1584
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1585 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1586 * 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	1587 * "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	1588 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1589 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	1590 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	1591 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	1592 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	1593 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	1594 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	1595 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	1596 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1597 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1598 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	1599 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	1600
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1601 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	1602
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1603 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	1604 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	1605 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	1606 {
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1607 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	1608 {
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1609 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	1610
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1611 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	1612 {
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1613 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	1614 return FAIL;
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1615 }
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1616 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	1617 {
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1618 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	1619 return FAIL;
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1620 }
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	1621 }
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1622 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	1623 }
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1624 else
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1625 {
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1626 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	1627 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	1628 }
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	1629
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1630 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	1631 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1632 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	1633 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	1634
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1635 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	1636
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1637 // 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	1638 ((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	1639
19862 846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19860 diff changeset	1640 // 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	1641 // the return value.
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19860 diff changeset	1642 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	1643 return FAIL;
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19860 diff changeset	1644
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1645 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1646 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1647
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1648 /*
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	1649 * 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	1650 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1651 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	1652 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	1653 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1654 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1655 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	1656 type_T *type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1657
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1658 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	1659 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	1660 return FAIL;
20830 9064044fd4f6 patch 8.2.0967: unnecessary type casts for vim_strnsave() Bram Moolenaar <Bram@vim.org> parents: 20538 diff changeset	1661 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	1662
19461 08ef11a81daa patch 8.2.0288: Vim9: some float and blob operators not tested Bram Moolenaar <Bram@vim.org> parents: 19455 diff changeset	1663 // 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	1664 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	1665 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	1666 {
08ef11a81daa patch 8.2.0288: Vim9: some float and blob operators not tested Bram Moolenaar <Bram@vim.org> parents: 19455 diff changeset	1667 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	1668 return FAIL;
08ef11a81daa patch 8.2.0288: Vim9: some float and blob operators not tested Bram Moolenaar <Bram@vim.org> parents: 19455 diff changeset	1669 }
08ef11a81daa patch 8.2.0288: Vim9: some float and blob operators not tested Bram Moolenaar <Bram@vim.org> parents: 19455 diff changeset	1670 // 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	1671 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	1672 ((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	1673
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1674 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1675 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1676
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1677 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1678 * 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	1679 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1680 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1681 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	1682 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1683 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1684
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1685 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	1686 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	1687 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1688 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	1689 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	1690
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1691 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1692 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1693
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1694 /*
20142 fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	1695 * 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	1696 */
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1697 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	1698 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	1699 {
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1700 isn_T *isn;
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1701
20142 fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	1702 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	1703 return FAIL;
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1704 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	1705
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1706 return OK;
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1707 }
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	1708
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1709 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1710 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	1711 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1712 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1713
19587 e61dc51ab9b4 patch 8.2.0350: Vim9: expression tests don't use recognized constants Bram Moolenaar <Bram@vim.org> parents: 19583 diff changeset	1714 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	1715 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	1716 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1717 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	1718 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1719 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1720
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1721 static int
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1722 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	1723 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1724 isn_T *isn;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1725
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1726 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	1727 return FAIL;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1728 isn->isn_arg.number = count;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1729 return OK;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1730 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	1731
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1732 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1733 * 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	1734 * 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	1735 */
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1736 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	1737 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	1738 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1739 lvar_T *lvar;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1740
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	1741 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	1742 {
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	1743 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	1744 return NULL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1745 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1746
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1747 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	1748 return NULL;
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1749 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	1750
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1751 // 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	1752 // 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	1753 // 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	1754 // 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	1755 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	1756
20830 9064044fd4f6 patch 8.2.0967: unnecessary type casts for vim_strnsave() Bram Moolenaar <Bram@vim.org> parents: 20538 diff changeset	1757 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	1758 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	1759 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	1760
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1761 return lvar;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1762 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1763
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1764 /*
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1765 * 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	1766 */
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1767 static void
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1768 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	1769 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1770 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	1771 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1772 int idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1773 lvar_T *lvar;
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 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	1776 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1777 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	1778 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	1779 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1780 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1781 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	1782 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1783
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 * 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	1786 */
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1787 static void
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	1788 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	1789 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1790 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	1791 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	1792 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1793
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	1794 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1795 * 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	1796 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1797 char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1798 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	1799 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1800 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	1801
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1802 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	1803 ++p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1804
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1805 // 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	1806 if (*skipwhite(p) == '<')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1807 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1808 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1809 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	1810 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1811 if (*p == '>')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1812 ++p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1813 }
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1814 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	1815 {
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1816 // handle func(args): type
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1817 ++p;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1818 while (p != ')' && p != NUL)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1819 {
20253 6f9010b6f7f9 patch 8.2.0682: Vim9: parsing function argument type can get stuck Bram Moolenaar <Bram@vim.org> parents: 20247 diff changeset	1820 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	1821
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1822 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	1823 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	1824 return p; // syntax error
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1825 if (*p == ',')
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1826 p = skipwhite(p + 1);
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1827 }
20255 aac52c32a91f patch 8.2.0683: Vim9: parsing type does not always work Bram Moolenaar <Bram@vim.org> parents: 20253 diff changeset	1828 if (*p == ')')
aac52c32a91f patch 8.2.0683: Vim9: parsing type does not always work Bram Moolenaar <Bram@vim.org> parents: 20253 diff changeset	1829 {
aac52c32a91f patch 8.2.0683: Vim9: parsing type does not always work Bram Moolenaar <Bram@vim.org> parents: 20253 diff changeset	1830 if (p[1] == ':')
aac52c32a91f patch 8.2.0683: Vim9: parsing type does not always work Bram Moolenaar <Bram@vim.org> parents: 20253 diff changeset	1831 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	1832 else
aac52c32a91f patch 8.2.0683: Vim9: parsing type does not always work Bram Moolenaar <Bram@vim.org> parents: 20253 diff changeset	1833 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	1834 }
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1835 }
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	1836
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1837 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1838 }
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1841 * 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	1842 * 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	1843 * 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	1844 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1845 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	1846 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	1847 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1848 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	1849 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	1850
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1851 if (**arg != '<')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1852 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1853 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	1854 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	1855 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1856 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	1857 return type;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1858 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1859 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	1860
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1861 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	1862
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1863 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	1864 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	1865 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1866 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	1867 return type;
19181 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 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1870
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1871 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	1872 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	1873 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	1874 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1875
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1876 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1877 * 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	1878 * 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	1879 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1880 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	1881 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	1882 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1883 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	1884 size_t len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1885
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1886 // 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	1887 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	1888 ++p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1889 len = p - *arg;
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 switch (**arg)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1892 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1893 case 'a':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1894 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	1895 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1896 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1897 return &t_any;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1898 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1899 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1900 case 'b':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1901 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	1902 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1903 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1904 return &t_bool;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1905 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1906 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	1907 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1908 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1909 return &t_blob;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1910 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1911 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1912 case 'c':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1913 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	1914 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1915 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1916 return &t_channel;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1917 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1918 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1919 case 'd':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1920 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	1921 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1922 *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	1923 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	1924 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1925 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1926 case 'f':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1927 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	1928 {
19193 9f98957582d6 patch 8.2.0155: warnings from MinGW compiler; tests fail without +float Bram Moolenaar <Bram@vim.org> parents: 19191 diff changeset	1929 #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	1930 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1931 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	1932 #else
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1933 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	1934 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	1935 #endif
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1936 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	1937 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	1938 {
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1939 type_T *type;
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	1940 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	1941 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	1942 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	1943 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	1944 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	1945
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1946 // 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	1947 *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	1948 if (**arg == '(')
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 // "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	1951 // 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	1952 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	1953
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1954 p = ++*arg;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1955 argcount = 0;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1956 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	1957 {
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1958 if (*p == '?')
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1959 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1960 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	1961 first_optional = argcount;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1962 ++p;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1963 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1964 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	1965 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1966 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	1967 return &t_any;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1968 }
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1969 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	1970 {
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1971 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	1972 p += 3;
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1973 }
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1974
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1975 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	1976
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	1977 // 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	1978 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	1979 break;
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	1980
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1981 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	1982 {
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_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	1984 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	1985 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1986 if (*p == ',')
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1987 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1988 ++p;
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1989 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	1990 {
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	1991 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	1992 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	1993 }
19904 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 (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	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(_("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	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 }
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 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	2004 if (*p != ')')
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2005 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2006 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	2007 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	2008 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2009 *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	2010 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2011 if (**arg == ':')
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2012 {
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2013 // 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	2014 ++*arg;
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	2015 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	2016 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	2017 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	2018 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	2019 }
19985 f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2020 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	2021 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	2022 else
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2023 {
19975 4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2024 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	2025 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	2026 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	2027 {
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2028 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	2029 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	2030 ? 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	2031 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	2032 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	2033 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	2034 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	2035 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	2036 }
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2037 }
bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2038 return type;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2039 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2040 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2041 case 'j':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2042 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	2043 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2044 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2045 return &t_job;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2046 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2047 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2048 case 'l':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2049 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	2050 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2051 *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	2052 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	2053 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2054 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2055 case 'n':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2056 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	2057 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2058 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2059 return &t_number;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2060 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2061 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2062 case 's':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2063 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	2064 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2065 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2066 return &t_string;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2067 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2068 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2069 case 'v':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2070 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	2071 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2072 *arg += len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2073 return &t_void;
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 break;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2078 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	2079 return &t_any;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2080 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2081
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2082 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2083 * 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	2084 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2085 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2086 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	2087 {
19993 efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2088 int i;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2089
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2090 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	2091 return FALSE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2092 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	2093 {
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	2094 case VAR_UNKNOWN:
1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	2095 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	2096 case VAR_VOID:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2097 case VAR_SPECIAL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2098 case VAR_BOOL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2099 case VAR_NUMBER:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2100 case VAR_FLOAT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2101 case VAR_STRING:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2102 case VAR_BLOB:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2103 case VAR_JOB:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2104 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	2105 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	2106 case VAR_LIST:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2107 case VAR_DICT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2108 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	2109 case VAR_FUNC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2110 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	2111 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	2112 \|\| 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	2113 return FALSE;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2114 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	2115 \|\| 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	2116 return TRUE;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2117 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	2118 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	2119 return FALSE;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2120 return TRUE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2121 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2122 return TRUE;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2125 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2126 * 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	2127 * "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	2128 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2129 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	2130 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	2131 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2132 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	2133 {
19579 aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	2134 *dest = type1;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2135 return;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2136 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2137
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2138 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	2139 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2140 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	2141 {
19579 aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	2142 type_T *common;
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	2143
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2144 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	2145 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	2146 *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	2147 else
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2148 *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	2149 return;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2150 }
19993 efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2151 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	2152 {
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2153 type_T *common;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2154
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2155 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	2156 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	2157 && 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	2158 {
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2159 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	2160 int i;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2161
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2162 *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	2163 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	2164 {
20001 502a6c9b3974 patch 8.2.0556: Vim9: memory leak when finding common type Bram Moolenaar <Bram@vim.org> parents: 19999 diff changeset	2165 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	2166 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	2167 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	2168 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	2169 &(*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	2170 }
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2171 }
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2172 else
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2173 *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	2174 return;
efe864a7ce4f patch 8.2.0552: Vim9: some errors not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19985 diff changeset	2175 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2176 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2177
19579 aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	2178 *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	2179 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2180
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2181 char *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2182 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	2183 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2184 switch (type)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2185 {
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	2186 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	2187 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	2188 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	2189 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	2190 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	2191 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	2192 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	2193 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	2194 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	2195 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	2196 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	2197 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	2198 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	2199
f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2200 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	2201 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	2202 }
19922 1f42c49c3d29 patch 8.2.0517: Vim9: cannot separate "func" and "func(): void" Bram Moolenaar <Bram@vim.org> parents: 19918 diff changeset	2203 return "unknown";
19181 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
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 * 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	2208 * 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	2209 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2210 char *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2211 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	2212 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2213 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	2214
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2215 *tofree = NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2216 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	2217 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2218 char *member_free;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2219 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	2220 size_t len;
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 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	2223 *tofree = alloc(len);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2224 if (*tofree != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2225 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2226 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	2227 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	2228 return *tofree;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2229 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2230 }
19985 f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2231 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	2232 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2233 garray_T ga;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2234 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	2235 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	2236
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2237 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	2238 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	2239 return "[unknown]";
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2240 *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	2241 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	2242 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	2243
19985 f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2244 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	2245 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2246 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	2247 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	2248 int len;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2249
19985 f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2250 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	2251 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	2252 else
f863aa96cae5 patch 8.2.0548: Vim9: not all possible func type errors tested Bram Moolenaar <Bram@vim.org> parents: 19981 diff changeset	2253 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	2254 if (i > 0)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2255 {
19918 ccfeae6af59e patch 8.2.0515: some compilers cannot add to "void " Bram Moolenaar <Bram@vim.org>* parents: 19914 diff changeset	2256 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	2257 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	2258 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2259 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	2260 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	2261 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2262 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	2263 return "[unknown]";
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2264 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2265 *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	2266 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	2267 {
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2268 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	2269 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	2270 }
4e8e0ce576af patch 8.2.0543: Vim9: function with varargs does not work properly Bram Moolenaar <Bram@vim.org> parents: 19964 diff changeset	2271 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	2272 ((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	2273 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	2274 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	2275 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	2276 }
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 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	2279 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	2280 else
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2281 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2282 char *ret_free;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2283 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	2284 int len;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2285
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2286 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	2287 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	2288 {
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2289 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	2290 return "[unknown]";
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2291 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2292 *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	2293 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	2294 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	2295 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	2296 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2297 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	2298 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2299
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2300 return name;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2301 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2302
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 * 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	2305 * 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	2306 * 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	2307 * 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	2308 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2309 int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2310 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	2311 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2312 hashtab_T *ht;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2313 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	2314 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	2315 int idx;
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 // 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	2318 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	2319 return -1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2320 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	2321 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	2322 if (di == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2323 return -2;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2324
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2325 // 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	2326 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	2327 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2328 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	2329
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2330 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	2331 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2332 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	2333 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	2334 return idx;
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 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2337 return -1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2338 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2339
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2340 /*
20840 0600ab7b9f09 patch 8.2.0972: Vim9 script variable declarations need a type Bram Moolenaar <Bram@vim.org> parents: 20830 diff changeset	2341 * 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	2342 * NULL.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2343 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2344 imported_T *
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2345 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	2346 {
21116 9b57c92991c6 patch 8.2.1109: still crashing when using s:variable Bram Moolenaar <Bram@vim.org> parents: 21110 diff changeset	2347 scriptitem_T *si;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2348 int idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2349
21110 8fb0e507491d patch 8.2.1106: crash when trying to use s: variable in typed command Bram Moolenaar <Bram@vim.org> parents: 21040 diff changeset	2350 if (current_sctx.sc_sid <= 0)
8fb0e507491d patch 8.2.1106: crash when trying to use s: variable in typed command Bram Moolenaar <Bram@vim.org> parents: 21040 diff changeset	2351 return NULL;
8fb0e507491d patch 8.2.1106: crash when trying to use s: variable in typed command Bram Moolenaar <Bram@vim.org> parents: 21040 diff changeset	2352 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	2353 if (cctx != NULL)
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 < 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	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 )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	2357 + idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2358
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2359 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	2360 : 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	2361 && 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	2362 return import;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2363 }
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 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	2366 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2367 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	2368
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2369 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	2370 : 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	2371 && 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	2372 return import;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2373 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2374 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2375 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2376
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2377 /*
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2378 * 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	2379 */
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2380 static void
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2381 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	2382 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2383 int idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2384
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2385 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	2386 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2387 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	2388
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2389 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	2390 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2391 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	2392 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2393
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	2394 /*
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2395 * 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	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 int
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2398 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	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 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	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
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 * 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	2405 * 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	2406 * 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	2407 */
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	2408 char_u *
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	2409 peek_next_line_from_context(cctx_T *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	2410 {
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2411 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	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 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	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 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	2416 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	2417
d561e3c6cd65 patch 8.2.1037: Vim9: crash when using line continuation inside :def Bram Moolenaar <Bram@vim.org> parents: 20966 diff changeset	2418 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	2419 break;
d561e3c6cd65 patch 8.2.1037: Vim9: crash when using line continuation inside :def Bram Moolenaar <Bram@vim.org> parents: 20966 diff changeset	2420 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	2421 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	2422 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	2423 }
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2424 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	2425 }
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2426
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2427 /*
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2428 * 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	2429 * 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	2430 * 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	2431 * 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	2432 */
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2433 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	2434 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	2435 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2436 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	2437
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2438 *nextp = NULL;
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2439 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	2440 {
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	2441 *nextp = peek_next_line_from_context(cctx);
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2442 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	2443 return *nextp;
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2444 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2445 return p;
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2446 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2447
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	2448 /*
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2449 * 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	2450 * 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	2451 * 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	2452 */
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	2453 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	2454 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	2455 {
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	2456 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	2457
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2458 do
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2459 {
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2460 ++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	2461 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	2462 {
de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	2463 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	2464 break;
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	2465 }
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2466 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	2467 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	2468 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	2469 } 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	2470 \|\| (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	2471 return line;
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2472 }
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2473
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2474 /*
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2475 * 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	2476 * 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	2477 * 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	2478 */
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2479 static int
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2480 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	2481 {
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2482 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	2483 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2484 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	2485
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2486 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	2487 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2488 *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	2489 }
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2490 return OK;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2491 }
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2492
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2493 // 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	2494 // 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	2495 // 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	2496 // 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	2497 // 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	2498 // 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	2499 #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	2500 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	2501 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	2502 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	2503 } 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	2504
20336 2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	2505 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	2506 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	2507
20328 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 * 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	2510 * "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	2511 * 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	2512 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2513 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	2514 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	2515 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2516 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	2517 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2518 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	2519 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2520 case VAR_UNKNOWN:
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2521 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2522 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	2523 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	2524 break;
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_SPECIAL:
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_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	2527 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2528 case VAR_NUMBER:
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2529 generate_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	2530 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2531 #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	2532 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	2533 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	2534 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2535 #endif
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2536 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	2537 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	2538 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	2539 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2540 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	2541 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	2542 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	2543 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2544 default:
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2545 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	2546 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	2547 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	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 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	2550 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2551 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	2552 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2553
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2554 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2555 * 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	2556 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2557 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	2558 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	2559 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2560 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	2561 int ret = OK;
20332 a407e243c55c patch 8.2.0721: Vim9: leaking memory when skipping Bram Moolenaar <Bram@vim.org> parents: 20328 diff changeset	2562 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	2563
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	2564 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	2565 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	2566 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	2567 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	2568 ppconst->pp_used = 0;
20332 a407e243c55c patch 8.2.0721: Vim9: leaking memory when skipping Bram Moolenaar <Bram@vim.org> parents: 20328 diff changeset	2569 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	2570 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	2571 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2572
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2573 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2574 * Clear 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	2575 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2576 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	2577 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	2578 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2579 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	2580
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2581 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	2582 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	2583 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	2584 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2585
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	2586 /*
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2587 * 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	2588 * leading "s:".
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2589 * 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	2590 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2591 static int
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2592 compile_load_scriptvar(
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2593 cctx_T *cctx,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2594 char_u *name, // variable NUL terminated
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2595 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	2596 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	2597 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	2598 {
19191 133ef7ba4e4e patch 8.2.0154: reallocating the list of scripts is inefficient Bram Moolenaar <Bram@vim.org> parents: 19181 diff changeset	2599 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	2600 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	2601 imported_T *import;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2602
19451 b26e96f7c12f patch 8.2.0283: Vim9: failing to load script var not tested Bram Moolenaar <Bram@vim.org> parents: 19437 diff changeset	2603 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	2604 {
19451 b26e96f7c12f patch 8.2.0283: Vim9: failing to load script var not tested Bram Moolenaar <Bram@vim.org> parents: 19437 diff changeset	2605 // 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	2606 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	2607 &t_any);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2608 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2609 if (idx >= 0)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2610 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2611 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	2612
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	2613 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	2614 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	2615 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2616 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2617
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	2618 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	2619 if (import != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2620 {
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2621 if (import->imp_all)
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 char_u p = skipwhite(end);
21146 465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2624 char_u *exp_name;
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2625 int cc;
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2626 ufunc_T *ufunc;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2627 type_T *type;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2628
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2629 // 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	2630 if (*p != '.')
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2631 {
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2632 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	2633 return FAIL;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2634 }
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2635 ++p;
19818 c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2636 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	2637 {
c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2638 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	2639 return FAIL;
c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2640 }
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2641
21146 465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2642 // isolate one name
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2643 exp_name = p;
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2644 while (eval_isnamec(*p))
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2645 ++p;
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2646 cc = *p;
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2647 *p = NUL;
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2648
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2649 idx = find_exported(import->imp_sid, exp_name, &ufunc, &type);
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2650 *p = cc;
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2651 p = skipwhite(p);
465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	2652
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2653 // 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	2654 if (idx < 0)
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2655 return FAIL;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2656 *end = p;
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2657
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2658 generate_VIM9SCRIPT(cctx, ISN_LOADSCRIPT,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2659 import->imp_sid,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2660 idx,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2661 type);
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2662 }
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2663 else
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2664 {
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2665 // 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	2666 generate_VIM9SCRIPT(cctx, ISN_LOADSCRIPT,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2667 import->imp_sid,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2668 import->imp_var_vals_idx,
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2669 import->imp_type);
17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2670 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2671 return OK;
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
19530 48e71f948360 patch 8.2.0322: Vim9: error checks not tested Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	2674 if (error)
48e71f948360 patch 8.2.0322: Vim9: error checks not tested Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	2675 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	2676 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2677 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2678
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2679 static int
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2680 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	2681 {
20189 63cc54100ae4 patch 8.2.0650: Vim9: script function can be deleted Bram Moolenaar <Bram@vim.org> parents: 20174 diff changeset	2682 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	2683
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2684 if (ufunc == NULL)
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2685 return FAIL;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2686
21202 1a4e22aa2eb3 patch 8.2.1152: Vim9: function reference is missing script prefix Bram Moolenaar <Bram@vim.org> parents: 21196 diff changeset	2687 return generate_PUSHFUNC(cctx, vim_strsave(ufunc->uf_name),
1a4e22aa2eb3 patch 8.2.1152: Vim9: function reference is missing script prefix Bram Moolenaar <Bram@vim.org> parents: 21196 diff changeset	2688 ufunc->uf_func_type);
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2689 }
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2690
19181 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 * 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	2693 * "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	2694 * 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	2695 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2696 static int
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2697 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	2698 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2699 type_T *type;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2700 char_u *name;
19509 17f0d6dc6a73 patch 8.2.0312: Vim9: insufficient script tests Bram Moolenaar <Bram@vim.org> parents: 19481 diff changeset	2701 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	2702 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	2703 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	2704
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2705 if ((arg + 1) == ':')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2706 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2707 // load namespaced variable
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2708 if (end <= *arg + 2)
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2709 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	2710 else
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2711 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	2712 if (name == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2713 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2714
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2715 if (**arg == 'v')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2716 {
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	2717 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	2718 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2719 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	2720 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2721 // 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	2722 // 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	2723 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	2724 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2725 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	2726 {
19530 48e71f948360 patch 8.2.0322: Vim9: error checks not tested Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	2727 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	2728 }
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2729 else if (**arg == 'b')
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2730 {
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	2731 // 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	2732 // 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	2733 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	2734 }
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2735 else if (**arg == 'w')
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2736 {
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	2737 // 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	2738 // 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	2739 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	2740 }
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2741 else if (**arg == 't')
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2742 {
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	2743 // 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	2744 // 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	2745 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	2746 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2747 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2748 {
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	2749 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	2750 goto theend;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2751 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2752 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2753 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2754 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2755 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	2756 int idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2757 int gen_load = FALSE;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2758 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	2759
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2760 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	2761 if (name == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2762 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2763
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	2764 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	2765 {
20275 350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	2766 if (!gen_load_outer)
350bb78345ba patch 8.2.0693: closure using argument not tested Bram Moolenaar <Bram@vim.org> parents: 20259 diff changeset	2767 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	2768 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2769 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2770 {
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	2771 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	2772
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	2773 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	2774 {
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	2775 type = lvar->lv_type;
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	2776 idx = lvar->lv_idx;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2777 if (lvar->lv_from_outer)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2778 gen_load_outer = TRUE;
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2779 else
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2780 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	2781 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2782 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2783 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2784 // "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	2785 // 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	2786 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	2787 == 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	2788 \|\| 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	2789 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	2790 FALSE);
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2791
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2792 // 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	2793 // 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	2794 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	2795 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	2796 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2797 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2798 if (gen_load)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2799 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	2800 if (gen_load_outer)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	2801 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	2802 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2803
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2804 *arg = end;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2805
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2806 theend:
19818 c1c88b333481 patch 8.2.0465: Vim9: dead code and wrong return type Bram Moolenaar <Bram@vim.org> parents: 19785 diff changeset	2807 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	2808 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	2809 vim_free(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2810 return res;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2811 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2812
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2813 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2814 * 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	2815 * "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	2816 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2817 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2818 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	2819 {
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2820 char_u p = arg;
c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2821 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	2822
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2823 for (;;)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2824 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	2825 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	2826 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	2827 if (*p == ')')
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2828 {
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2829 *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	2830 return OK;
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2831 }
628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2832
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2833 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	2834 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2835 ++*argcount;
19437 5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2836
5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2837 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	2838 {
19904 bd4f91762d0f patch 8.2.0508: Vim9: func and partial types not done yet Bram Moolenaar <Bram@vim.org> parents: 19896 diff changeset	2839 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	2840 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	2841 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2842 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	2843 {
5d34ae66118e patch 8.2.0276: Vim9: not allowing space before ")" in function call Bram Moolenaar <Bram@vim.org> parents: 19423 diff changeset	2844 ++p;
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2845 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	2846 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	2847 }
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2848 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	2849 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	2850 }
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	2851 failret:
20011 628011800942 patch 8.2.0561: Vim9: cannot split function call in multiple lines Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	2852 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	2853 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2854 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2855
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2856 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2857 * 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	2858 * "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	2859 * "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	2860 * Instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2861 * EVAL arg1
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2862 * EVAL arg2
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2863 * BCALL / DCALL / UCALL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2864 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2865 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	2866 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	2867 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	2868 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	2869 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	2870 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	2871 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	2872 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2873 char_u name = arg;
19257 5aab9c306181 patch 8.2.0187: reduntant code Bram Moolenaar <Bram@vim.org> parents: 19253 diff changeset	2874 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	2875 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	2876 char_u namebuf[100];
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2877 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	2878 char_u *tofree = NULL;
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2879 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	2880 ufunc_T *ufunc;
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2881 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	2882
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2883 // 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	2884 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	2885 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2886 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	2887 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	2888
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2889 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	2890 if (*s == '"')
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	2891 (void)eval_string(&s, &argvars[0], TRUE);
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2892 else if (*s == '\'')
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	2893 (void)eval_lit_string(&s, &argvars[0], TRUE);
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2894 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	2895 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	2896 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2897 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	2898
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2899 *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	2900 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	2901 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	2902 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	2903 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	2904 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	2905 ++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	2906 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	2907 }
20332 a407e243c55c patch 8.2.0721: Vim9: leaking memory when skipping Bram Moolenaar <Bram@vim.org> parents: 20328 diff changeset	2908 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	2909 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2910
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	2911 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	2912 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	2913
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2914 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	2915 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2916 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	2917 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2918 }
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2919 vim_strncpy(namebuf, *arg, varlen);
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2920 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	2921
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2922 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	2923 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	2924 goto theend;
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2925
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2926 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	2927 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2928 int idx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2929
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2930 // builtin function
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2931 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	2932 if (idx >= 0)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2933 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	2934 else
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	2935 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	2936 goto theend;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2937 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2938
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2939 // 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	2940 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	2941 if (ufunc != NULL)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2942 {
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2943 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	2944 goto theend;
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2945 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2946
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2947 // 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	2948 // 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	2949 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	2950 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	2951 && 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	2952 {
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	2953 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	2954 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	2955
5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	2956 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	2957 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	2958 goto theend;
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2959 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2960
20140 39a18a0df429 patch 8.2.0625: Vim9: confusing error when calling unknown function Bram Moolenaar <Bram@vim.org> parents: 20138 diff changeset	2961 // 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	2962 // 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	2963 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	2964 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	2965 else
39a18a0df429 patch 8.2.0625: Vim9: confusing error when calling unknown function Bram Moolenaar <Bram@vim.org> parents: 20138 diff changeset	2966 semsg(_(e_unknownfunc), namebuf);
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2967
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2968 theend:
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2969 vim_free(tofree);
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: 19328 diff changeset	2970 return res;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2971 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2972
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2973 // 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	2974 #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	2975
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2976 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2977 * 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	2978 * 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	2979 * 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	2980 * 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	2981 * valid name.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2982 */
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	2983 static char_u *
ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	2984 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	2985 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2986 char_u *p;
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 // 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	2989 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	2990 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2991
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2992 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	2993 // 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	2994 // 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	2995 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	2996 \|\| !namespace
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2997 \|\| 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	2998 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	2999 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3000 }
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3003 * Like to_name_end() but also skip over a list or dict constant.
21146 465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	3004 * This intentionally does not handle line continuation.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3005 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3006 char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3007 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	3008 {
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	3009 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	3010 typval_T rettv;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3011
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3012 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	3013 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3014
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3015 // Can be "[1, 2, 3]->Func()".
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3016 if (eval_list(&p, &rettv, NULL, FALSE) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3017 p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3018 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3019 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	3020 {
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	3021 // Can be "#{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	3022 ++p;
21034 2f8b0812819f patch 8.2.1068: Vim9: no line break allowed inside a dict Bram Moolenaar <Bram@vim.org> parents: 21028 diff changeset	3023 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	3024 p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3025 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3026 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	3027 {
21040 d9e0db9b2b99 patch 8.2.1071: Vim9: no line break allowed inside a lambda Bram Moolenaar <Bram@vim.org> parents: 21034 diff changeset	3028 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	3029
19822 fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	3030 // Can be "{x -> ret}()".
fc3cdc819d80 patch 8.2.0467: Vim9: some errors are not tested Bram Moolenaar <Bram@vim.org> parents: 19818 diff changeset	3031 // 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	3032 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	3033 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	3034 if (ret != OK)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3035 p = arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3036 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3037
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3038 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3039 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3040
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3041 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3042 * 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	3043 * "*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	3044 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3045 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3046 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	3047 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3048 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	3049 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	3050 int count = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3051
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3052 for (;;)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3053 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3054 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	3055 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3056 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	3057 return FAIL;
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3058 }
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3059 if (*p == ']')
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3060 {
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3061 ++p;
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3062 // 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	3063 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	3064 p += STRLEN(p);
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3065 break;
19830 6500dcaf8e1a patch 8.2.0471: missing change to compile_list() Bram Moolenaar <Bram@vim.org> parents: 19822 diff changeset	3066 }
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3067 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	3068 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3069 ++count;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3070 if (*p == ',')
21216 bcd08812cde3 patch 8.2.1159: Vim9: no error for missing space after a comma Bram Moolenaar <Bram@vim.org> parents: 21210 diff changeset	3071 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3072 ++p;
21216 bcd08812cde3 patch 8.2.1159: Vim9: no error for missing space after a comma Bram Moolenaar <Bram@vim.org> parents: 21210 diff changeset	3073 if (p != ']' && !IS_WHITE_OR_NUL(p))
bcd08812cde3 patch 8.2.1159: Vim9: no error for missing space after a comma Bram Moolenaar <Bram@vim.org> parents: 21210 diff changeset	3074 {
bcd08812cde3 patch 8.2.1159: Vim9: no error for missing space after a comma Bram Moolenaar <Bram@vim.org> parents: 21210 diff changeset	3075 semsg(_(e_white_after), ",");
bcd08812cde3 patch 8.2.1159: Vim9: no error for missing space after a comma Bram Moolenaar <Bram@vim.org> parents: 21210 diff changeset	3076 return FAIL;
bcd08812cde3 patch 8.2.1159: Vim9: no error for missing space after a comma Bram Moolenaar <Bram@vim.org> parents: 21210 diff changeset	3077 }
bcd08812cde3 patch 8.2.1159: Vim9: no error for missing space after a comma Bram Moolenaar <Bram@vim.org> parents: 21210 diff changeset	3078 }
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3079 whitep = p;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3080 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3081 }
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3082 *arg = p;
19181 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 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	3085 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3086 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3087
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 * 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	3090 * "*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	3091 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3092 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3093 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	3094 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3095 typval_T rettv;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3096 ufunc_T *ufunc;
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3097 evalarg_T evalarg;
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3098
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3099 CLEAR_FIELD(evalarg);
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3100 evalarg.eval_flags = EVAL_EVALUATE;
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3101 evalarg.eval_cctx = cctx;
19181 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 // Get the funcref in "rettv".
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3104 if (get_lambda_tv(arg, &rettv, &evalarg) != OK)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3105 return FAIL;
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3106
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3107 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	3108 ++ufunc->uf_refcount;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3109 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	3110 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	3111
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3112 // 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	3113 // Compile it into instructions.
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	3114 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	3115
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	3116 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	3117 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	3118 return FAIL;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3121 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3122 * 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	3123 * "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	3124 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3125 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3126 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	3127 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3128 ufunc_T *ufunc;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3129 typval_T rettv;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3130 int argcount = 1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3131 int ret = FAIL;
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 // 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	3134 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	3135 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3136
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3137 if (**arg != '(')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3138 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3139 if (skipwhite(arg) == '(')
19760 9daed26b788b patch 8.2.0436: no warnings for incorrect printf arguments Bram Moolenaar <Bram@vim.org> parents: 19726 diff changeset	3140 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	3141 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3142 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	3143 clear_tv(&rettv);
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 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3146
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3147 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	3148 ++ufunc->uf_refcount;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	3149 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	3150 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	3151
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3152 // 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	3153 // Compile it into instructions.
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	3154 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	3155
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3156 // compile the arguments
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3157 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	3158 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	3159 // 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	3160 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	3161
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3162 return ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3163 }
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3166 * 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	3167 * "*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	3168 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3169 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3170 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	3171 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3172 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	3173 int count = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3174 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	3175 dictitem_T *item;
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3176 char_u whitep = arg;
c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3177 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	3178
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3179 if (d == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3180 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3181 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	3182 for (;;)
19181 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 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	3185
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3186 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	3187 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3188 *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	3189 goto failret;
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3190 }
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3191
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3192 if (**arg == '}')
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3193 break;
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3194
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3195 if (literal)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3196 {
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3197 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	3198
c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3199 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	3200 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3201 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	3202 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3203 }
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3204 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	3205 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	3206 return FAIL;
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3207 *arg = end;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3208 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3209 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3210 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3211 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3212
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3213 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	3214 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3215 // 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	3216 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	3217 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	3218 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	3219 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3220
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3221 // 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	3222 if (key != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3223 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3224 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	3225 if (item != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3226 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3227 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	3228 goto failret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3229 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3230 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	3231 if (item != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3232 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3233 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	3234 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	3235 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	3236 dictitem_free(item);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3237 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3238 }
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 arg = skipwhite(arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3241 if (**arg != ':')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3242 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3243 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	3244 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3245 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3246
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3247 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	3248 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	3249 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	3250 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3251 *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	3252 goto failret;
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3253 }
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3254
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3255 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	3256 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3257 ++count;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3258
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3259 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	3260 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	3261 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	3262 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3263 *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	3264 goto failret;
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3265 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3266 if (**arg == '}')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3267 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3268 if (**arg != ',')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3269 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3270 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	3271 goto failret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3272 }
20023 c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3273 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	3274 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	3275 }
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 arg = arg + 1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3278
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3279 // 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	3280 p = skipwhite(*arg);
c85d4e173cc9 patch 8.2.0567: Vim9: cannot put comments halfway expressions Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	3281 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	3282 arg += STRLEN(arg);
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3283
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3284 dict_unref(d);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3285 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	3286
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3287 failret:
19999 844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3288 if (*arg == NULL)
844c7646f61b patch 8.2.0555: Vim9: line continuation is not always needed Bram Moolenaar <Bram@vim.org> parents: 19993 diff changeset	3289 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	3290 dict_unref(d);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3291 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3292 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3293
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3294 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3295 * Compile "&option".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3296 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3297 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3298 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	3299 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3300 typval_T rettv;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3301 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	3302 int ret;
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 // 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	3305 rettv.v_type = VAR_UNKNOWN;
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3306 ret = eval_option(arg, &rettv, TRUE);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3307 if (ret == OK)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3308 {
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3309 // include the '&' in the name, eval_option() expects it.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3310 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	3311 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	3312
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3313 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	3314 vim_free(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3315 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3316 clear_tv(&rettv);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3317
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3318 return ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3319 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3320
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 * Compile "$VAR".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3323 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3324 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3325 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	3326 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3327 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	3328 int len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3329 int ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3330 char_u *name;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3331
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3332 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3333 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	3334 if (len == 0)
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 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	3337 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3338 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3339
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3340 // include the '$' in the name, eval_env_var() expects it.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3341 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	3342 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	3343 vim_free(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3344 return ret;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3347 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3348 * Compile "@r".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3349 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3350 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3351 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	3352 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3353 int ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3354
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3355 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3356 if (**arg == NUL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3357 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3358 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	3359 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3360 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3361 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	3362 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3363 emsg_invreg(**arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3364 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3365 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3366 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	3367 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3368 return ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3369 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3370
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3371 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3372 * 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	3373 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3374 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3375 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	3376 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3377 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	3378
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3379 // 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	3380 while (p > start)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3381 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3382 --p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3383 if (p == '-' \|\| p == '+')
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 // 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	3386 #ifdef FEAT_FLOAT
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3387 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	3388 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3389 if (*p == '-')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3390 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	3391 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3392 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3393 #endif
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 varnumber_T val;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3396 int error = FALSE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3397
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3398 // 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	3399 // here
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3400 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	3401 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3402 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	3403 clear_tv(rettv);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3404 if (error)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3405 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3406 if (*p == '-')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3407 val = -val;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3408 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	3409 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	3410 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3411 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3412 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3413 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3414 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	3415
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3416 // '!' 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	3417 clear_tv(rettv);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3418 rettv->v_type = VAR_BOOL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3419 rettv->vval.v_number = 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	3420 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3421 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3422 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3423 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3424
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3425 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3426 * 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	3427 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3428 static void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3429 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	3430 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3431 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	3432 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3433 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	3434 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	3435 *arg += 6;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3436 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3437 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	3438 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3439 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	3440 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	3441 *arg += 7;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3442 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3443 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	3444 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3445 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	3446 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	3447 *arg += 6;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3448 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3449 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	3450 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3451 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	3452 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	3453 *arg += 6;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3454 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3455 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3456
20305 9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3457 static exptype_T
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3458 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	3459 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3460 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	3461 int 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 switch (p[0])
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3464 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3465 case '=': if (p[1] == '=')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3466 type = EXPR_EQUAL;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3467 else if (p[1] == '~')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3468 type = EXPR_MATCH;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3469 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3470 case '!': if (p[1] == '=')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3471 type = EXPR_NEQUAL;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3472 else if (p[1] == '~')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3473 type = EXPR_NOMATCH;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3474 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3475 case '>': if (p[1] != '=')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3476 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3477 type = EXPR_GREATER;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3478 *len = 1;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3479 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3480 else
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3481 type = EXPR_GEQUAL;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3482 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3483 case '<': if (p[1] != '=')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3484 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3485 type = EXPR_SMALLER;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3486 *len = 1;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3487 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3488 else
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3489 type = EXPR_SEQUAL;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3490 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3491 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	3492 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3493 // "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	3494 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	3495 *len = 5;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3496 i = p[*len];
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3497 if (!isalnum(i) && i != '_')
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3498 {
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3499 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	3500 *type_is = TRUE;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3501 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3502 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3503 break;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3504 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3505 return type;
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3506 }
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3507
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	3508 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3509 * 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	3510 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3511 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3512 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	3513 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3514 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	3515
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3516 // 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	3517 while (p > start)
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 --p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3520 if (p == '-' \|\| p == '+')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3521 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3522 int negate = *p == '-';
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3523 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3524
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3525 // TODO: check type
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3526 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	3527 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3528 --p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3529 if (*p == '-')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3530 negate = !negate;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3531 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3532 // 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	3533 if (negate)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3534 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	3535 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3536 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	3537 if (isn == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3538 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3539 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3540 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3541 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3542 int invert = TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3543
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3544 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	3545 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3546 --p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3547 invert = !invert;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3548 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3549 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	3550 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3551 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3552 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3553 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3554 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3555
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3556 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3557 * Compile whatever comes after "name" or "name()".
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3558 * Advances "*arg" only when something was recognized.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3559 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3560 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3561 compile_subscript(
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3562 char_u **arg,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3563 cctx_T *cctx,
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3564 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	3565 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	3566 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	3567 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3568 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3569 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3570 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	3571
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3572 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	3573 {
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3574 char_u *next = peek_next_line_from_context(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	3575
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3576 // 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	3577 // 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	3578 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	3579 && (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	3580 {
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3581 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	3582 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	3583 return FAIL;
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3584 *arg = next;
09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3585 p = skipwhite(*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	3586 }
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3587 }
396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	3588
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3589 if (*p == '(')
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3590 {
20203 5a397db2c1ed patch 8.2.0657: Vim9: no check if called variable is a FuncRef Bram Moolenaar <Bram@vim.org> parents: 20189 diff changeset	3591 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	3592 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	3593 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	3594
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3595 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	3596 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3597
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3598 // 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	3599 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	3600
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3601 *arg = skipwhite(p + 1);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3602 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	3603 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	3604 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	3605 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3606 }
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3607 else if (*p == '-' && p[1] == '>')
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3608 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3609 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	3610 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3611
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3612 // something->method()
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3613 // 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	3614 // -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	3615 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	3616 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3617 *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	3618
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3619 p += 2;
20949 62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3620 *arg = skipwhite(p);
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3621 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	3622 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3623 if (**arg == '{')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3624 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3625 // 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	3626 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	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 else
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 // 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	3632 p = *arg;
36d629aa3d6e patch 8.2.0480: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19830 diff changeset	3633 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	3634 p += 2;
36d629aa3d6e patch 8.2.0480: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19830 diff changeset	3635 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	3636 ;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3637 if (*p != '(')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3638 {
19848 36d629aa3d6e patch 8.2.0480: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19830 diff changeset	3639 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	3640 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3641 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3642 // 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	3643 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	3644 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3645 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3646 }
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3647 else if (*p == '[')
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3648 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3649 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	3650 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	3651
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3652 // 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	3653 // 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	3654 // 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	3655 // 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	3656 // 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	3657 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	3658 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3659
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3660 ++p;
20949 62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3661 *arg = skipwhite(p);
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3662 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	3663 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	3664 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	3665 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3666
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3667 if (**arg != ']')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3668 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3669 emsg(_(e_missbrac));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3670 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3671 }
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	3672 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	3673
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3674 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	3675 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	3676 {
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3677 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	3678 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	3679 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	3680 return FAIL;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3681 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3682 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	3683 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3684 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	3685 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	3686 return FAIL;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3687 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	3688 return FAIL;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3689 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3690 else
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3691 {
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3692 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	3693 return FAIL;
f3e8e74cb747 patch 8.2.0269: Vim9: operator after list index does not work Bram Moolenaar <Bram@vim.org> parents: 19411 diff changeset	3694 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3695 }
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3696 else if (*p == '.' && p[1] != '.')
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3697 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3698 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	3699 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3700
21208 09377fd59b2e patch 8.2.1155: Vim9: cannot handle line break inside lambda Bram Moolenaar <Bram@vim.org> parents: 21202 diff changeset	3701 *arg = p + 1;
20949 62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3702 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	3703 return FAIL;
62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	3704 // 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	3705 p = *arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3706 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	3707 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	3708 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	3709 if (p == *arg)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3710 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3711 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	3712 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3713 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	3714 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	3715 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3716 *arg = p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3717 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3718 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3719 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3720 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3721
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3722 // 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	3723 // 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	3724 // 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	3725 // 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	3726
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3727 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3728 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3729
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3730 /*
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3731 * 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	3732 * "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	3733 *
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3734 * 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	3735 * 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	3736 *
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3737 * 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	3738 */
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3741 * number number constant
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3742 * 0zFFFFFFFF Blob constant
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3743 * "string" string constant
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3744 * '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	3745 * &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	3746 * @r register contents
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3747 * identifier variable value
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3748 * function() function call
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3749 * $VAR environment variable
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3750 * (expression) nested expression
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3751 * [expr, expr] List
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3752 * {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	3753 * #{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	3754 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3755 * Also handle:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3756 * ! 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	3757 * - 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	3758 * + 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	3759 * 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	3760 * 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	3761 * 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	3762 * 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	3763 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3764 static int
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3765 compile_expr7(
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3766 char_u **arg,
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	3767 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	3768 ppconst_T *ppconst)
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3769 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3770 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	3771 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	3772 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	3773 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	3774
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3775 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3776 * 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	3777 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3778 start_leader = *arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3779 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	3780 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	3781 end_leader = *arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3782
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3783 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	3784 switch (**arg)
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3787 * Number constant.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3788 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3789 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	3790 case '1':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3791 case '2':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3792 case '3':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3793 case '4':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3794 case '5':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3795 case '6':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3796 case '7':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3797 case '8':
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3798 case '9':
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3799 case '.': if (eval_number(arg, rettv, TRUE, FALSE) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3800 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3801 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3802
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3803 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3804 * String constant: "string".
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3805 */
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3806 case '"': if (eval_string(arg, rettv, TRUE) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3807 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3808 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3809
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3810 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3811 * 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	3812 */
21120 4d844a65183d patch 8.2.1111: inconsistent naming of get_list_tv() and eval_dict() Bram Moolenaar <Bram@vim.org> parents: 21116 diff changeset	3813 case '\'': if (eval_lit_string(arg, rettv, TRUE) == FAIL)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3814 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3815 break;
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3818 * Constant Vim variable.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3819 */
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3820 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	3821 ret = NOTDONE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3822 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3823
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3824 /*
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3825 * "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	3826 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3827 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	3828 && !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	3829 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3830 *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	3831 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	3832 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	3833 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3834 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3835 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	3836 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3837
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3838 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3839 * "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	3840 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3841 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	3842 && !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	3843 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3844 *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	3845 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	3846 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	3847 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3848 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3849 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	3850 break;
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3851
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3852 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3853 * List: [expr, expr]
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3854 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3855 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	3856 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3857
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 * 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	3860 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3861 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	3862 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3863 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3864 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	3865 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3866 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3867 ret = NOTDONE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3868 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3869
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3870 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3871 * 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	3872 * 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	3873 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3874 case '{': {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3875 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	3876
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3877 // Find out what comes after the arguments.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3878 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	3879 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	3880 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	3881 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	3882 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3883 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	3884 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3885 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3886
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3887 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3888 * Option value: &name
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3889 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3890 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	3891 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3892
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 * Environment variable: $VAR.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3895 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3896 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	3897 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3898
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3899 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3900 * Register contents: @r.
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 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	3903 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3904 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3905 * nested expression: (expression).
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3906 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3907 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	3908
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3909 // recursive!
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3910 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	3911 {
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3912 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	3913 }
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3914 else
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3915 {
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3916 // 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	3917 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	3918 return FAIL;
2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3919 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	3920 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3921 arg = skipwhite(arg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3922 if (**arg == ')')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3923 ++*arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3924 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	3925 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3926 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	3927 ret = FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3928 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3929 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3930
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3931 default: ret = NOTDONE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3932 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3933 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3934 if (ret == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3935 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3936
20336 2fd980fb9ab3 patch 8.2.0723: Vim9: nested constant expression not evaluated compile time Bram Moolenaar <Bram@vim.org> parents: 20334 diff changeset	3937 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	3938 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3939 // 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	3940 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	3941 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	3942 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	3943 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3944 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3945 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	3946
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	3947 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	3948 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	3949 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3950 // 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	3951 // 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	3952 ++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	3953 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3954 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	3955 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3956 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3957 int r;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3958
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3959 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	3960 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3961 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	3962 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3963 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3964
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3965 // "name" or "name()"
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	3966 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	3967 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	3968 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3969 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	3970 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3971 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	3972 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3973 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	3974 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3975 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	3976 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3977 if (r == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3978 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3979 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3980
20322 a3e78893a90b patch 8.2.0716: Vim9: another memory leak Bram Moolenaar <Bram@vim.org> parents: 20320 diff changeset	3981 // Handle following "[]", ".member", etc.
a3e78893a90b patch 8.2.0716: Vim9: another memory leak Bram Moolenaar <Bram@vim.org> parents: 20320 diff changeset	3982 // 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	3983 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	3984 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	3985 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	3986 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	3987 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3988 // 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	3989 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	3990 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	3991 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	3992 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	3993 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	3994 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	3995 return FAIL;
20322 a3e78893a90b patch 8.2.0716: Vim9: another memory leak Bram Moolenaar <Bram@vim.org> parents: 20320 diff changeset	3996 return OK;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3997 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	3998
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 * * number multiplication
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4001 * / number division
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4002 * % number modulo
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4003 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4004 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	4005 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	4006 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4007 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	4008 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	4009 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	4010
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4011 // 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	4012 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	4013 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4014
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4015 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4016 * 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	4017 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4018 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4019 {
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4020 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	4021 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	4022 break;
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4023 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	4024 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4025 *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	4026 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	4027 }
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4028
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4029 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	4030 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4031 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	4032
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4033 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	4034 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	4035 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4036 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4037 *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	4038 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	4039 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4040
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4041 // 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	4042 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	4043 return FAIL;
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4044
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4045 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	4046 && 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	4047 && 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	4048 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4049 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	4050 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	4051 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	4052
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4053 // 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	4054 switch (*op)
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4055 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4056 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	4057 break;
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4058 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	4059 break;
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4060 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	4061 break;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4062 }
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4063 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	4064 --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	4065 }
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4066 else
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4067 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4068 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	4069 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	4070 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4071 }
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 return OK;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4076 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4077 * + number addition
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4078 * - number subtraction
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4079 * .. string concatenation
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4080 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4081 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	4082 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	4083 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4084 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	4085 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	4086 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	4087 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	4088
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4089 // 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	4090 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	4091 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4092
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4093 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4094 * 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	4095 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4096 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4097 {
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4098 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	4099 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	4100 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4101 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	4102 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	4103 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4104 *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	4105 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	4106 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4107
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4108 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	4109 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4110 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	4111
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4112 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	4113 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	4114 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4115 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4116
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4117 *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	4118 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	4119 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4120
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4121 // 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	4122 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	4123 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	4124
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4125 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	4126 && (*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	4127 ? (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	4128 && 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	4129 : (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	4130 && 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	4131 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4132 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	4133 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	4134
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4135 // 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	4136 if (*op == '+')
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4137 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	4138 else if (*op == '-')
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4139 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	4140 else
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4141 {
20324 23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4142 // concatenate constant strings
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4143 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	4144 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	4145 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	4146
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4147 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	4148 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	4149 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4150 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	4151 return FAIL;
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4152 }
23188ef99fc2 patch 8.2.0717: Vim9: postponed constant expressions does not scale Bram Moolenaar <Bram@vim.org> parents: 20322 diff changeset	4153 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	4154 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	4155 vim_free(s1);
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4156 vim_free(s2);
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4157 }
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4158 --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	4159 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4160 else
20318 3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4161 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4162 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	4163 if (*op == '.')
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4164 {
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4165 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	4166 \|\| 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	4167 return FAIL;
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4168 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	4169 }
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4170 else
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4171 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	4172 }
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4173 }
3cbcee39fc5c patch 8.2.0714: Vim9: handling constant expression does not scale Bram Moolenaar <Bram@vim.org> parents: 20305 diff changeset	4174
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4175 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4176 }
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4179 * expr5a == expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4180 * expr5a =~ expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4181 * expr5a != expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4182 * expr5a !~ expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4183 * expr5a > expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4184 * expr5a >= expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4185 * expr5a < expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4186 * expr5a <= expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4187 * expr5a is expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4188 * expr5a isnot expr5b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4189 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4190 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4191 * 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	4192 * 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	4193 * 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	4194 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4195 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	4196 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	4197 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4198 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	4199 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	4200 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	4201 int len = 2;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4202 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	4203 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	4204
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4205 // 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	4206 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	4207 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4208
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4209 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	4210 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	4211
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4212 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4213 * 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	4214 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4215 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	4216 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4217 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	4218
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4219 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	4220 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4221 *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	4222 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	4223 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4224 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	4225 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4226 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	4227 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4228 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4229 // 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	4230 if (p[len] == '?')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4231 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4232 ic = TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4233 ++len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4234 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4235 // 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	4236 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	4237 ++len;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4238 // 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	4239
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4240 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	4241 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4242 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	4243
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4244 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	4245 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	4246 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4247 }
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 // 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	4250 *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	4251 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	4252 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4253
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4254 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	4255 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4256
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4257 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	4258 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4259 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	4260 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	4261 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	4262
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4263 // 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	4264 // 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	4265 // 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	4266 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	4267 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	4268 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4269 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4270 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	4271 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	4272 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	4273 ? 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	4274 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	4275 --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	4276 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4277 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	4278 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4279
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4280 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	4281 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	4282 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4283
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4284 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4285 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4286
20334 b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	4287 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	4288
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4289 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4290 * Compile \|\| or &&.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4291 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4292 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	4293 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	4294 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	4295 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	4296 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	4297 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	4298 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	4299 {
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4300 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	4301 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	4302 int opchar = *op;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4303
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4304 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	4305 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4306 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	4307 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	4308
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4309 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4310 * 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	4311 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4312 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	4313 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	4314 {
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4315 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	4316 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4317 *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	4318 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	4319 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4320
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4321 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	4322 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4323 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	4324 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4325 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4326
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4327 // 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	4328 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	4329
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4330 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	4331 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4332 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	4333 return FAIL;
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 (((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	4336 ++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	4337 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	4338 ? 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	4339
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4340 // 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	4341 *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	4342 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	4343 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4344
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4345 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	4346 : 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	4347 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4348 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	4349 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4350 }
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4351
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4352 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	4353 }
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4354 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	4355
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4356 // 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	4357 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	4358 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4359 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4360
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4361 --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	4362 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	4363 + (((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	4364 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	4365 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4366 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	4367 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4368
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4369 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4370 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4371
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4372 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4373 * 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	4374 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4375 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4376 * 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	4377 * 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	4378 * 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	4379 * 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	4380 * 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	4381 * end:
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 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	4384 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	4385 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4386 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	4387
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4388 // 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	4389 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	4390 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4391
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4392 // \|\| 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	4393 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	4394 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4395
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4396 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4397 * 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	4398 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4399 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4400 * 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	4401 * 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	4402 * 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	4403 * 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	4404 * 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	4405 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4406 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4407 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	4408 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	4409 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4410 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	4411
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4412 // 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	4413 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	4414 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4415
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4416 // \|\| 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	4417 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	4418 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4419
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4420 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4421 * 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	4422 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4423 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4424 * 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	4425 * 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	4426 * EVAL expr1a
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4427 * JUMP_ALWAYS end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4428 * alt: EVAL expr1b
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4429 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4430 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4431 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	4432 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	4433 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4434 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	4435 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	4436 char_u *next;
20305 9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	4437
9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	4438 // 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	4439 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	4440 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4441
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4442 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	4443 if (*p == '?')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4444 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4445 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	4446 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	4447 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	4448 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	4449 isn_T *isn;
20966 0ee7de260208 patch 8.2.1034: compiler warning for uninitialized variables Bram Moolenaar <Bram@vim.org> parents: 20961 diff changeset	4450 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	4451 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	4452 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	4453 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	4454 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	4455
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4456 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	4457 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4458 *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	4459 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	4460 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4461
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4462 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	4463 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4464 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	4465 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4466 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4467
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4468 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	4469 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4470 // 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	4471 // 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	4472 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	4473 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	4474 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	4475 --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	4476 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	4477 ? 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	4478 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4479 else
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4480 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4481 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	4482 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	4483 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4484
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4485 // 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	4486 *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	4487 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	4488 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	4489 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	4490 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4491
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4492 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	4493 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4494 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	4495
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4496 // 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	4497 --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	4498 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	4499
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4500 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	4501 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	4502
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4503 // 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	4504 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	4505 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	4506 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4507
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4508 // 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	4509 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	4510 if (*p != ':')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4511 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4512 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	4513 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4514 }
20988 ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4515 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	4516 {
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4517 *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	4518 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	4519 }
ae4b1d497a06 patch 8.2.1045: Vim9: line break before operator does not work Bram Moolenaar <Bram@vim.org> parents: 20982 diff changeset	4520
20013 bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4521 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	4522 {
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4523 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	4524 return FAIL;
bf377a9ffccb patch 8.2.0562: Vim9: cannot split an expression into multiple lines Bram Moolenaar <Bram@vim.org> parents: 20011 diff changeset	4525 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4526
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4527 // 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	4528 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	4529 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	4530 ? 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	4531 *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	4532 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	4533 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	4534 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	4535 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4536
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4537 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	4538 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4539 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	4540
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4541 // If 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	4542 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	4543 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	4544
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4545 // 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	4546 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	4547 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	4548 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4549
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4550 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	4551 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4552 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	4553 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4554
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4555 /*
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4556 * 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	4557 */
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4558 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	4559 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	4560 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4561 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	4562
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4563 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	4564 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	4565 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4566 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	4567 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	4568 }
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	4569 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	4570 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4571 return OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4572 }
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 * compile "return [expr]"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4576 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4577 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4578 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	4579 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4580 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	4581 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	4582 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	4583
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4584 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	4585 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4586 // 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	4587 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	4588 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4589
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4590 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	4591 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	4592 cctx->ctx_ufunc->uf_ret_type = stack_type;
21160 1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4593 else
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4594 {
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4595 if (cctx->ctx_ufunc->uf_ret_type->tt_type == VAR_VOID
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4596 && stack_type->tt_type != VAR_VOID
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4597 && stack_type->tt_type != VAR_UNKNOWN)
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4598 {
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4599 emsg(_("E1096: Returning a value in a function without a return type"));
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4600 return NULL;
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4601 }
1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4602 if (need_type(stack_type, cctx->ctx_ufunc->uf_ret_type, -1, cctx)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4603 == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4604 return NULL;
21160 1a393685e7ce patch 8.2.1131: Vim9: error message for returning a value is not clear Bram Moolenaar <Bram@vim.org> parents: 21158 diff changeset	4605 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4606 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4607 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4608 {
19860 37c4779ca8f5 patch 8.2.0486: Vim9: some code and error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19858 diff changeset	4609 // "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	4610 // 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	4611 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	4612 && 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	4613 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4614 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	4615 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4616 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4617
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4618 // 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	4619 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	4620 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4621
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4622 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	4623 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4624
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4625 // "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	4626 return skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4627 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4628
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4629 /*
20279 49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4630 * 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	4631 * 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	4632 * 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	4633 */
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4634 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	4635 exarg_getline(
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4636 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	4637 void *cookie,
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4638 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	4639 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	4640 {
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4641 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	4642
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4643 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	4644 {
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4645 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	4646 return NULL;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4647 }
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4648 ++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	4649 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	4650 [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	4651 }
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4652
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4653 /*
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4654 * 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	4655 */
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4656 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	4657 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	4658 {
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4659 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	4660 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	4661 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	4662 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	4663 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	4664
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4665 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	4666 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	4667 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	4668 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	4669 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	4670 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	4671
489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	4672 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	4673 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	4674 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	4675 && 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	4676 return NULL;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4677
20281 ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	4678 // 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	4679 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	4680 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	4681
ab8c8fd0f868 patch 8.2.0696: Vim9: nested function does not work properly Bram Moolenaar <Bram@vim.org> parents: 20279 diff changeset	4682 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	4683 \|\| 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	4684 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	4685
20305 9a5e2370df0e patch 8.2.0708: Vim9: constant expressions are not simplified Bram Moolenaar <Bram@vim.org> parents: 20295 diff changeset	4686 // 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	4687 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	4688 }
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4689
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	4690 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4691 * 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	4692 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4693 int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4694 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	4695 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4696 if (*p == '=')
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4697 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4698 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	4699 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4700 *heredoc = TRUE;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4701 return 3;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4702 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4703 return 1;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4704 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4705 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	4706 return 2;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4707 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	4708 return 3;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4709 return 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4710 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4711
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4712 // 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	4713 static char *reserved[] = {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4714 "true",
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4715 "false",
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4716 NULL
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4717 };
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4718
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4719 typedef enum {
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4720 dest_local,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4721 dest_option,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4722 dest_env,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4723 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	4724 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	4725 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	4726 dest_tab,
19285 86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4727 dest_vimvar,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4728 dest_script,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4729 dest_reg,
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4730 } assign_dest_T;
86665583dc83 patch 8.2.0201: cannot assign to an imported variable Bram Moolenaar <Bram@vim.org> parents: 19283 diff changeset	4731
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4732 /*
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4733 * 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	4734 */
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4735 static void
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4736 generate_loadvar(
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4737 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	4738 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	4739 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	4740 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	4741 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	4742 {
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4743 switch (dest)
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4744 {
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4745 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	4746 // 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	4747 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	4748 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4749 case dest_global:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4750 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	4751 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4752 case dest_buffer:
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4753 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	4754 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4755 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	4756 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	4757 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4758 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	4759 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	4760 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4761 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	4762 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	4763 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	4764 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4765 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	4766 // 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	4767 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	4768 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4769 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	4770 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	4771 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4772 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	4773 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	4774 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4775 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	4776 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	4777 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	4778 NULL, type);
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4779 else
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4780 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	4781 break;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4782 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4783 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4784
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4785 void
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4786 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	4787 {
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4788 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	4789
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4790 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	4791 {
20961 0e01976dfd3b patch 8.2.1032: error message for declaring a variable cannot be translated Bram Moolenaar <Bram@vim.org> parents: 20955 diff changeset	4792 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	4793 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	4794 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	4795 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	4796 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	4797 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	4798 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	4799 }
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4800 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	4801 }
6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4802
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4803 /*
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4804 * Compile declaration and assignment:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4805 * "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	4806 * "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	4807 * 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	4808 * 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	4809 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4810 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4811 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	4812 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4813 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	4814 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	4815 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	4816 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	4817 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	4818 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	4819 int semicolon = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4820 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	4821 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	4822 char_u *op;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4823 int oplen = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4824 int heredoc = FALSE;
19872 8a7bede7b138 patch 8.2.0492: Vim9: some error messages not tested Bram Moolenaar <Bram@vim.org> parents: 19866 diff changeset	4825 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	4826 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	4827 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	4828 char_u *sp;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4829 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	4830
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4831 // 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	4832 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	4833 if (p == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4834 return *arg == '[' ? arg : NULL;
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 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	4837 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4838 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	4839 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4840 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4841
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4842 sp = p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4843 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4844 op = p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4845 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	4846
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4847 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	4848 // 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	4849 return arg;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4850
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4851 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	4852 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4853 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	4854
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4855 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	4856 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	4857 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	4858 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4859
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4860 if (heredoc)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4861 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4862 list_T *l;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4863 listitem_T *li;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4864
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4865 // [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	4866 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	4867 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	4868 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	4869
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4870 // 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	4871 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	4872 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4873 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	4874 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	4875 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4876 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	4877 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	4878 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	4879 list_free(l);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4880 p += STRLEN(p);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4881 end = p;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4882 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4883 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	4884 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4885 // 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	4886 // list of variables below.
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4887
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4888 p = skipwhite(op + oplen);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4889 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	4890 return NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4891 end = p;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	4892
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	4893 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	4894 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	4895 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	4896
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	4897 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	4898 : ((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	4899 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	4900 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4901 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	4902 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4903 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4904 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	4905 goto theend;
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	4906 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	4907 semicolon);
20859 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 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4910
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4911 /*
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4912 * 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	4913 * 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	4914 */
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4915 if (var_count > 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4916 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	4917 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4918 var_start = arg;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4919 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	4920 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4921 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	4922 size_t varlen;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4923 int new_local = FALSE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4924 int opt_type;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4925 int opt_flags = 0;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4926 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	4927 int vimvaridx = -1;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4928 lvar_T *lvar = NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4929 lvar_T arg_lvar;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4930 int has_type = FALSE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4931 int has_index = FALSE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4932 int instr_count = -1;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4933
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4934 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	4935 \|\| *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	4936 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	4937
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4938 // "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	4939 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	4940 --var_end;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4941 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	4942 --p;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4943
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4944 varlen = p - var_start;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4945 vim_free(name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4946 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	4947 if (name == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4948 return NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4949 if (!heredoc)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4950 type = &t_any;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4951
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	4952 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	4953 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4954 if (*var_start == '&')
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 int cc;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4957 long numval;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4958
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4959 dest = dest_option;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4960 if (cmdidx == CMD_const)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4961 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4962 emsg(_(e_const_option));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4963 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4964 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4965 if (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(_("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	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 p = var_start;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4971 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	4972 if (p == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4973 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4974 // cannot happen?
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4975 emsg(_(e_letunexp));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4976 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4977 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4978 cc = *p;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4979 *p = NUL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4980 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	4981 NULL, opt_flags);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4982 *p = cc;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4983 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	4984 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4985 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	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 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	4989 type = &t_string;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4990 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4991 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	4992 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4993 else if (*var_start == '$')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4994 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4995 dest = dest_env;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4996 type = &t_string;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4997 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	4998 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	4999 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	5000 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5001 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5002 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5003 else if (*var_start == '@')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5004 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5005 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	5006 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5007 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	5008 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5009 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5010 dest = dest_reg;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5011 type = &t_string;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5012 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5013 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5014 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	5015 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5016 }
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 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	5019 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5020 dest = dest_global;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5021 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5022 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	5023 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	5024 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5025 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5026 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5027 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	5028 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5029 dest = dest_buffer;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5030 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5031 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	5032 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	5033 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5034 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5035 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5036 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	5037 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5038 dest = dest_window;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5039 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5040 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	5041 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	5042 goto theend;
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 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5045 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	5046 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5047 dest = dest_tab;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5048 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5049 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	5050 vim9_declare_error(name);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5051 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5052 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5053 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5054 else 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	5055 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5056 typval_T *vtv;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5057 int di_flags;
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 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	5060 if (vimvaridx < 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5061 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5062 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	5063 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5064 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5065 // 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	5066 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	5067 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5068 dest = dest_vimvar;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5069 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	5070 type = typval2type(vtv);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5071 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5072 {
20953 6b4b887a12f0 patch 8.2.1028: Vim9: no error for declaring buffer, window, etc. variable Bram Moolenaar <Bram@vim.org> parents: 20949 diff changeset	5073 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	5074 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5075 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5076 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5077 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5078 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5079 int idx;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5080
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5081 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	5082 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	5083 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5084 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	5085 goto theend;
b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	5086 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5087
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5088 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	5089 if (lvar == NULL)
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 CLEAR_FIELD(arg_lvar);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5092 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	5093 &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	5094 &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	5095 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5096 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5097 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5098 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	5099 goto theend;
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 lvar = &arg_lvar;
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 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5104 if (lvar != NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5105 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5106 if (is_decl)
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(_("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	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 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	5112 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5113 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	5114 name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5115 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5116 }
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 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	5119 \|\| 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	5120 \|\| 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	5121 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5122 dest = dest_script;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5123 if (is_decl)
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	5124 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5125 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	5126 name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5127 goto theend;
19942 b471038ec3ea patch 8.2.0527: Vim9: function types insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19934 diff changeset	5128 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5129 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5130 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	5131 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5132 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	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 else if (!is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5137 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5138 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	5139 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5140 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5141 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5142 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5143
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5144 // 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	5145 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	5146 p = var_end;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5147
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5148 if (dest != dest_option)
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 if (is_decl && *p == ':')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5151 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5152 // 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	5153 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	5154 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5155 semsg(_(e_white_after), ":");
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5156 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5157 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5158 p = skipwhite(p + 1);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5159 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	5160 has_type = TRUE;
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 else if (lvar != NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5163 type = lvar->lv_type;
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
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5166 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	5167 && 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	5168 && 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	5169 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5170 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	5171 goto theend;
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
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	5174 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	5175 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5176 if (oplen > 1 && !heredoc)
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 // +=, /=, 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	5179 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	5180 name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5181 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5182 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5183
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5184 // new local variable
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5185 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	5186 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5187 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	5188 cmdidx == CMD_const, type);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5189 if (lvar == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5190 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5191 new_local = TRUE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5192 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5193
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5194 member_type = type;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5195 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	5196 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5197 // 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	5198 if (is_decl)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5199 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5200 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	5201 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5202 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5203
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5204 if (var_start[varlen] == '[')
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 has_index = TRUE;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5207 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	5208 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5209 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	5210 goto theend;
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 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	5213 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5214 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5215 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5216 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	5217 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5218 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5219 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5220 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	5221 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5222 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	5223 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5224 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5225
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5226 if (!heredoc)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5227 {
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	5228 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	5229 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5230 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	5231 {
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5232 // 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	5233 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	5234 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	5235 }
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5236 }
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5237 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	5238 {
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5239 type_T *stacktype;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5240
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5241 // 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	5242 if (var_count == 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5243 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5244 int r;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5245
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5246 // 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	5247 if (*op != '=')
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 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	5250
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5251 if (has_index)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5252 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5253 // 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	5254 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	5255 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5256 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5257 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5258
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5259 // 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	5260 // 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	5261 if (new_local)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5262 --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	5263 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	5264 p = skipwhite(op + oplen);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5265 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	5266 if (new_local)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5267 ++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	5268 if (r == FAIL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5269 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5270 }
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5271 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	5272 {
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5273 // 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	5274 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	5275 goto theend;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5276 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5277 else
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5278 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5279 // 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	5280 // list.
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5281 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	5282 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5283 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5284
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5285 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	5286 : ((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	5287 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	5288 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5289 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	5290 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5291 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	5292 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5293 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	5294 goto theend;
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5295 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5296 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5297 {
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5298 // 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	5299 // 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	5300 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	5301 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	5302 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	5303 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	5304 else
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5305 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	5306 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5307 }
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5308 else
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5309 {
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5310 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	5311
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5312 if (has_index)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5313 {
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5314 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	5315 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	5316 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	5317 }
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5318 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	5319 == FAIL)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5320 goto theend;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5321 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5322 }
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5323 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	5324 cctx) == FAIL)
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5325 goto theend;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5326 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5327 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	5328 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5329 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	5330 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5331 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5332 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	5333 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5334 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	5335 goto theend;
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5336 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5337 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5338 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5339 // variables are always initialized
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5340 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	5341 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5342 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	5343 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5344 case VAR_BOOL:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5345 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	5346 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5347 case VAR_FLOAT:
19336 1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	5348 #ifdef FEAT_FLOAT
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5349 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	5350 #endif
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5351 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5352 case VAR_STRING:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5353 generate_PUSHS(cctx, NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5354 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5355 case VAR_BLOB:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5356 generate_PUSHBLOB(cctx, NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5357 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5358 case VAR_FUNC:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5359 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	5360 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5361 case VAR_LIST:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5362 generate_NEWLIST(cctx, 0);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5363 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5364 case VAR_DICT:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5365 generate_NEWDICT(cctx, 0);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5366 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5367 case VAR_JOB:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5368 generate_PUSHJOB(cctx, NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5369 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5370 case VAR_CHANNEL:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5371 generate_PUSHCHANNEL(cctx, NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5372 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5373 case VAR_NUMBER:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5374 case VAR_UNKNOWN:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5375 case VAR_ANY:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5376 case VAR_PARTIAL:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5377 case VAR_VOID:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5378 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	5379 generate_PUSHNR(cctx, 0);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5380 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5381 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5382 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5383 if (var_count == 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5384 end = p;
19336 1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	5385 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5386
20899 e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5387 // 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	5388 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	5389 break;
e76bddcf3341 patch 8.2.1001: Vim9: crash with nested "if" and assignment Bram Moolenaar <Bram@vim.org> parents: 20871 diff changeset	5390
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5391 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	5392 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5393 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	5394 type_T *stacktype;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5395
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5396 // 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	5397
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5398 if (*op == '.')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5399 expected = &t_string;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5400 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	5401 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	5402 goto theend;
20859 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 if (*op == '.')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5405 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	5406 else
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5407 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5408 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	5409
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5410 if (isn == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5411 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5412 switch (*op)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5413 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5414 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	5415 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	5416 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	5417 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	5418 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	5419 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5420 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5421 }
20859 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 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	5424 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5425 int r;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5426
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5427 // 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	5428 if (new_local)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5429 --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	5430 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	5431 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	5432 if (new_local)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5433 ++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	5434 if (r == FAIL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5435 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5436 if (*skipwhite(p) != ']')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5437 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5438 emsg(_(e_missbrac));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5439 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5440 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5441 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	5442 && 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	5443 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5444 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	5445 && ((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	5446 != VAR_NUMBER)
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5447 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5448 emsg(_(e_number_exp));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5449 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5450 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5451
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5452 // 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	5453 // - value
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5454 // - index
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5455 // - variable
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5456 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	5457
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5458 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	5459 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5460 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	5461 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5462 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5463 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	5464 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5465 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	5466 return FAIL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5467 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5468 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5469 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5470 emsg(_(e_listreq));
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5471 goto theend;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5472 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5473 }
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5474 else
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5475 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5476 switch (dest)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5477 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5478 case dest_option:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5479 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	5480 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5481 case dest_global:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5482 // 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	5483 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	5484 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5485 case dest_buffer:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5486 // 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	5487 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	5488 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5489 case dest_window:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5490 // 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	5491 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	5492 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5493 case dest_tab:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5494 // 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	5495 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	5496 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5497 case dest_env:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5498 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	5499 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5500 case dest_reg:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5501 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	5502 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5503 case dest_vimvar:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5504 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	5505 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5506 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	5507 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5508 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	5509 imported_T *import = NULL;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5510 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	5511 int idx;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5512
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5513 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	5514 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5515 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	5516 if (import != NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5517 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	5518 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5519
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5520 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	5521 // TODO: specific type
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5522 if (idx < 0)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5523 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5524 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	5525
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5526 // 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	5527 if (name[1] != ':')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5528 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5529 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	5530
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5531 name_s = alloc(len);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5532 if (name_s == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5533 name_s = name;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5534 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5535 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	5536 "s:%s", name);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5537 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5538 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	5539 &t_any);
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5540 if (name_s != name)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5541 vim_free(name_s);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5542 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5543 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5544 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	5545 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	5546 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5547 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5548 case dest_local:
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5549 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	5550 {
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5551 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	5552 + instr->ga_len - 1;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5553
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5554 // 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	5555 // 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	5556 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	5557 && 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	5558 && 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	5559 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5560 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	5561
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5562 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	5563 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	5564 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	5565 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	5566 --stack->ga_len;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5567 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5568 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	5569 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	5570 NULL);
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5571 else
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5572 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	5573 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5574 break;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5575 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5576 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5577
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5578 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	5579 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	5580 }
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5581
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5582 // 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	5583 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	5584 {
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5585 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	5586 goto theend;
65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	5587 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	5588
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	5589 ret = end;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5590
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5591 theend:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5592 vim_free(name);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5593 return ret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5594 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5595
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5596 /*
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5597 * 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	5598 */
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5599 int
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5600 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	5601 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5602 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	5603 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5604 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	5605 return FAIL;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5606 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5607 return OK;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5608 }
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 /*
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5611 * Callback passed to ex_unletlock().
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5612 */
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5613 static int
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5614 compile_unlet(
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5615 lval_T *lvp,
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5616 char_u *name_end,
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5617 exarg_T *eap,
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5618 int deep UNUSED,
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5619 void *coookie)
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 cctx_T *cctx = coookie;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5622
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5623 if (lvp->ll_tv == NULL)
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 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	5626 int cc = *name_end;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5627 int ret = OK;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5628
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5629 // 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	5630 *name_end = NUL;
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	5631 if (*p == '$')
058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	5632 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	5633 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	5634 ret = FAIL;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5635 else
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	5636 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	5637
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5638 *name_end = cc;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5639 return ret;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5640 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5641
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5642 // TODO: unlet {list}[idx]
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5643 // TODO: unlet {dict}[key]
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5644 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	5645 return FAIL;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5646 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5647
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5648 /*
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5649 * 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	5650 * "arg" points to "var".
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5651 */
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5652 static char_u *
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5653 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	5654 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5655 char_u *p = arg;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5656
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5657 if (eap->cmdidx != CMD_unlet)
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5658 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5659 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	5660 return NULL;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5661 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5662
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5663 if (*p == '!')
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5664 {
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5665 p = skipwhite(p + 1);
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5666 eap->forceit = TRUE;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5667 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5668
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5669 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	5670 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	5671 }
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5672
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	5673 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5674 * 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	5675 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5676 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5677 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	5678 {
21146 465d6e40e79c patch 8.2.1124: Vim9: no line break allowed in :import command Bram Moolenaar <Bram@vim.org> parents: 21120 diff changeset	5679 return handle_import(arg, &cctx->ctx_imports, 0, NULL, cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5680 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5681
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5682 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5683 * 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	5684 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5685 static int
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5686 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	5687 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5688 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	5689 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	5690
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5691 if (endlabel == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5692 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5693 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	5694 *el = endlabel;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5695 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	5696
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5697 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	5698 return OK;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5701 static void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5702 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	5703 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5704 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	5705
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5706 while (*el != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5707 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5708 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	5709 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5710
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5711 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	5712 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	5713 *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	5714 vim_free(cur);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5715 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5716 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5717
19896 92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5718 static void
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(endlabel_T **el)
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5720 {
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5721 while (*el != NULL)
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5722 {
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5723 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	5724
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5725 *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	5726 vim_free(cur);
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5727 }
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5728 }
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5729
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5730 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5731 * 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	5732 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5733 static scope_T *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5734 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	5735 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5736 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	5737
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5738 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5739 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5740 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	5741 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	5742 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	5743 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	5744 return scope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5745 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5746
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5747 /*
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5748 * 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	5749 */
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5750 static void
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5751 drop_scope(cctx_T *cctx)
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5752 {
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5753 scope_T *scope = cctx->ctx_scope;
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5754
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5755 if (scope == NULL)
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5756 {
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5757 iemsg("calling drop_scope() without a scope");
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5758 return;
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5759 }
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5760 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	5761 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	5762 {
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5763 case IF_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5764 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	5765 case FOR_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5766 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	5767 case WHILE_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5768 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	5769 case TRY_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5770 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	5771 case NO_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5772 case BLOCK_SCOPE:
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5773 break;
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	5774 }
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5775 vim_free(scope);
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5776 }
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5777
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	5778 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5779 * compile "if expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5780 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5781 * "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	5782 * 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	5783 * 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	5784 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5785 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5786 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5787 * "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	5788 * 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	5789 * 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	5790 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5791 * JUMP_ALWAYS end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5792 * else:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5793 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5794 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5795 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5796 * "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	5797 * 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	5798 * 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	5799 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5800 * JUMP_ALWAYS end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5801 * elseif:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5802 * 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	5803 * 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	5804 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5805 * JUMP_ALWAYS end
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5806 * else:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5807 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5808 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5809 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5810 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5811 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	5812 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5813 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	5814 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	5815 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	5816 scope_T *scope;
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5817 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	5818 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	5819
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5820 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	5821 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	5822 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5823 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	5824 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	5825 }
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5826 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	5827 clear_ppconst(&ppconst);
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5828 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	5829 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5830 // 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	5831 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	5832 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	5833 }
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 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	5835 {
445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	5836 // 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	5837 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	5838 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	5839 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	5840 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5841
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5842 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	5843 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5844 return NULL;
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5845 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	5846 // "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	5847 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	5848
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5849 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	5850 {
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5851 // "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	5852 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	5853 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	5854 }
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5855 else
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5856 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	5857
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5858 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5859 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5860
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5861 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5862 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	5863 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5864 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	5865 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	5866 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	5867 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5868 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	5869 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	5870
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5871 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	5872 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5873 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	5874 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5875 }
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	5876 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	5877 if (!cctx->ctx_had_return)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5878 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	5879
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5880 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	5881 {
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5882 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	5883 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	5884 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	5885 // 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	5886 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	5887 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	5888 }
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5889
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5890 // 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	5891 CLEAR_FIELD(ppconst);
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5892 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	5893 {
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5894 clear_ppconst(&ppconst);
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5895 return NULL;
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5896 }
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5897 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	5898 clear_ppconst(&ppconst);
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5899 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	5900 {
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5901 // 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	5902 // 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	5903 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	5904 clear_ppconst(&ppconst);
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5905 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	5906 }
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5907 else
20334 b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5908 {
b774655968b4 patch 8.2.0722: Vim9: not handling constant expression for elseif Bram Moolenaar <Bram@vim.org> parents: 20332 diff changeset	5909 // 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	5910 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	5911 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	5912 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	5913
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5914 // "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	5915 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	5916 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	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_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	5924 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5925 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	5926 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	5927 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5928 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	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_else_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 }
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	5935 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	5936 if (!cctx->ctx_had_return)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5937 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	5938 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	5939
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5940 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	5941 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5942 // 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	5943 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	5944 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5945 if (!cctx->ctx_had_return
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5946 && 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	5947 JUMP_ALWAYS, cctx) == FAIL)
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5948 return NULL;
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
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5951 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	5952 {
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5953 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	5954 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5955 // 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	5956 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	5957 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	5958 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	5959 }
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5960 }
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5961
20933 e2fd5f05342f patch 8.2.1018: typo in enum value Bram Moolenaar <Bram@vim.org> parents: 20929 diff changeset	5962 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	5963 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	5964 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5965
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5966 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5967 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5968
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5969 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5970 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	5971 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5972 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	5973 ifscope_T *ifscope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5974 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	5975 isn_T *isn;
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 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	5978 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5979 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	5980 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5981 }
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	5982 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	5983 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	5984 if (!cctx->ctx_had_return)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5985 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	5986
19253 a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5987 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	5988 {
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	5989 // 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	5990 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	5991 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	5992 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	5993 // 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	5994 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	5995 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	5996
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5997 // 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	5998 // had_return flag is set.
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	5999 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	6000
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6001 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	6002 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6003 }
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6006 * 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	6007 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6008 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6009 * PUSHNR -1
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6010 * 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	6011 * 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	6012 * 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	6013 * - 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	6014 * - 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	6015 * 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	6016 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6017 * 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	6018 * 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	6019 *
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 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6022 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	6023 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6024 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6025 size_t varlen;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6026 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	6027 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	6028 scope_T *scope;
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6029 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	6030 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	6031 type_T *vartype;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6032
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6033 // 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	6034 // parse "var"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6035 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	6036 ;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6037 varlen = p - arg;
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6038 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	6039 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	6040 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6041 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	6042 return NULL;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6045 // consume "in"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6046 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6047 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	6048 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6049 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	6050 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6051 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6052 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	6053
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6054
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6055 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	6056 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6057 return NULL;
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 // 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	6060 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	6061 if (loop_lvar == NULL)
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6062 {
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6063 // out of memory
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6064 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	6065 return NULL;
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6066 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6067
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6068 // 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	6069 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	6070 if (var_lvar == NULL)
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6071 {
2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6072 // 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	6073 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	6074 return NULL;
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6075 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6076
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6077 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	6078
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6079 // 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	6080 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	6081 if (compile_expr0(&arg, cctx) == FAIL)
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6082 {
1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6083 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	6084 return NULL;
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6085 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6086
21188 d73b6ba20053 patch 8.2.1145: Vim9: "for" only accepts a list at compile time Bram Moolenaar <Bram@vim.org> parents: 21172 diff changeset	6087 // Now that we know the type of "var", check that it is a list, now or at
d73b6ba20053 patch 8.2.1145: Vim9: "for" only accepts a list at compile time Bram Moolenaar <Bram@vim.org> parents: 21172 diff changeset	6088 // runtime.
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6089 vartype = ((type_T **)stack->ga_data)[stack->ga_len - 1];
21188 d73b6ba20053 patch 8.2.1145: Vim9: "for" only accepts a list at compile time Bram Moolenaar <Bram@vim.org> parents: 21172 diff changeset	6090 if (need_type(vartype, &t_list_any, -1, cctx) == FAIL)
d73b6ba20053 patch 8.2.1145: Vim9: "for" only accepts a list at compile time Bram Moolenaar <Bram@vim.org> parents: 21172 diff changeset	6091 {
19866 1136ec381dd2 patch 8.2.0489: Vim9: memory leaks Bram Moolenaar <Bram@vim.org> parents: 19864 diff changeset	6092 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	6093 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6094 }
21188 d73b6ba20053 patch 8.2.1145: Vim9: "for" only accepts a list at compile time Bram Moolenaar <Bram@vim.org> parents: 21172 diff changeset	6095 if (vartype->tt_type == VAR_LIST && vartype->tt_member->tt_type != VAR_ANY)
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6096 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	6097
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6098 // "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	6099 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	6100
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	6101 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	6102 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	6103
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6104 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6105 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6106
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6107 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6108 * compile "endfor"
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_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	6112 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6113 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	6114 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	6115 forscope_T *forscope;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6116 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6117
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6118 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	6119 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6120 emsg(_(e_for));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6121 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6122 }
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6123 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	6124 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	6125 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	6126
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6127 // 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	6128 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	6129
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6130 // 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	6131 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	6132 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	6133
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6134 // 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	6135 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	6136
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6137 // 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	6138 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	6139 return NULL;
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 vim_free(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 return arg;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6146 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6147 * compile "while expr"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6148 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6149 * Produces instructions:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6150 * 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	6151 * 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	6152 * ... body ...
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6153 * 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	6154 * end:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6155 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6156 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6157 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6158 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	6159 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6160 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	6161 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	6162 scope_T *scope;
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 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	6165 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6166 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6167
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6168 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	6169
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6170 // 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	6171 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	6172 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6173
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6174 // "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	6175 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	6176 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	6177 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6178
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6179 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6180 }
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 * compile "endwhile"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6184 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6185 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6186 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	6187 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6188 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	6189
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6190 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	6191 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6192 emsg(_(e_while));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6193 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6194 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6195 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	6196 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	6197
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6198 // 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	6199 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	6200
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6201 // 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	6202 // 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	6203 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	6204
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6205 vim_free(scope);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6206
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6207 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6208 }
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 * compile "continue"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6212 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6213 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6214 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	6215 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6216 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	6217
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6218 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6219 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6220 if (scope == NULL)
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 emsg(_(e_continue));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6223 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6224 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6225 if (scope->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	6226 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6227 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	6228 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6229
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6230 // 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	6231 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	6232 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	6233 : 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	6234 return arg;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6237 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6238 * compile "break"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6239 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6240 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6241 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	6242 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6243 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	6244 endlabel_T **el;
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 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6247 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6248 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6249 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6250 emsg(_(e_break));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6251 return NULL;
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 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	6254 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6255 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	6256 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6257
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6258 // 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	6259 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	6260 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	6261 else
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6262 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	6263 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	6264 return FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6265
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6266 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6267 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6268
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6269 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6270 * 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	6271 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6272 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6273 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	6274 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6275 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	6276 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6277 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	6278 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6279
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 * 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	6282 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6283 static void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6284 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	6285 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6286 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	6287
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6288 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	6289 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	6290 vim_free(scope);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6291 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6292
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6293 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6294 * compile "try"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6295 * 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	6296 * finally.
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6297 * 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	6298 * 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	6299 *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6300 * "try"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6301 * 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	6302 * ... try block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6303 * "throw {exception}"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6304 * EVAL {exception}
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6305 * THROW create exception
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6306 * ... try block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6307 * " catch {expr}"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6308 * JUMP -> finally
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6309 * catch1: PUSH exeception
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6310 * EVAL {expr}
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6311 * MATCH
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6312 * JUMP nomatch -> catch2
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6313 * CATCH remove exception
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6314 * ... catch block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6315 * " catch"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6316 * JUMP -> finally
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6317 * 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	6318 * ... catch block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6319 * " finally"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6320 * finally:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6321 * ... finally block
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6322 * " endtry"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6323 * 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	6324 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6325 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6326 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	6327 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6328 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	6329 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	6330 scope_T *scope;
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 // 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	6333 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	6334 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	6335 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6336
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6337 // "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	6338 // "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	6339 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	6340 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	6341 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6342
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6343 // 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	6344 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	6345 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6346 return NULL;
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 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6349 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6350
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6351 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6352 * compile "catch {expr}"
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6353 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6354 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6355 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	6356 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6357 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	6358 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	6359 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6360 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6361
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6362 // end 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	6363 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	6364 compile_endblock(cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6365 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	6366
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6367 // 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	6368 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	6369 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6370 emsg(_(e_catch));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6371 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6372 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6373
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6374 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	6375 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6376 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	6377 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6378 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6379
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6380 // 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	6381 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	6382 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	6383 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6384
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6385 // 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	6386 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	6387 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	6388 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	6389 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	6390 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6391 // 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	6392 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	6393 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	6394 }
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 p = skipwhite(arg);
20059 de756b3f4dee patch 8.2.0585: Vim9: # comment not recognized after :vim9script Bram Moolenaar <Bram@vim.org> parents: 20055 diff changeset	6397 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	6398 {
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6399 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	6400 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	6401 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6402 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6403 {
19316 17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6404 char_u *end;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6405 char_u *pat;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6406 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	6407 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	6408 int len;
19316 17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6409
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6410 // 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	6411 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	6412
19892 5feb426d2ea1 patch 8.2.0502: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19884 diff changeset	6413 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	6414 if (end != p)
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6415 {
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6416 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	6417 vim_free(tofree);
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6418 return FAIL;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6419 }
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6420 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	6421 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	6422 else
19892 5feb426d2ea1 patch 8.2.0502: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19884 diff changeset	6423 len = (int)(end - tofree);
5feb426d2ea1 patch 8.2.0502: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19884 diff changeset	6424 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	6425 vim_free(tofree);
19892 5feb426d2ea1 patch 8.2.0502: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19884 diff changeset	6426 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	6427 if (pat == NULL)
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6428 return FAIL;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6429 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	6430 return FAIL;
17dc6282f370 patch 8.2.0216: several Vim9 instructions are not tested Bram Moolenaar <Bram@vim.org> parents: 19304 diff changeset	6431
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6432 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	6433 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6434
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6435 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	6436 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	6437 return NULL;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6440 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	6441 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6442
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6443 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	6444 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6445 return p;
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
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6448 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6449 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	6450 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6451 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	6452 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	6453 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6454
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6455 // 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	6456 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	6457 compile_endblock(cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6458 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	6459
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6460 // 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	6461 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	6462 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6463 emsg(_(e_finally));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6464 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6465 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6466
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6467 // 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	6468 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	6469 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	6470 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6471 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	6472 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6473 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6474
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6475 // 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	6476 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	6477
19894 ea4f8e789627 patch 8.2.0503: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19892 diff changeset	6478 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	6479 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	6480 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6481 // 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	6482 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	6483 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	6484 }
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 // 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	6487
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 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6492 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	6493 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6494 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	6495 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	6496 isn_T *isn;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6497
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6498 // 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	6499 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	6500 compile_endblock(cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6501 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	6502
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6503 // 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	6504 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	6505 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6506 if (scope == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6507 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	6508 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	6509 emsg(_(e_endwhile));
19213 b18437efabac patch 8.2.0165: Coverity warning for using NULL pointer Bram Moolenaar <Bram@vim.org> parents: 19193 diff changeset	6510 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	6511 emsg(_(e_endfor));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6512 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6513 emsg(_(e_endif));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6514 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6515 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6516
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6517 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	6518 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	6519 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6520 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	6521 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6522 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6523
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6524 // 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	6525 // by ":finally".
19229 d776967d0f0d patch 8.2.0173: build fails with old compiler Bram Moolenaar <Bram@vim.org> parents: 19223 diff changeset	6526 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	6527
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6528 // 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	6529 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	6530 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	6531 compile_endblock(cctx);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6532
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6533 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	6534 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6535 return arg;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6536 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6537
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6538 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6539 * compile "throw {expr}"
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 static char_u *
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6542 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	6543 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6544 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	6545
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	6546 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	6547 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6548 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	6549 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6550 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	6551 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6552
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6553 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6554 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6555
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6556 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6557 * 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	6558 * 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	6559 * 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	6560 * 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	6561 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6562 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	6563 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	6564 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6565 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	6566 int count = 0;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6567
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	6568 for (;;)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6569 {
20328 445c2b2ea44b patch 8.2.0719: Vim9: more expressions can be evaluated at compile time Bram Moolenaar <Bram@vim.org> parents: 20324 diff changeset	6570 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	6571 return NULL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6572 ++count;
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	6573 p = skipwhite(p);
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	6574 if (ends_excmd(*p))
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	6575 break;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6576 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6577
20142 fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6578 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	6579 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	6580 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	6581 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	6582 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	6583 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	6584 else
fe8d0a4344df patch 8.2.0626: Vim9: wrong syntax of function in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20140 diff changeset	6585 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	6586 return p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6587 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6588
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6589 /*
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6590 * 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	6591 */
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6592 static char_u *
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6593 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	6594 {
20172 1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6595 char_u *p;
20174 72b437855299 patch 8.2.0642: Vim9: using invalid index Bram Moolenaar <Bram@vim.org> parents: 20172 diff changeset	6596 int has_expr = FALSE;
21156 eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6597 char_u nextcmd = (char_u )"";
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6598
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	6599 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	6600 goto theend;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6601
20174 72b437855299 patch 8.2.0642: Vim9: using invalid index Bram Moolenaar <Bram@vim.org> parents: 20172 diff changeset	6602 if (eap->cmdidx >= 0 && eap->cmdidx < CMD_SIZE)
21156 eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6603 {
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6604 long argt = excmd_get_argt(eap->cmdidx);
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6605 int usefilter = FALSE;
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6606
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6607 has_expr = argt & (EX_XFILE \| EX_EXPAND);
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6608
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6609 // If the command can be followed by a bar, find the bar and truncate
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6610 // it, so that the following command can be compiled.
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6611 // The '\|' is overwritten with a NUL, it is put back below.
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6612 if ((eap->cmdidx == CMD_write \|\| eap->cmdidx == CMD_read)
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6613 && *eap->arg == '!')
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6614 // :w !filter or :r !filter or :r! filter
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6615 usefilter = TRUE;
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6616 if ((argt & EX_TRLBAR) && !usefilter)
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6617 {
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6618 separate_nextcmd(eap);
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6619 if (eap->nextcmd != NULL)
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6620 nextcmd = eap->nextcmd;
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6621 }
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6622 }
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6623
20172 1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6624 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	6625 {
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6626 // 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	6627 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	6628 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	6629 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	6630 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	6631 }
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6632
1d84eaed0ec8 patch 8.2.0641: Vim9: not expanded in :hardcopy and syn-include Bram Moolenaar <Bram@vim.org> parents: 20170 diff changeset	6633 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	6634 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6635 int count = 0;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6636 char_u *start = skipwhite(line);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6637
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6638 // :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	6639 // PUSHS ":cmd xxx"
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6640 // eval expr1
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6641 // PUSHS "yyy"
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6642 // eval expr2
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6643 // PUSHS "zzz"
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6644 // EXECCONCAT 5
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6645 for (;;)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6646 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6647 if (p > start)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6648 {
20830 9064044fd4f6 patch 8.2.0967: unnecessary type casts for vim_strnsave() Bram Moolenaar <Bram@vim.org> parents: 20538 diff changeset	6649 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	6650 ++count;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6651 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6652 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	6653 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	6654 return NULL;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6655 may_generate_2STRING(-1, cctx);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6656 ++count;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6657 p = skipwhite(p);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6658 if (*p != '`')
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6659 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6660 emsg(_("E1083: missing backtick"));
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6661 return NULL;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6662 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6663 start = p + 1;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6664
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6665 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	6666 if (p == NULL)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6667 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6668 if (*skipwhite(start) != NUL)
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6669 {
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6670 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	6671 ++count;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6672 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6673 break;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6674 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6675 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6676 generate_EXECCONCAT(cctx, count);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6677 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6678 else
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6679 generate_EXEC(cctx, line);
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6680
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6681 theend:
21156 eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6682 if (*nextcmd != NUL)
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6683 {
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6684 // the parser expects a pointer to the bar, put it back
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6685 --nextcmd;
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6686 *nextcmd = '\|';
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6687 }
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6688
eb6c27af07dd patch 8.2.1129: Vim9: bar not recognized after not compiled command Bram Moolenaar <Bram@vim.org> parents: 21146 diff changeset	6689 return nextcmd;
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6690 }
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6691
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6692 /*
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	6693 * 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	6694 * 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	6695 */
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	6696 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	6697 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	6698 {
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6699 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	6700
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	6701 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	6702 {
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6703 // 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	6704 // 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	6705 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	6706 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	6707 ++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	6708 }
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	6709
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	6710 // 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	6711 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	6712 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	6713 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	6714 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	6715 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	6716 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	6717 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	6718 ++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	6719 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	6720 }
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6721
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6722 /*
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6723 * 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	6724 * 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	6725 * 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	6726 * 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	6727 * 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	6728 * "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	6729 * 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	6730 * "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	6731 * 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	6732 */
20528 489cb75c76b6 patch 8.2.0818: Vim9: using a discovery phase doesn't work well Bram Moolenaar <Bram@vim.org> parents: 20419 diff changeset	6733 int
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	6734 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	6735 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6736 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	6737 char_u *p;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6738 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	6739 cctx_T cctx;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6740 garray_T *instr;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6741 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	6742 int ret = FAIL;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6743 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	6744 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	6745 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	6746
20538 9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6747 // 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	6748 // 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	6749 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	6750 {
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6751 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	6752 + 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	6753 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	6754 }
7587d892c00c patch 8.2.0725: Vim9: cannot call a function declared later in Vim9 script Bram Moolenaar <Bram@vim.org> parents: 20336 diff changeset	6755 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	6756 return FAIL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6757
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 20005 diff changeset	6758 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	6759 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	6760 cctx.ctx_lnum = -1;
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	6761 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	6762 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	6763 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	6764 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	6765 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	6766 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	6767 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	6768
20538 9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6769 // 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	6770 // 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	6771 // 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	6772 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	6773 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	6774
20538 9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6775 // 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	6776 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	6777 if (do_estack_push)
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	6778 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	6779
19328 e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6780 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	6781 {
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6782 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	6783 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	6784 int i;
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6785 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	6786 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	6787
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6788 // 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	6789 // 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	6790 // 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	6791 // of arguments.
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6792 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	6793 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	6794 goto erret;
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6795 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	6796 {
19946 8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6797 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	6798 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	6799 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	6800
19328 e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6801 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	6802 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	6803 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	6804 goto erret;
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6805
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6806 // 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	6807 // 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	6808 // specified type.
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6809 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	6810 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	6811 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	6812 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	6813 == FAIL)
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6814 {
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6815 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	6816 arg_idx + 1);
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6817 goto erret;
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6818 }
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6819
8466e62a2481 patch 8.2.0529: Vim9: function argument with default not checked Bram Moolenaar <Bram@vim.org> parents: 19944 diff changeset	6820 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	6821 goto erret;
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6822 }
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6823 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	6824 }
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6825
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6826 /*
e99e6d794597 patch 8.2.0222: Vim9: optional function arguments don't work yet Bram Moolenaar <Bram@vim.org> parents: 19316 diff changeset	6827 * 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	6828 */
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6829 for (;;)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6830 {
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6831 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	6832 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	6833 char_u *cmd;
21172 96ae8622cfb6 patch 8.2.1137: Vim9: modifiers not cleared after compiling function Bram Moolenaar <Bram@vim.org> parents: 21160 diff changeset	6834 int save_msg_scroll = msg_scroll;
19473 b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6835
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	6836 // 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	6837 // 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	6838 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	6839 goto erret;
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	6840
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6841 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	6842 // 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	6843 ++line;
20949 62912ad41aff patch 8.2.1026: Vim9: cannot break the line after "->" Bram Moolenaar <Bram@vim.org> parents: 20945 diff changeset	6844 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	6845 && !(*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	6846 \|\| 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	6847 {
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	6848 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	6849 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6850 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6851 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6852 {
20955 396fe712eb0f patch 8.2.1029: Vim9: cannot chain function calls with -> at line start Bram Moolenaar <Bram@vim.org> parents: 20953 diff changeset	6853 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	6854 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	6855 // 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	6856 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6857 }
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	6858 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	6859
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 20005 diff changeset	6860 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	6861 ea.cmdlinep = &line;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6862 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	6863
20055 686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6864 // 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	6865 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	6866 {
20055 686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6867 case '#':
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	6868 // "#" 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	6869 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	6870 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6871 line = (char_u *)"";
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6872 continue;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6873 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6874 break;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6875
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6876 case '}':
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6877 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6878 // "}" 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	6879 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	6880 ? 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	6881
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6882 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	6883 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6884 compile_endblock(&cctx);
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6885 line = ea.cmd;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6886 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6887 else
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6888 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6889 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	6890 goto erret;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6891 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6892 if (line != NULL)
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6893 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	6894 continue;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6895 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6896
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6897 case '{':
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6898 // "{" 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	6899 // "{'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	6900 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	6901 {
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6902 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	6903 continue;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6904 }
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6905 break;
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6906
686deb5959c2 patch 8.2.0583: Vim9: # comment not recognized in :def function Bram Moolenaar <Bram@vim.org> parents: 20045 diff changeset	6907 case ':':
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6908 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	6909 break;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6910 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6911
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 * COMMAND MODIFIERS
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 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	6916 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6917 if (errormsg != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6918 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6919 // 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	6920 line = (char_u *)"";
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6921 continue;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6922 }
21172 96ae8622cfb6 patch 8.2.1137: Vim9: modifiers not cleared after compiling function Bram Moolenaar <Bram@vim.org> parents: 21160 diff changeset	6923 // TODO: use modifiers in the command
96ae8622cfb6 patch 8.2.1137: Vim9: modifiers not cleared after compiling function Bram Moolenaar <Bram@vim.org> parents: 21160 diff changeset	6924 undo_cmdmod(&ea, save_msg_scroll);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6925
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6926 // 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	6927 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	6928 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	6929
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6930 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	6931 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6932 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	6933
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	6934 // 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	6935 // 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	6936 // 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	6937 // 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	6938 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	6939 ? 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	6940 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	6941 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	6942 {
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6943 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	6944 int oplen;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6945 int heredoc;
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6946
e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	6947 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	6948 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	6949 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	6950 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	6951 {
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	6952 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	6953
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	6954 // 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	6955 // 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	6956 // "g:var = expr"
19583 ba35daca6553 patch 8.2.0348: Vim9: not all code tested Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	6957 // "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	6958 // "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	6959 // "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	6960 // "&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	6961 // "$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	6962 // "@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	6963 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	6964 \|\| *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	6965 \|\| *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	6966 \|\| ((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	6967 \|\| 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	6968 \|\| 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	6969 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	6970 \|\| 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	6971 \|\| 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	6972 {
b09afbebffee patch 8.2.0294: cannot use Ex command that is also a function name Bram Moolenaar <Bram@vim.org> parents: 19467 diff changeset	6973 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	6974 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	6975 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	6976 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	6977 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6978 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6979 }
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6980
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6981 if (*ea.cmd == '[')
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6982 {
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6983 // [var, var] = expr
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6984 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	6985 if (line == NULL)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6986 goto erret;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6987 if (line != ea.cmd)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6988 continue;
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	6989 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6990 }
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 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6993 * COMMAND after range
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	6994 */
20982 bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	6995 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	6996 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	6997 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	6998 {
bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	6999 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	7000 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	7001 }
20349 e29b2ec8d4d2 patch 8.2.0730: Vim9: Assignment to dict member does not work Bram Moolenaar <Bram@vim.org> parents: 20339 diff changeset	7002 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	7003 : (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	7004 &cctx);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7005
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7006 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	7007 {
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	7008 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	7009 {
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	7010 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	7011 continue;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	7012 }
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	7013
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7014 // Expression or function call.
21196 f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7015 if (ea.cmdidx != CMD_eval)
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7016 {
21196 f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7017 // CMD_let cannot happen, compile_assignment() above is used
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7018 iemsg("Command from find_ex_command() not handled");
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7019 goto erret;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7020 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7021 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7022
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7023 p = skipwhite(p);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7024
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	7025 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	7026 && 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	7027 && 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	7028 && 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	7029 && 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	7030 {
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7031 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	7032 continue;
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	7033 }
a8d2d3c8f0b3 patch 8.2.0185: Vim9 script: cannot use "if has()" to skip lines Bram Moolenaar <Bram@vim.org> parents: 19229 diff changeset	7034
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7035 if (ea.cmdidx != CMD_elseif
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7036 && ea.cmdidx != CMD_else
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7037 && ea.cmdidx != CMD_endif
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7038 && ea.cmdidx != CMD_endfor
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7039 && ea.cmdidx != CMD_endwhile
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7040 && ea.cmdidx != CMD_catch
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7041 && ea.cmdidx != CMD_finally
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7042 && ea.cmdidx != CMD_endtry)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7043 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7044 if (cctx.ctx_had_return)
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7045 {
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7046 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	7047 goto erret;
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7048 }
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7049 }
0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7050
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7051 switch (ea.cmdidx)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7052 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7053 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	7054 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	7055 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	7056 break;
49b50843e725 patch 8.2.0695: Vim9: cannot define a function inside a function Bram Moolenaar <Bram@vim.org> parents: 20275 diff changeset	7057
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7058 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	7059 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	7060 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7061
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7062 case CMD_return:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7063 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	7064 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	7065 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7066
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7067 case CMD_let:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7068 case CMD_const:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7069 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	7070 if (line == p)
876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	7071 line = NULL;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7072 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7073
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7074 case CMD_unlet:
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7075 case CMD_unlockvar:
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7076 case CMD_lockvar:
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7077 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	7078 break;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 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 case CMD_import:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7081 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	7082 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7083
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7084 case CMD_if:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7085 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	7086 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7087 case CMD_elseif:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7088 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	7089 cctx.ctx_had_return = FALSE;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7090 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7091 case CMD_else:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7092 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	7093 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	7094 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7095 case CMD_endif:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7096 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	7097 break;
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 case CMD_while:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7100 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	7101 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7102 case CMD_endwhile:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7103 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	7104 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	7105 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7106
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7107 case CMD_for:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7108 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	7109 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7110 case CMD_endfor:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7111 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	7112 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	7113 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7114 case CMD_continue:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7115 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	7116 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7117 case CMD_break:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7118 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	7119 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7120
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7121 case CMD_try:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7122 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	7123 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7124 case CMD_catch:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7125 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	7126 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	7127 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7128 case CMD_finally:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7129 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	7130 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	7131 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7132 case CMD_endtry:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7133 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	7134 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	7135 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7136 case CMD_throw:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7137 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	7138 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7139
21196 f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7140 case CMD_eval:
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7141 if (compile_expr0(&p, &cctx) == FAIL)
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7142 goto erret;
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7143
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7144 // drop the return value
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7145 generate_instr_drop(&cctx, ISN_DROP, 1);
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7146
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7147 line = skipwhite(p);
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7148 break;
f45ce1ce284c patch 8.2.1149: Vim9: :eval command not handled properly Bram Moolenaar <Bram@vim.org> parents: 21194 diff changeset	7149
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7150 case CMD_echo:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7151 case CMD_echon:
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19521 diff changeset	7152 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	7153 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	7154 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	7155 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	7156 break;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7157
20982 bb49b5090a9c patch 8.2.1042: Vim9: cannot put an operator on the next line Bram Moolenaar <Bram@vim.org> parents: 20972 diff changeset	7158 // 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	7159
21210 44611891e22c patch 8.2.1156: Vim9: No error for invalid command in compiled function Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	7160 case CMD_SIZE:
44611891e22c patch 8.2.1156: Vim9: No error for invalid command in compiled function Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	7161 semsg(_("E476: Invalid command: %s"), ea.cmd);
44611891e22c patch 8.2.1156: Vim9: No error for invalid command in compiled function Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	7162 goto erret;
44611891e22c patch 8.2.1156: Vim9: No error for invalid command in compiled function Bram Moolenaar <Bram@vim.org> parents: 21208 diff changeset	7163
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7164 default:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7165 // 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	7166 ea.arg = p;
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7167 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	7168 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7169 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7170 if (line == NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7171 goto erret;
19894 ea4f8e789627 patch 8.2.0503: Vim9: some code is not tested Bram Moolenaar <Bram@vim.org> parents: 19892 diff changeset	7172 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	7173
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7174 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	7175 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7176 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	7177 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7178 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7179 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7180
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7181 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	7182 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7183 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	7184 emsg(_(e_endif));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7185 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	7186 emsg(_(e_endwhile));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7187 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	7188 emsg(_(e_endfor));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7189 else
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7190 emsg(_("E1026: Missing }"));
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7191 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7192 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7193
20909 0d7465881b06 patch 8.2.1006: Vim9: require unnecessary return statement Bram Moolenaar <Bram@vim.org> parents: 20907 diff changeset	7194 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	7195 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7196 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	7197 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7198 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	7199 goto erret;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7200 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7201
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7202 // 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	7203 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	7204 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	7205 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7206
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	7207 {
8288884fdfe1 patch 8.2.0488: Vim9: compiling can break when using a lambda inside :def Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	7208 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	7209 + 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	7210 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	7211 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	7212 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	7213 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	7214 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	7215 if (cctx.ctx_outer_used)
23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	7216 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	7217 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	7218 }
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7219
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7220 ret = OK;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7221
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7222 erret:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7223 if (ret == FAIL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7224 {
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7225 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	7226 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	7227 + 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	7228
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7229 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	7230 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	7231 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	7232
20534 ae758aa4ee5e patch 8.2.0821: Vim9: memory leak in expr test Bram Moolenaar <Bram@vim.org> parents: 20532 diff changeset	7233 // 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	7234 if (!dfunc->df_deleted
ae758aa4ee5e patch 8.2.0821: Vim9: memory leak in expr test Bram Moolenaar <Bram@vim.org> parents: 20532 diff changeset	7235 && 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	7236 --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	7237 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	7238
19896 92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	7239 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	7240 drop_scope(&cctx);
92177b596695 patch 8.2.0504: Vim9: leaking scope memory when compilation fails Bram Moolenaar <Bram@vim.org> parents: 19894 diff changeset	7241
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7242 // 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	7243 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	7244
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7245 if (errormsg != NULL)
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7246 emsg(errormsg);
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7247 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	7248 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	7249 }
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 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	7252 if (do_estack_push)
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	7253 estack_pop();
9f921ba86d05 patch 8.2.0823: Vim9: script reload test is disabled Bram Moolenaar <Bram@vim.org> parents: 20534 diff changeset	7254
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7255 free_imported(&cctx);
20239 2135b4641680 patch 8.2.0675: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20207 diff changeset	7256 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	7257 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	7258 return ret;
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7259 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7260
20532 cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7261 void
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7262 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	7263 {
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7264 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	7265 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	7266
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7267 // 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	7268 // argument types.
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7269 // 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	7270 // 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	7271 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	7272 {
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7273 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	7274 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	7275 // 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	7276 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	7277 argcount + varargs,
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7278 &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	7279 return;
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7280 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	7281 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	7282 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	7283 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	7284 {
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7285 int i;
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7286
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7287 // 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	7288 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	7289 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	7290 }
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7291 else
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7292 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	7293 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	7294 if (varargs)
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7295 {
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7296 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	7297 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	7298 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	7299 }
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7300 }
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7301 else
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7302 // 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	7303 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	7304 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	7305 }
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7306
cb4831fa7e25 patch 8.2.0820: Vim9: function type isn't set until compiled Bram Moolenaar <Bram@vim.org> parents: 20528 diff changeset	7307
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7308 /*
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7309 * 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	7310 */
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7311 void
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7312 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	7313 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7314 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	7315 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7316 case ISN_EXEC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7317 case ISN_LOADENV:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7318 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	7319 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	7320 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	7321 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	7322 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	7323 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	7324 case ISN_PUSHEXC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7325 case ISN_PUSHS:
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7326 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	7327 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	7328 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	7329 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	7330 case ISN_STORET:
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7331 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	7332 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	7333 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7334
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7335 case ISN_LOADS:
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7336 case ISN_STORES:
9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7337 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	7338 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7339
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7340 case ISN_UNLET:
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	7341 case ISN_UNLETENV:
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7342 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	7343 break;
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	7344
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7345 case ISN_STOREOPT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7346 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	7347 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7348
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7349 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	7350 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	7351 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7352
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7353 case ISN_PUSHJOB:
19562 6b7719b8f9b9 patch 8.2.0338: build failure without the channel feature Bram Moolenaar <Bram@vim.org> parents: 19558 diff changeset	7354 #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	7355 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	7356 #endif
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7357 break;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7358
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7359 case ISN_PUSHCHANNEL:
19562 6b7719b8f9b9 patch 8.2.0338: build failure without the channel feature Bram Moolenaar <Bram@vim.org> parents: 19558 diff changeset	7360 #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	7361 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	7362 #endif
19558 8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7363 break;
8eeec8886c02 patch 8.2.0336: Vim9: insufficient test coverage for compiling Bram Moolenaar <Bram@vim.org> parents: 19530 diff changeset	7364
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7365 case ISN_UCALL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7366 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	7367 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7368
20283 934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7369 case ISN_FUNCREF:
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7370 {
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7371 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	7372 + 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	7373 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	7374 }
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7375 break;
934657e365e5 patch 8.2.0697: Vim9: memory leak when using nested function Bram Moolenaar <Bram@vim.org> parents: 20281 diff changeset	7376
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7377 case ISN_2BOOL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7378 case ISN_2STRING:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7379 case ISN_ADDBLOB:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7380 case ISN_ADDLIST:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7381 case ISN_BCALL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7382 case ISN_CATCH:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7383 case ISN_CHECKNR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7384 case ISN_CHECKTYPE:
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	7385 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	7386 case ISN_COMPAREANY:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7387 case ISN_COMPAREBLOB:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7388 case ISN_COMPAREBOOL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7389 case ISN_COMPAREDICT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7390 case ISN_COMPAREFLOAT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7391 case ISN_COMPAREFUNC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7392 case ISN_COMPARELIST:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7393 case ISN_COMPARENR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7394 case ISN_COMPARESPECIAL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7395 case ISN_COMPARESTRING:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7396 case ISN_CONCAT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7397 case ISN_DCALL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7398 case ISN_DROP:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7399 case ISN_ECHO:
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7400 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	7401 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	7402 case ISN_ENDTRY:
20170 0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7403 case ISN_EXECCONCAT:
0612c64a2b87 patch 8.2.0640: Vim9: expanding does not work Bram Moolenaar <Bram@vim.org> parents: 20142 diff changeset	7404 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	7405 case ISN_FOR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7406 case ISN_INDEX:
20859 876e16c48bd1 patch 8.2.0981: Vim9: cannot compile "[var, var] = list" Bram Moolenaar <Bram@vim.org> parents: 20842 diff changeset	7407 case ISN_GETITEM:
20871 65d9189d4dca patch 8.2.0987: Vim9: cannot assign to [var; var] Bram Moolenaar <Bram@vim.org> parents: 20859 diff changeset	7408 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	7409 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	7410 case ISN_JUMP:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7411 case ISN_LOAD:
20244 23d75968ca5e patch 8.2.0677: Vim9: no support for closures Bram Moolenaar <Bram@vim.org> parents: 20239 diff changeset	7412 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	7413 case ISN_LOADSCRIPT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7414 case ISN_LOADREG:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7415 case ISN_LOADV:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7416 case ISN_NEGATENR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7417 case ISN_NEWDICT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7418 case ISN_NEWLIST:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7419 case ISN_OPNR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7420 case ISN_OPFLOAT:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7421 case ISN_OPANY:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7422 case ISN_PCALL:
19862 846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19860 diff changeset	7423 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	7424 case ISN_PUSHF:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7425 case ISN_PUSHNR:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7426 case ISN_PUSHBOOL:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7427 case ISN_PUSHSPEC:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7428 case ISN_RETURN:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7429 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	7430 case ISN_STOREOUTER:
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7431 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	7432 case ISN_STORENR:
19283 9dc843109c97 patch 8.2.0200: Vim9 script commands not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19259 diff changeset	7433 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	7434 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	7435 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	7436 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	7437 case ISN_THROW:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7438 case ISN_TRY:
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7439 // nothing allocated
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7440 break;
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7441 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7442 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7443
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7444 /*
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7445 * 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	7446 */
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7447 static void
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7448 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	7449 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7450 int idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7451
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7452 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	7453
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7454 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	7455 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7456 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	7457 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	7458 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	7459 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7460
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7461 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	7462 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7463
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7464 /*
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	7465 * 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	7466 * 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	7467 */
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7468 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	7469 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	7470 {
1693ca876049 patch 8.2.1023: Vim9: redefining a function uses a new index every time Bram Moolenaar <Bram@vim.org> parents: 20933 diff changeset	7471 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	7472 {
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7473 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	7474 + 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	7475
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7476 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	7477 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	7478 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7479 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7480
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7481 #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	7482 /*
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7483 * 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	7484 */
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7485 void
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7486 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	7487 {
19726 ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7488 int idx;
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7489
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7490 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	7491 {
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7492 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	7493
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7494 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	7495 }
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7496
ad37a198a708 patch 8.2.0419: various memory leaks in Vim9 script code Bram Moolenaar <Bram@vim.org> parents: 19623 diff changeset	7497 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	7498 }
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7499 #endif
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7500
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7501
94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: diff changeset	7502 #endif // FEAT_EVAL

Mercurial > vim

annotate src/vim9compile.c @ 21218:1f4d0375f947 v8.2.1160