vim: src/vim9class.c annotate

annotate src/vim9class.c @ 31746:d3d3ed2c09f6 v9.0.1205

patch 9.0.1205: crash when handling class that extends another class Commit: https://github.com/vim/vim/commit/ae3205aa55741152b0143dbd7d637b35f576793e Author: Bram Moolenaar <Bram@vim.org> Date: Sun Jan 15 20:49:00 2023 +0000 patch 9.0.1205: crash when handling class that extends another class Problem: Crash when handling class that extends another class with more than one object members. Solution: Correct pointer computations. (closes #11824)

author	Bram Moolenaar <Bram@vim.org>
date	Sun, 15 Jan 2023 22:00:03 +0100
parents	ef7a9a7eb197
children	48431422f766

rev	line source
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1 /* vi:set ts=8 sts=4 sw=4 noet:
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	2 *
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	3 * VIM - Vi IMproved by Bram Moolenaar
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	4 *
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	5 * Do ":help uganda" in Vim to read copying and usage conditions.
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	6 * Do ":help credits" in Vim to see a list of people who contributed.
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	7 * See README.txt for an overview of the Vim source code.
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	8 */
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	9
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	10 /*
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	11 * vim9class.c: Vim9 script class support
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	12 */
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	13
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	14 #define USING_FLOAT_STUFF
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	15 #include "vim.h"
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	16
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	17 #if defined(FEAT_EVAL) \|\| defined(PROTO)
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	18
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	19 // When not generating protos this is included in proto.h
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	20 #ifdef PROTO
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	21 # include "vim9.h"
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	22 #endif
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	23
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	24 /*
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	25 * Parse a member declaration, both object and class member.
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	26 * Returns OK or FAIL. When OK then "varname_end" is set to just after the
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	27 * variable name and "type_ret" is set to the decleared or detected type.
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	28 * "init_expr" is set to the initialisation expression (allocated), if there is
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	29 * one. For an interface "init_expr" is NULL.
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	30 */
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	31 static int
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	32 parse_member(
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	33 exarg_T *eap,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	34 char_u *line,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	35 char_u *varname,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	36 int has_public, // TRUE if "public" seen before "varname"
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	37 char_u **varname_end,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	38 garray_T *type_list,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	39 type_T **type_ret,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	40 char_u **init_expr)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	41 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	42 *varname_end = to_name_end(varname, FALSE);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	43 if (*varname == '_' && has_public)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	44 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	45 semsg(_(e_public_member_name_cannot_start_with_underscore_str), line);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	46 return FAIL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	47 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	48
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	49 char_u colon = skipwhite(varname_end);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	50 char_u *type_arg = colon;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	51 type_T *type = NULL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	52 if (*colon == ':')
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	53 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	54 if (VIM_ISWHITE(**varname_end))
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	55 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	56 semsg(_(e_no_white_space_allowed_before_colon_str), varname);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	57 return FAIL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	58 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	59 if (!VIM_ISWHITE(colon[1]))
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	60 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	61 semsg(_(e_white_space_required_after_str_str), ":", varname);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	62 return FAIL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	63 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	64 type_arg = skipwhite(colon + 1);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	65 type = parse_type(&type_arg, type_list, TRUE);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	66 if (type == NULL)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	67 return FAIL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	68 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	69
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	70 char_u *expr_start = skipwhite(type_arg);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	71 char_u *expr_end = expr_start;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	72 if (type == NULL && *expr_start != '=')
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	73 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	74 emsg(_(e_type_or_initialization_required));
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	75 return FAIL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	76 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	77
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	78 if (*expr_start == '=')
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	79 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	80 if (!VIM_ISWHITE(expr_start[-1]) \|\| !VIM_ISWHITE(expr_start[1]))
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	81 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	82 semsg(_(e_white_space_required_before_and_after_str_at_str),
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	83 "=", type_arg);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	84 return FAIL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	85 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	86 expr_start = skipwhite(expr_start + 1);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	87
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	88 expr_end = expr_start;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	89 evalarg_T evalarg;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	90 fill_evalarg_from_eap(&evalarg, eap, FALSE);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	91 skip_expr(&expr_end, NULL);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	92
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	93 if (type == NULL)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	94 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	95 // No type specified, use the type of the initializer.
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	96 typval_T tv;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	97 tv.v_type = VAR_UNKNOWN;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	98 char_u *expr = expr_start;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	99 int res = eval0(expr, &tv, eap, &evalarg);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	100
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	101 if (res == OK)
31608 8e965e5a46c9 patch 9.0.1136: memory leak when getting class member type from expr Bram Moolenaar <Bram@vim.org> parents: 31592 diff changeset	102 {
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	103 type = typval2type(&tv, get_copyID(), type_list,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	104 TVTT_DO_MEMBER);
31608 8e965e5a46c9 patch 9.0.1136: memory leak when getting class member type from expr Bram Moolenaar <Bram@vim.org> parents: 31592 diff changeset	105 clear_tv(&tv);
8e965e5a46c9 patch 9.0.1136: memory leak when getting class member type from expr Bram Moolenaar <Bram@vim.org> parents: 31592 diff changeset	106 }
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	107 if (type == NULL)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	108 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	109 semsg(_(e_cannot_get_object_member_type_from_initializer_str),
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	110 expr_start);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	111 clear_evalarg(&evalarg, NULL);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	112 return FAIL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	113 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	114 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	115 clear_evalarg(&evalarg, NULL);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	116 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	117 if (!valid_declaration_type(type))
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	118 return FAIL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	119
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	120 *type_ret = type;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	121 if (expr_end > expr_start)
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	122 {
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	123 if (init_expr == NULL)
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	124 {
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	125 emsg(_(e_cannot_initialize_member_in_interface));
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	126 return FAIL;
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	127 }
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	128 *init_expr = vim_strnsave(expr_start, expr_end - expr_start);
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	129 }
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	130 return OK;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	131 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	132
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	133 /*
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	134 * Add a member to an object or a class.
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	135 * Returns OK when successful, "init_expr" will be consumed then.
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	136 * Returns FAIL otherwise, caller might need to free "init_expr".
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	137 */
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	138 static int
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	139 add_member(
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	140 garray_T *gap,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	141 char_u *varname,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	142 char_u *varname_end,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	143 int has_public,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	144 type_T *type,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	145 char_u *init_expr)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	146 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	147 if (ga_grow(gap, 1) == FAIL)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	148 return FAIL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	149 ocmember_T m = ((ocmember_T )gap->ga_data) + gap->ga_len;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	150 m->ocm_name = vim_strnsave(varname, varname_end - varname);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	151 m->ocm_access = has_public ? ACCESS_ALL
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	152 : *varname == '_' ? ACCESS_PRIVATE : ACCESS_READ;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	153 m->ocm_type = type;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	154 if (init_expr != NULL)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	155 m->ocm_init = init_expr;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	156 ++gap->ga_len;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	157 return OK;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	158 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	159
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	160 /*
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	161 * Move the class or object members found while parsing a class into the class.
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	162 * "gap" contains the found members.
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	163 * "parent_members" points to the members in the parent class (if any)
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	164 * "parent_count" is the number of members in the parent class
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	165 * "members" will be set to the newly allocated array of members and
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	166 * "member_count" set to the number of members.
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	167 * Returns OK or FAIL.
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	168 */
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	169 static int
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	170 add_members_to_class(
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	171 garray_T *gap,
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	172 ocmember_T *parent_members,
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	173 int parent_count,
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	174 ocmember_T **members,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	175 int *member_count)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	176 {
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	177 *member_count = parent_count + gap->ga_len;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	178 members = member_count == 0 ? NULL
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	179 : ALLOC_MULT(ocmember_T, *member_count);
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	180 if (member_count > 0 && members == NULL)
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	181 return FAIL;
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	182 for (int i = 0; i < parent_count; ++i)
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	183 {
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	184 // parent members need to be copied
31746 d3d3ed2c09f6 patch 9.0.1205: crash when handling class that extends another class Bram Moolenaar <Bram@vim.org> parents: 31732 diff changeset	185 ocmember_T m = members + i;
d3d3ed2c09f6 patch 9.0.1205: crash when handling class that extends another class Bram Moolenaar <Bram@vim.org> parents: 31732 diff changeset	186 *m = parent_members[i];
d3d3ed2c09f6 patch 9.0.1205: crash when handling class that extends another class Bram Moolenaar <Bram@vim.org> parents: 31732 diff changeset	187 m->ocm_name = vim_strsave(m->ocm_name);
d3d3ed2c09f6 patch 9.0.1205: crash when handling class that extends another class Bram Moolenaar <Bram@vim.org> parents: 31732 diff changeset	188 if (m->ocm_init != NULL)
d3d3ed2c09f6 patch 9.0.1205: crash when handling class that extends another class Bram Moolenaar <Bram@vim.org> parents: 31732 diff changeset	189 m->ocm_init = vim_strsave(m->ocm_init);
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	190 }
31487 df58407c97f3 patch 9.0.1076: ASAN complains about NULL argument Bram Moolenaar <Bram@vim.org> parents: 31483 diff changeset	191 if (gap->ga_len > 0)
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	192 // new members are moved
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	193 mch_memmove(*members + parent_count,
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	194 gap->ga_data, sizeof(ocmember_T) * gap->ga_len);
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	195 VIM_CLEAR(gap->ga_data);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	196 return OK;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	197 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	198
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	199 /*
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	200 * Handle ":class" and ":abstract class" up to ":endclass".
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	201 * Handle ":interface" up to ":endinterface".
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	202 */
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	203 void
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	204 ex_class(exarg_T *eap)
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	205 {
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	206 int is_class = eap->cmdidx == CMD_class; // FALSE for :interface
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	207
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	208 char_u *arg = eap->arg;
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	209 int is_abstract = eap->cmdidx == CMD_abstract;
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	210 if (is_abstract)
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	211 {
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	212 if (STRNCMP(arg, "class", 5) != 0 \|\| !VIM_ISWHITE(arg[5]))
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	213 {
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	214 semsg(_(e_invalid_argument_str), arg);
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	215 return;
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	216 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	217 arg = skipwhite(arg + 5);
31732 ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	218 is_class = TRUE;
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	219 }
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	220
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	221 if (!current_script_is_vim9()
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	222 \|\| (cmdmod.cmod_flags & CMOD_LEGACY)
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	223 \|\| !getline_equal(eap->getline, eap->cookie, getsourceline))
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	224 {
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	225 if (is_class)
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	226 emsg(_(e_class_can_only_be_defined_in_vim9_script));
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	227 else
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	228 emsg(_(e_interface_can_only_be_defined_in_vim9_script));
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	229 return;
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	230 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	231
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	232 if (!ASCII_ISUPPER(*arg))
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	233 {
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	234 if (is_class)
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	235 semsg(_(e_class_name_must_start_with_uppercase_letter_str), arg);
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	236 else
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	237 semsg(_(e_interface_name_must_start_with_uppercase_letter_str),
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	238 arg);
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	239 return;
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	240 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	241 char_u *name_end = find_name_end(arg, NULL, NULL, FNE_CHECK_START);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	242 if (!IS_WHITE_OR_NUL(*name_end))
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	243 {
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	244 semsg(_(e_white_space_required_after_name_str), arg);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	245 return;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	246 }
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	247 char_u *name_start = arg;
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	248
31706 824fc05d9571 patch 9.0.1185: using class from imported script not tested Bram Moolenaar <Bram@vim.org> parents: 31704 diff changeset	249 // "export class" gets used when creating the class, don't use "is_export"
824fc05d9571 patch 9.0.1185: using class from imported script not tested Bram Moolenaar <Bram@vim.org> parents: 31704 diff changeset	250 // for the items inside the class.
824fc05d9571 patch 9.0.1185: using class from imported script not tested Bram Moolenaar <Bram@vim.org> parents: 31704 diff changeset	251 int class_export = is_export;
824fc05d9571 patch 9.0.1185: using class from imported script not tested Bram Moolenaar <Bram@vim.org> parents: 31704 diff changeset	252 is_export = FALSE;
824fc05d9571 patch 9.0.1185: using class from imported script not tested Bram Moolenaar <Bram@vim.org> parents: 31704 diff changeset	253
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	254 // TODO:
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	255 // generics: <Tkey, Tentry>
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	256
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	257 // Name for "extends BaseClass"
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	258 char_u *extends = NULL;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	259
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	260 // Names for "implements SomeInterface"
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	261 garray_T ga_impl;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	262 ga_init2(&ga_impl, sizeof(char_u *), 5);
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	263
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	264 arg = skipwhite(name_end);
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	265 while (arg != NUL && arg != '#' && *arg != '\n')
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	266 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	267 // TODO:
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	268 // specifies SomeInterface
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	269 if (STRNCMP(arg, "extends", 7) == 0 && IS_WHITE_OR_NUL(arg[7]))
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	270 {
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	271 if (extends != NULL)
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	272 {
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	273 emsg(_(e_duplicate_extends));
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	274 goto early_ret;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	275 }
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	276 arg = skipwhite(arg + 7);
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	277 char_u *end = find_name_end(arg, NULL, NULL, FNE_CHECK_START);
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	278 if (!IS_WHITE_OR_NUL(*end))
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	279 {
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	280 semsg(_(e_white_space_required_after_name_str), arg);
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	281 goto early_ret;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	282 }
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	283 extends = vim_strnsave(arg, end - arg);
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	284 if (extends == NULL)
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	285 goto early_ret;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	286
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	287 arg = skipwhite(end + 1);
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	288 }
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	289 else if (STRNCMP(arg, "implements", 10) == 0
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	290 && IS_WHITE_OR_NUL(arg[10]))
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	291 {
31649 520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	292 if (ga_impl.ga_len > 0)
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	293 {
31649 520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	294 emsg(_(e_duplicate_implements));
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	295 goto early_ret;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	296 }
31649 520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	297 arg = skipwhite(arg + 10);
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	298
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	299 for (;;)
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	300 {
31649 520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	301 char_u *impl_end = find_name_end(arg, NULL, NULL,
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	302 FNE_CHECK_START);
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	303 if (!IS_WHITE_OR_NUL(impl_end) && impl_end != ',')
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	304 {
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	305 semsg(_(e_white_space_required_after_name_str), arg);
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	306 goto early_ret;
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	307 }
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	308 char_u *iname = vim_strnsave(arg, impl_end - arg);
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	309 if (iname == NULL)
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	310 goto early_ret;
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	311 for (int i = 0; i < ga_impl.ga_len; ++i)
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	312 if (STRCMP(((char_u **)ga_impl.ga_data)[i], iname) == 0)
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	313 {
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	314 semsg(_(e_duplicate_interface_after_implements_str),
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	315 iname);
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	316 vim_free(iname);
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	317 goto early_ret;
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	318 }
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	319 if (ga_add_string(&ga_impl, iname) == FAIL)
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	320 {
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	321 vim_free(iname);
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	322 goto early_ret;
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	323 }
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	324 if (*impl_end != ',')
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	325 {
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	326 arg = skipwhite(impl_end);
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	327 break;
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	328 }
520857d1fda7 patch 9.0.1157: "implements" only handles one interface name Bram Moolenaar <Bram@vim.org> parents: 31643 diff changeset	329 arg = skipwhite(impl_end + 1);
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	330 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	331 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	332 else
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	333 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	334 semsg(_(e_trailing_characters_str), arg);
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	335 early_ret:
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	336 vim_free(extends);
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	337 ga_clear_strings(&ga_impl);
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	338 return;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	339 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	340 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	341
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	342 garray_T type_list; // list of pointers to allocated types
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	343 ga_init2(&type_list, sizeof(type_T *), 10);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	344
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	345 // Growarray with class members declared in the class.
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	346 garray_T classmembers;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	347 ga_init2(&classmembers, sizeof(ocmember_T), 10);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	348
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	349 // Growarray with functions declared in the class.
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	350 garray_T classfunctions;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	351 ga_init2(&classfunctions, sizeof(ufunc_T *), 10);
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	352
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	353 // Growarray with object members declared in the class.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	354 garray_T objmembers;
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	355 ga_init2(&objmembers, sizeof(ocmember_T), 10);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	356
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	357 // Growarray with object methods declared in the class.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	358 garray_T objmethods;
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	359 ga_init2(&objmethods, sizeof(ufunc_T *), 10);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	360
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	361 /*
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	362 * Go over the body of the class/interface until "endclass" or
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	363 * "endinterface" is found.
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	364 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	365 char_u *theline = NULL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	366 int success = FALSE;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	367 for (;;)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	368 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	369 vim_free(theline);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	370 theline = eap->getline(':', eap->cookie, 0, GETLINE_CONCAT_ALL);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	371 if (theline == NULL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	372 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	373 char_u *line = skipwhite(theline);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	374
31501 560ba934725f patch 9.0.1083: empty and comment lines in a class cause an error Bram Moolenaar <Bram@vim.org> parents: 31487 diff changeset	375 // Skip empty and comment lines.
560ba934725f patch 9.0.1083: empty and comment lines in a class cause an error Bram Moolenaar <Bram@vim.org> parents: 31487 diff changeset	376 if (*line == NUL)
560ba934725f patch 9.0.1083: empty and comment lines in a class cause an error Bram Moolenaar <Bram@vim.org> parents: 31487 diff changeset	377 continue;
560ba934725f patch 9.0.1083: empty and comment lines in a class cause an error Bram Moolenaar <Bram@vim.org> parents: 31487 diff changeset	378 if (*line == '#')
560ba934725f patch 9.0.1083: empty and comment lines in a class cause an error Bram Moolenaar <Bram@vim.org> parents: 31487 diff changeset	379 {
560ba934725f patch 9.0.1083: empty and comment lines in a class cause an error Bram Moolenaar <Bram@vim.org> parents: 31487 diff changeset	380 if (vim9_bad_comment(line))
560ba934725f patch 9.0.1083: empty and comment lines in a class cause an error Bram Moolenaar <Bram@vim.org> parents: 31487 diff changeset	381 break;
560ba934725f patch 9.0.1083: empty and comment lines in a class cause an error Bram Moolenaar <Bram@vim.org> parents: 31487 diff changeset	382 continue;
560ba934725f patch 9.0.1083: empty and comment lines in a class cause an error Bram Moolenaar <Bram@vim.org> parents: 31487 diff changeset	383 }
560ba934725f patch 9.0.1083: empty and comment lines in a class cause an error Bram Moolenaar <Bram@vim.org> parents: 31487 diff changeset	384
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	385 char_u *p = line;
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	386 char *end_name = is_class ? "endclass" : "endinterface";
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	387 if (checkforcmd(&p, end_name, is_class ? 4 : 5))
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	388 {
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	389 if (STRNCMP(line, end_name, is_class ? 8 : 12) != 0)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	390 semsg(_(e_command_cannot_be_shortened_str), line);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	391 else if (*p == '\|' \|\| !ends_excmd2(line, p))
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	392 semsg(_(e_trailing_characters_str), p);
31408 c82cb53474ee patch 9.0.1037: lalloc(0) error for a class without members Bram Moolenaar <Bram@vim.org> parents: 31404 diff changeset	393 else
c82cb53474ee patch 9.0.1037: lalloc(0) error for a class without members Bram Moolenaar <Bram@vim.org> parents: 31404 diff changeset	394 success = TRUE;
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	395 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	396 }
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	397 char *wrong_name = is_class ? "endinterface" : "endclass";
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	398 if (checkforcmd(&p, wrong_name, is_class ? 5 : 4))
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	399 {
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	400 semsg(_(e_invalid_command_str), line);
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	401 break;
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	402 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	403
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	404 int has_public = FALSE;
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	405 if (checkforcmd(&p, "public", 3))
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	406 {
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	407 if (STRNCMP(line, "public", 6) != 0)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	408 {
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	409 semsg(_(e_command_cannot_be_shortened_str), line);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	410 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	411 }
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	412 has_public = TRUE;
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	413 p = skipwhite(line + 6);
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	414
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	415 if (STRNCMP(p, "this", 4) != 0 && STRNCMP(p, "static", 6) != 0)
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	416 {
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	417 emsg(_(e_public_must_be_followed_by_this_or_static));
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	418 break;
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	419 }
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	420 }
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	421
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	422 int has_static = FALSE;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	423 char_u *ps = p;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	424 if (checkforcmd(&p, "static", 4))
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	425 {
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	426 if (STRNCMP(ps, "static", 6) != 0)
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	427 {
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	428 semsg(_(e_command_cannot_be_shortened_str), ps);
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	429 break;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	430 }
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	431 has_static = TRUE;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	432 p = skipwhite(ps + 6);
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	433 }
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	434
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	435 // object members (public, read access, private):
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	436 // "this._varname"
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	437 // "this.varname"
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	438 // "public this.varname"
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	439 if (STRNCMP(p, "this", 4) == 0)
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	440 {
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	441 if (p[4] != '.' \|\| !eval_isnamec1(p[5]))
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	442 {
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	443 semsg(_(e_invalid_object_member_declaration_str), p);
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	444 break;
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	445 }
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	446 char_u *varname = p + 5;
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	447 char_u *varname_end = NULL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	448 type_T *type = NULL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	449 char_u *init_expr = NULL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	450 if (parse_member(eap, line, varname, has_public,
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	451 &varname_end, &type_list, &type,
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	452 is_class ? &init_expr: NULL) == FAIL)
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	453 break;
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	454 if (add_member(&objmembers, varname, varname_end,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	455 has_public, type, init_expr) == FAIL)
31443 9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	456 {
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	457 vim_free(init_expr);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	458 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	459 }
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	460 }
31443 9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	461
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	462 // constructors:
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	463 // def new()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	464 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	465 // def newOther()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	466 // enddef
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	467 // object methods and class functions:
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	468 // def SomeMethod()
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	469 // enddef
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	470 // static def ClassFunction()
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	471 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	472 // TODO:
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	473 // def <Tval> someMethod()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	474 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	475 else if (checkforcmd(&p, "def", 3))
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	476 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	477 exarg_T ea;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	478 garray_T lines_to_free;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	479
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	480 // TODO: error for "public static def Func()"?
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	481
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	482 CLEAR_FIELD(ea);
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	483 ea.cmd = line;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	484 ea.arg = p;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	485 ea.cmdidx = CMD_def;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	486 ea.getline = eap->getline;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	487 ea.cookie = eap->cookie;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	488
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	489 ga_init2(&lines_to_free, sizeof(char_u *), 50);
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	490 ufunc_T *uf = define_function(&ea, NULL, &lines_to_free,
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	491 is_class ? CF_CLASS : CF_INTERFACE);
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	492 ga_clear_strings(&lines_to_free);
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	493
31590 aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	494 if (uf != NULL)
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	495 {
31692 2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	496 char_u *name = uf->uf_name;
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	497 int is_new = STRNCMP(name, "new", 3) == 0;
31732 ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	498 if (is_new && is_abstract)
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	499 {
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	500 emsg(_(e_cannot_define_new_function_in_abstract_class));
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	501 success = FALSE;
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	502 break;
ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	503 }
31590 aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	504 garray_T *fgap = has_static \|\| is_new
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	505 ? &classfunctions : &objmethods;
31692 2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	506 // Check the name isn't used already.
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	507 for (int i = 0; i < fgap->ga_len; ++i)
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	508 {
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	509 char_u n = ((ufunc_T *)fgap->ga_data)[i]->uf_name;
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	510 if (STRCMP(name, n) == 0)
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	511 {
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	512 semsg(_(e_duplicate_function_str), name);
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	513 break;
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	514 }
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	515 }
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	516
31590 aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	517 if (ga_grow(fgap, 1) == OK)
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	518 {
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	519 if (is_new)
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	520 uf->uf_flags \|= FC_NEW;
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	521
31590 aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	522 ((ufunc_T **)fgap->ga_data)[fgap->ga_len] = uf;
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	523 ++fgap->ga_len;
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	524 }
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	525 }
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	526 }
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	527
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	528 // class members
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	529 else if (has_static)
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	530 {
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	531 // class members (public, read access, private):
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	532 // "static _varname"
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	533 // "static varname"
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	534 // "public static varname"
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	535 char_u *varname = p;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	536 char_u *varname_end = NULL;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	537 type_T *type = NULL;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	538 char_u *init_expr = NULL;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	539 if (parse_member(eap, line, varname, has_public,
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	540 &varname_end, &type_list, &type,
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	541 is_class ? &init_expr : NULL) == FAIL)
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	542 break;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	543 if (add_member(&classmembers, varname, varname_end,
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	544 has_public, type, init_expr) == FAIL)
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	545 {
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	546 vim_free(init_expr);
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	547 break;
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	548 }
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	549 }
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	550
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	551 else
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	552 {
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	553 if (is_class)
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	554 semsg(_(e_not_valid_command_in_class_str), line);
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	555 else
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	556 semsg(_(e_not_valid_command_in_interface_str), line);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	557 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	558 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	559 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	560 vim_free(theline);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	561
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	562 class_T *extends_cl = NULL; // class from "extends" argument
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	563
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	564 /*
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	565 * Check a few things before defining the class.
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	566 */
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	567
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	568 // Check the "extends" class is valid.
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	569 if (success && extends != NULL)
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	570 {
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	571 typval_T tv;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	572 tv.v_type = VAR_UNKNOWN;
31706 824fc05d9571 patch 9.0.1185: using class from imported script not tested Bram Moolenaar <Bram@vim.org> parents: 31704 diff changeset	573 if (eval_variable_import(extends, &tv) == FAIL)
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	574 {
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	575 semsg(_(e_class_name_not_found_str), extends);
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	576 success = FALSE;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	577 }
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	578 else
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	579 {
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	580 if (tv.v_type != VAR_CLASS
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	581 \|\| tv.vval.v_class == NULL
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	582 \|\| (tv.vval.v_class->class_flags & CLASS_INTERFACE) != 0)
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	583 {
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	584 semsg(_(e_cannot_extend_str), extends);
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	585 success = FALSE;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	586 }
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	587 else
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	588 {
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	589 extends_cl = tv.vval.v_class;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	590 ++extends_cl->class_refcount;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	591 }
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	592 clear_tv(&tv);
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	593 }
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	594 }
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	595 VIM_CLEAR(extends);
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	596
31704 69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	597 class_T **intf_classes = NULL;
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	598
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	599 // Check all "implements" entries are valid.
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	600 if (success && ga_impl.ga_len > 0)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	601 {
31704 69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	602 intf_classes = ALLOC_CLEAR_MULT(class_T *, ga_impl.ga_len);
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	603
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	604 for (int i = 0; i < ga_impl.ga_len && success; ++i)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	605 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	606 char_u impl = ((char_u *)ga_impl.ga_data)[i];
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	607 typval_T tv;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	608 tv.v_type = VAR_UNKNOWN;
31706 824fc05d9571 patch 9.0.1185: using class from imported script not tested Bram Moolenaar <Bram@vim.org> parents: 31704 diff changeset	609 if (eval_variable_import(impl, &tv) == FAIL)
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	610 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	611 semsg(_(e_interface_name_not_found_str), impl);
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	612 success = FALSE;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	613 break;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	614 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	615
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	616 if (tv.v_type != VAR_CLASS
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	617 \|\| tv.vval.v_class == NULL
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	618 \|\| (tv.vval.v_class->class_flags & CLASS_INTERFACE) == 0)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	619 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	620 semsg(_(e_not_valid_interface_str), impl);
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	621 success = FALSE;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	622 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	623
31704 69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	624 class_T *ifcl = tv.vval.v_class;
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	625 intf_classes[i] = ifcl;
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	626 ++ifcl->class_refcount;
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	627
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	628 // check the members of the interface match the members of the class
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	629 for (int loop = 1; loop <= 2 && success; ++loop)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	630 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	631 // loop == 1: check class members
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	632 // loop == 2: check object members
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	633 int if_count = loop == 1 ? ifcl->class_class_member_count
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	634 : ifcl->class_obj_member_count;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	635 if (if_count == 0)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	636 continue;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	637 ocmember_T *if_ms = loop == 1 ? ifcl->class_class_members
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	638 : ifcl->class_obj_members;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	639 ocmember_T cl_ms = (ocmember_T )(loop == 1
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	640 ? classmembers.ga_data
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	641 : objmembers.ga_data);
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	642 int cl_count = loop == 1 ? classmembers.ga_len
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	643 : objmembers.ga_len;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	644 for (int if_i = 0; if_i < if_count; ++if_i)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	645 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	646 int cl_i;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	647 for (cl_i = 0; cl_i < cl_count; ++cl_i)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	648 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	649 ocmember_T *m = &cl_ms[cl_i];
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	650 if (STRCMP(if_ms[if_i].ocm_name, m->ocm_name) == 0)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	651 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	652 // TODO: check type
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	653 break;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	654 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	655 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	656 if (cl_i == cl_count)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	657 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	658 semsg(_(e_member_str_of_interface_str_not_implemented),
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	659 if_ms[if_i].ocm_name, impl);
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	660 success = FALSE;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	661 break;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	662 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	663 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	664 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	665
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	666 // check the functions/methods of the interface match the
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	667 // functions/methods of the class
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	668 for (int loop = 1; loop <= 2 && success; ++loop)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	669 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	670 // loop == 1: check class functions
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	671 // loop == 2: check object methods
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	672 int if_count = loop == 1 ? ifcl->class_class_function_count
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	673 : ifcl->class_obj_method_count;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	674 if (if_count == 0)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	675 continue;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	676 ufunc_T **if_fp = loop == 1 ? ifcl->class_class_functions
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	677 : ifcl->class_obj_methods;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	678 ufunc_T cl_fp = (ufunc_T )(loop == 1
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	679 ? classfunctions.ga_data
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	680 : objmethods.ga_data);
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	681 int cl_count = loop == 1 ? classfunctions.ga_len
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	682 : objmethods.ga_len;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	683 for (int if_i = 0; if_i < if_count; ++if_i)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	684 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	685 char_u *if_name = if_fp[if_i]->uf_name;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	686 int cl_i;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	687 for (cl_i = 0; cl_i < cl_count; ++cl_i)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	688 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	689 char_u *cl_name = cl_fp[cl_i]->uf_name;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	690 if (STRCMP(if_name, cl_name) == 0)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	691 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	692 // TODO: check return and argument types
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	693 break;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	694 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	695 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	696 if (cl_i == cl_count)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	697 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	698 semsg(_(e_function_str_of_interface_str_not_implemented),
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	699 if_name, impl);
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	700 success = FALSE;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	701 break;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	702 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	703 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	704 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	705
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	706 clear_tv(&tv);
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	707 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	708 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	709
31720 1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	710 if (success)
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	711 {
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	712 // Check no function argument name is used as an object/class member.
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	713 for (int loop = 1; loop <= 2 && success; ++loop)
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	714 {
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	715 garray_T *gap = loop == 1 ? &classfunctions : &objmethods;
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	716
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	717 for (int fi = 0; fi < gap->ga_len && success; ++fi)
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	718 {
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	719 ufunc_T uf = ((ufunc_T *)gap->ga_data)[fi];
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	720
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	721 for (int i = 0; i < uf->uf_args.ga_len && success; ++i)
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	722 {
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	723 char_u aname = ((char_u *)uf->uf_args.ga_data)[i];
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	724 for (int il = 1; il <= 2 && success; ++il)
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	725 {
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	726 // For a "new()" function "this.member" arguments are
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	727 // OK. TODO: check for the "this." prefix.
31724 2b523bbb3a6f patch 9.0.1194: compiler warning for comparing pointer with int Bram Moolenaar <Bram@vim.org> parents: 31720 diff changeset	728 if (STRNCMP(uf->uf_name, "new", 3) == 0 && il == 2)
31720 1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	729 continue;
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	730 garray_T *mgap = il == 1 ? &classmembers : &objmembers;
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	731 for (int mi = 0; mi < mgap->ga_len; ++mi)
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	732 {
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	733 char_u mname = ((ocmember_T )mgap->ga_data
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	734 + mi)->ocm_name;
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	735 if (STRCMP(aname, mname) == 0)
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	736 {
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	737 success = FALSE;
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	738 semsg(_(e_argument_already_declared_in_class_str),
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	739 aname);
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	740 break;
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	741 }
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	742 }
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	743 }
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	744 }
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	745 }
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	746 }
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	747 }
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	748
1949c2613b3e patch 9.0.1192: no error when class function argument shadows a member Bram Moolenaar <Bram@vim.org> parents: 31706 diff changeset	749
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	750 class_T *cl = NULL;
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	751 if (success)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	752 {
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	753 // "endclass" encountered without failures: Create the class.
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	754
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	755 cl = ALLOC_CLEAR_ONE(class_T);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	756 if (cl == NULL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	757 goto cleanup;
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	758 if (!is_class)
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	759 cl->class_flags = CLASS_INTERFACE;
5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	760
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	761 cl->class_refcount = 1;
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	762 cl->class_name = vim_strnsave(name_start, name_end - name_start);
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	763 if (cl->class_name == NULL)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	764 goto cleanup;
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	765
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	766 cl->class_extends = extends_cl;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	767
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	768 if (ga_impl.ga_len > 0)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	769 {
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	770 // Move the "implements" names into the class.
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	771 cl->class_interface_count = ga_impl.ga_len;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	772 cl->class_interfaces = ALLOC_MULT(char_u *, ga_impl.ga_len);
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	773 if (cl->class_interfaces == NULL)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	774 goto cleanup;
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	775 for (int i = 0; i < ga_impl.ga_len; ++i)
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	776 cl->class_interfaces[i] = ((char_u **)ga_impl.ga_data)[i];
31641 88aa7f62cc78 patch 9.0.1153: build error with some compilers Bram Moolenaar <Bram@vim.org> parents: 31639 diff changeset	777 VIM_CLEAR(ga_impl.ga_data);
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	778 ga_impl.ga_len = 0;
31704 69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	779
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	780 cl->class_interfaces_cl = intf_classes;
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	781 intf_classes = NULL;
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	782 }
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	783
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	784 // Add class and object members to "cl".
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	785 if (add_members_to_class(&classmembers,
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	786 extends_cl == NULL ? NULL
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	787 : extends_cl->class_class_members,
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	788 extends_cl == NULL ? 0
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	789 : extends_cl->class_class_member_count,
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	790 &cl->class_class_members,
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	791 &cl->class_class_member_count) == FAIL
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	792 \|\| add_members_to_class(&objmembers,
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	793 extends_cl == NULL ? NULL
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	794 : extends_cl->class_obj_members,
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	795 extends_cl == NULL ? 0
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	796 : extends_cl->class_obj_member_count,
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	797 &cl->class_obj_members,
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	798 &cl->class_obj_member_count) == FAIL)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	799 goto cleanup;
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	800
31635 5c1b7a87466e patch 9.0.1150: :interface is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31608 diff changeset	801 if (is_class && cl->class_class_member_count > 0)
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	802 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	803 // Allocate a typval for each class member and initialize it.
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	804 cl->class_members_tv = ALLOC_CLEAR_MULT(typval_T,
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	805 cl->class_class_member_count);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	806 if (cl->class_members_tv != NULL)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	807 for (int i = 0; i < cl->class_class_member_count; ++i)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	808 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	809 ocmember_T *m = &cl->class_class_members[i];
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	810 typval_T *tv = &cl->class_members_tv[i];
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	811 if (m->ocm_init != NULL)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	812 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	813 typval_T *etv = eval_expr(m->ocm_init, eap);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	814 if (etv != NULL)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	815 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	816 tv = etv;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	817 vim_free(etv);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	818 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	819 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	820 else
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	821 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	822 // TODO: proper default value
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	823 tv->v_type = m->ocm_type->tt_type;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	824 tv->vval.v_string = NULL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	825 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	826 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	827 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	828
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	829 int have_new = FALSE;
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	830 for (int i = 0; i < classfunctions.ga_len; ++i)
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	831 if (STRCMP(((ufunc_T **)classfunctions.ga_data)[i]->uf_name,
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	832 "new") == 0)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	833 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	834 have_new = TRUE;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	835 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	836 }
31732 ef7a9a7eb197 patch 9.0.1198: abstract class not supported yet Bram Moolenaar <Bram@vim.org> parents: 31724 diff changeset	837 if (is_class && !is_abstract && !have_new)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	838 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	839 // No new() method was defined, add the default constructor.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	840 garray_T fga;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	841 ga_init2(&fga, 1, 1000);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	842 ga_concat(&fga, (char_u *)"new(");
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	843 for (int i = 0; i < cl->class_obj_member_count; ++i)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	844 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	845 if (i > 0)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	846 ga_concat(&fga, (char_u *)", ");
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	847 ga_concat(&fga, (char_u *)"this.");
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	848 ocmember_T *m = cl->class_obj_members + i;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	849 ga_concat(&fga, (char_u *)m->ocm_name);
31441 e572ff386670 patch 9.0.1053: default constructor arguments are not optional Bram Moolenaar <Bram@vim.org> parents: 31424 diff changeset	850 ga_concat(&fga, (char_u *)" = v:none");
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	851 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	852 ga_concat(&fga, (char_u *)")\nenddef\n");
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	853 ga_append(&fga, NUL);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	854
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	855 exarg_T fea;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	856 CLEAR_FIELD(fea);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	857 fea.cmdidx = CMD_def;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	858 fea.cmd = fea.arg = fga.ga_data;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	859
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	860 garray_T lines_to_free;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	861 ga_init2(&lines_to_free, sizeof(char_u *), 50);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	862
31643 68a9375d4ca3 patch 9.0.1154: Coverity warns for dead code Bram Moolenaar <Bram@vim.org> parents: 31641 diff changeset	863 ufunc_T *nf = define_function(&fea, NULL, &lines_to_free, CF_CLASS);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	864
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	865 ga_clear_strings(&lines_to_free);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	866 vim_free(fga.ga_data);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	867
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	868 if (nf != NULL && ga_grow(&classfunctions, 1) == OK)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	869 {
31692 2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	870 ((ufunc_T **)classfunctions.ga_data)[classfunctions.ga_len]
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	871 = nf;
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	872 ++classfunctions.ga_len;
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	873
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	874 nf->uf_flags \|= FC_NEW;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	875 nf->uf_ret_type = get_type_ptr(&type_list);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	876 if (nf->uf_ret_type != NULL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	877 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	878 nf->uf_ret_type->tt_type = VAR_OBJECT;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	879 nf->uf_ret_type->tt_member = (type_T *)cl;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	880 nf->uf_ret_type->tt_argcount = 0;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	881 nf->uf_ret_type->tt_args = NULL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	882 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	883 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	884 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	885
31692 2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	886 // Move all the functions into the created class.
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	887 // loop 1: class functions, loop 2: object methods
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	888 for (int loop = 1; loop <= 2; ++loop)
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	889 {
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	890 garray_T *gap = loop == 1 ? &classfunctions : &objmethods;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	891 int *fcount = loop == 1 ? &cl->class_class_function_count
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	892 : &cl->class_obj_method_count;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	893 ufunc_T ***fup = loop == 1 ? &cl->class_class_functions
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	894 : &cl->class_obj_methods;
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	895
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	896 int parent_count = 0;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	897 if (extends_cl != NULL)
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	898 // Include functions from the parent.
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	899 parent_count = loop == 1
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	900 ? extends_cl->class_class_function_count
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	901 : extends_cl->class_obj_method_count;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	902
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	903 *fcount = parent_count + gap->ga_len;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	904 if (*fcount == 0)
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	905 {
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	906 *fup = NULL;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	907 continue;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	908 }
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	909 fup = ALLOC_MULT(ufunc_T , *fcount);
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	910 if (*fup == NULL)
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	911 goto cleanup;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	912
31692 2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	913 mch_memmove(fup, gap->ga_data, sizeof(ufunc_T ) * gap->ga_len);
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	914 vim_free(gap->ga_data);
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	915 if (loop == 1)
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	916 cl->class_class_function_count_child = gap->ga_len;
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	917 else
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	918 cl->class_obj_method_count_child = gap->ga_len;
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	919
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	920 int skipped = 0;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	921 for (int i = 0; i < parent_count; ++i)
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	922 {
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	923 // Copy functions from the parent. Can't use the same
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	924 // function, because "uf_class" is different and compilation
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	925 // will have a different result.
31692 2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	926 // Put them after the functions in the current class, object
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	927 // methods may be overruled, then "super.Method()" is used to
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	928 // find a method from the parent.
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	929 // Skip "new" functions. TODO: not all of them.
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	930 if (loop == 1 && STRNCMP(
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	931 extends_cl->class_class_functions[i]->uf_name,
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	932 "new", 3) == 0)
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	933 ++skipped;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	934 else
31692 2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	935 {
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	936 ufunc_T *pf = (loop == 1
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	937 ? extends_cl->class_class_functions
31692 2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	938 : extends_cl->class_obj_methods)[i];
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	939 (*fup)[gap->ga_len + i - skipped] = copy_function(pf);
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	940
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	941 // If the child class overrides a function from the parent
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	942 // the signature must be equal.
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	943 char_u *pname = pf->uf_name;
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	944 for (int ci = 0; ci < gap->ga_len; ++ci)
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	945 {
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	946 ufunc_T cf = (fup)[ci];
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	947 char_u *cname = cf->uf_name;
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	948 if (STRCMP(pname, cname) == 0)
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	949 {
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	950 where_T where = WHERE_INIT;
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	951 where.wt_func_name = (char *)pname;
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	952 (void)check_type(pf->uf_func_type, cf->uf_func_type,
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	953 TRUE, where);
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	954 }
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	955 }
2f1af1b2f82d patch 9.0.1178: a child class cannot override functions from a base class Bram Moolenaar <Bram@vim.org> parents: 31653 diff changeset	956 }
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	957 }
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	958
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	959 *fcount -= skipped;
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	960
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	961 // Set the class pointer on all the functions and object methods.
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	962 for (int i = 0; i < *fcount; ++i)
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	963 {
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	964 ufunc_T fp = (fup)[i];
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	965 fp->uf_class = cl;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	966 if (loop == 2)
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	967 fp->uf_flags \|= FC_OBJECT;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	968 }
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	969 }
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	970
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	971 cl->class_type.tt_type = VAR_CLASS;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	972 cl->class_type.tt_member = (type_T *)cl;
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	973 cl->class_object_type.tt_type = VAR_OBJECT;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	974 cl->class_object_type.tt_member = (type_T *)cl;
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	975 cl->class_type_list = type_list;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	976
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	977 // TODO:
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	978 // - Fill hashtab with object members and methods ?
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	979
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	980 // Add the class to the script-local variables.
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	981 // TODO: handle other context, e.g. in a function
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	982 typval_T tv;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	983 tv.v_type = VAR_CLASS;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	984 tv.vval.v_class = cl;
31706 824fc05d9571 patch 9.0.1185: using class from imported script not tested Bram Moolenaar <Bram@vim.org> parents: 31704 diff changeset	985 is_export = class_export;
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	986 set_var_const(cl->class_name, current_sctx.sc_sid,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	987 NULL, &tv, FALSE, ASSIGN_DECL, 0);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	988 return;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	989 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	990
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	991 cleanup:
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	992 if (cl != NULL)
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	993 {
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	994 vim_free(cl->class_name);
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	995 vim_free(cl->class_class_functions);
31704 69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	996 if (cl->class_interfaces != NULL)
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	997 {
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	998 for (int i = 0; i < cl->class_interface_count; ++i)
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	999 vim_free(cl->class_interfaces[i]);
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1000 vim_free(cl->class_interfaces);
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1001 }
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1002 if (cl->class_interfaces_cl != NULL)
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1003 {
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1004 for (int i = 0; i < cl->class_interface_count; ++i)
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1005 class_unref(cl->class_interfaces_cl[i]);
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1006 vim_free(cl->class_interfaces_cl);
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1007 }
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	1008 vim_free(cl->class_obj_members);
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	1009 vim_free(cl->class_obj_methods);
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	1010 vim_free(cl);
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	1011 }
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	1012
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	1013 vim_free(extends);
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	1014 class_unref(extends_cl);
31704 69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1015
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1016 if (intf_classes != NULL)
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1017 {
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1018 for (int i = 0; i < ga_impl.ga_len; ++i)
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1019 class_unref(intf_classes[i]);
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1020 vim_free(intf_classes);
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1021 }
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	1022 ga_clear_strings(&ga_impl);
62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	1023
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1024 for (int round = 1; round <= 2; ++round)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1025 {
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1026 garray_T *gap = round == 1 ? &classmembers : &objmembers;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1027 if (gap->ga_len == 0 \|\| gap->ga_data == NULL)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1028 continue;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1029
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1030 for (int i = 0; i < gap->ga_len; ++i)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1031 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1032 ocmember_T m = ((ocmember_T )gap->ga_data) + i;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1033 vim_free(m->ocm_name);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1034 vim_free(m->ocm_init);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1035 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1036 ga_clear(gap);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1037 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1038
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1039 for (int i = 0; i < objmethods.ga_len; ++i)
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1040 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1041 ufunc_T uf = ((ufunc_T *)objmethods.ga_data)[i];
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1042 func_clear_free(uf, FALSE);
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1043 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1044 ga_clear(&objmethods);
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1045
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1046 for (int i = 0; i < classfunctions.ga_len; ++i)
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1047 {
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1048 ufunc_T uf = ((ufunc_T *)classfunctions.ga_data)[i];
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1049 func_clear_free(uf, FALSE);
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1050 }
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1051 ga_clear(&classfunctions);
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1052
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1053 clear_type_list(&type_list);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1054 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1055
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1056 /*
31517 cd5247f4da06 patch 9.0.1091: assignment to non-existing member causes a crash Bram Moolenaar <Bram@vim.org> parents: 31501 diff changeset	1057 * Find member "name" in class "cl", set "member_idx" to the member index and
cd5247f4da06 patch 9.0.1091: assignment to non-existing member causes a crash Bram Moolenaar <Bram@vim.org> parents: 31501 diff changeset	1058 * return its type.
cd5247f4da06 patch 9.0.1091: assignment to non-existing member causes a crash Bram Moolenaar <Bram@vim.org> parents: 31501 diff changeset	1059 * When not found "member_idx" is set to -1 and t_any is returned.
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1060 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1061 type_T *
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1062 class_member_type(
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1063 class_T *cl,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1064 char_u *name,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1065 char_u *name_end,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1066 int *member_idx)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1067 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1068 *member_idx = -1; // not found (yet)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1069 size_t len = name_end - name;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1070
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1071 for (int i = 0; i < cl->class_obj_member_count; ++i)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1072 {
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1073 ocmember_T *m = cl->class_obj_members + i;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1074 if (STRNCMP(m->ocm_name, name, len) == 0 && m->ocm_name[len] == NUL)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1075 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1076 *member_idx = i;
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1077 return m->ocm_type;
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1078 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1079 }
31517 cd5247f4da06 patch 9.0.1091: assignment to non-existing member causes a crash Bram Moolenaar <Bram@vim.org> parents: 31501 diff changeset	1080
cd5247f4da06 patch 9.0.1091: assignment to non-existing member causes a crash Bram Moolenaar <Bram@vim.org> parents: 31501 diff changeset	1081 semsg(_(e_unknown_variable_str), name);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1082 return &t_any;
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1083 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1084
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1085 /*
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1086 * Handle ":enum" up to ":endenum".
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1087 */
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1088 void
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1089 ex_enum(exarg_T *eap UNUSED)
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1090 {
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1091 // TODO
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1092 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1093
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1094 /*
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1095 * Handle ":type".
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1096 */
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1097 void
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1098 ex_type(exarg_T *eap UNUSED)
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1099 {
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1100 // TODO
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1101 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1102
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1103 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1104 * Evaluate what comes after a class:
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1105 * - class member: SomeClass.varname
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1106 * - class function: SomeClass.SomeMethod()
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1107 * - class constructor: SomeClass.new()
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1108 * - object member: someObject.varname
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1109 * - object method: someObject.SomeMethod()
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1110 *
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1111 * "*arg" points to the '.'.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1112 * "*arg" is advanced to after the member name or method call.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1113 *
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1114 * Returns FAIL or OK.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1115 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1116 int
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1117 class_object_index(
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1118 char_u **arg,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1119 typval_T *rettv,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1120 evalarg_T *evalarg,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1121 int verbose UNUSED) // give error messages
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1122 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1123 // int evaluate = evalarg != NULL
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1124 // && (evalarg->eval_flags & EVAL_EVALUATE);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1125
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1126 if (VIM_ISWHITE((*arg)[1]))
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1127 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1128 semsg(_(e_no_white_space_allowed_after_str_str), ".", *arg);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1129 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1130 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1131
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1132 ++*arg;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1133 char_u name = arg;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1134 char_u *name_end = find_name_end(name, NULL, NULL, FNE_CHECK_START);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1135 if (name_end == name)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1136 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1137 size_t len = name_end - name;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1138
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1139 class_T *cl = rettv->v_type == VAR_CLASS ? rettv->vval.v_class
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1140 : rettv->vval.v_object->obj_class;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1141 if (*name_end == '(')
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1142 {
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1143 int on_class = rettv->v_type == VAR_CLASS;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1144 int count = on_class ? cl->class_class_function_count
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1145 : cl->class_obj_method_count;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1146 for (int i = 0; i < count; ++i)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1147 {
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1148 ufunc_T *fp = on_class ? cl->class_class_functions[i]
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1149 : cl->class_obj_methods[i];
31418 462508d04341 patch 9.0.1042: ASAN gives false alarm about array access. Bram Moolenaar <Bram@vim.org> parents: 31416 diff changeset	1150 // Use a separate pointer to avoid that ASAN complains about
462508d04341 patch 9.0.1042: ASAN gives false alarm about array access. Bram Moolenaar <Bram@vim.org> parents: 31416 diff changeset	1151 // uf_name[] only being 4 characters.
462508d04341 patch 9.0.1042: ASAN gives false alarm about array access. Bram Moolenaar <Bram@vim.org> parents: 31416 diff changeset	1152 char_u ufname = (char_u )fp->uf_name;
462508d04341 patch 9.0.1042: ASAN gives false alarm about array access. Bram Moolenaar <Bram@vim.org> parents: 31416 diff changeset	1153 if (STRNCMP(name, ufname, len) == 0 && ufname[len] == NUL)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1154 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1155 typval_T argvars[MAX_FUNC_ARGS + 1];
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1156 int argcount = 0;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1157
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1158 char_u *argp = name_end;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1159 int ret = get_func_arguments(&argp, evalarg, 0,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1160 argvars, &argcount);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1161 if (ret == FAIL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1162 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1163
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1164 funcexe_T funcexe;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1165 CLEAR_FIELD(funcexe);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1166 funcexe.fe_evaluate = TRUE;
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1167 if (rettv->v_type == VAR_OBJECT)
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1168 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1169 funcexe.fe_object = rettv->vval.v_object;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1170 ++funcexe.fe_object->obj_refcount;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1171 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1172
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1173 // Clear the class or object after calling the function, in
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1174 // case the refcount is one.
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1175 typval_T tv_tofree = *rettv;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1176 rettv->v_type = VAR_UNKNOWN;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1177
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1178 // Call the user function. Result goes into rettv;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1179 int error = call_user_func_check(fp, argcount, argvars,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1180 rettv, &funcexe, NULL);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1181
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1182 // Clear the previous rettv and the arguments.
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1183 clear_tv(&tv_tofree);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1184 for (int idx = 0; idx < argcount; ++idx)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1185 clear_tv(&argvars[idx]);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1186
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1187 if (error != FCERR_NONE)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1188 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1189 user_func_error(error, printable_func_name(fp),
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1190 funcexe.fe_found_var);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1191 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1192 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1193 *arg = argp;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1194 return OK;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1195 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1196 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1197
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1198 semsg(_(e_method_not_found_on_class_str_str), cl->class_name, name);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1199 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1200
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1201 else if (rettv->v_type == VAR_OBJECT)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1202 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1203 for (int i = 0; i < cl->class_obj_member_count; ++i)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1204 {
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1205 ocmember_T *m = &cl->class_obj_members[i];
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1206 if (STRNCMP(name, m->ocm_name, len) == 0 && m->ocm_name[len] == NUL)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1207 {
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	1208 if (*name == '_')
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	1209 {
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1210 semsg(_(e_cannot_access_private_member_str), m->ocm_name);
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	1211 return FAIL;
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	1212 }
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	1213
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1214 // The object only contains a pointer to the class, the member
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1215 // values array follows right after that.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1216 object_T *obj = rettv->vval.v_object;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1217 typval_T tv = (typval_T )(obj + 1) + i;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1218 copy_tv(tv, rettv);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1219 object_unref(obj);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1220
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1221 *arg = name_end;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1222 return OK;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1223 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1224 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1225
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1226 semsg(_(e_member_not_found_on_object_str_str), cl->class_name, name);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1227 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1228
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1229 else if (rettv->v_type == VAR_CLASS)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1230 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1231 // class member
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1232 for (int i = 0; i < cl->class_class_member_count; ++i)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1233 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1234 ocmember_T *m = &cl->class_class_members[i];
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1235 if (STRNCMP(name, m->ocm_name, len) == 0 && m->ocm_name[len] == NUL)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1236 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1237 if (*name == '_')
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1238 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1239 semsg(_(e_cannot_access_private_member_str), m->ocm_name);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1240 return FAIL;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1241 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1242
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1243 typval_T *tv = &cl->class_members_tv[i];
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1244 copy_tv(tv, rettv);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1245 class_unref(cl);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1246
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1247 *arg = name_end;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1248 return OK;
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1249 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1250 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1251
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1252 semsg(_(e_member_not_found_on_class_str_str), cl->class_name, name);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1253 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1254
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1255 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1256 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1257
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1258 /*
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1259 * If "arg" points to a class or object method, return it.
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1260 * Otherwise return NULL.
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1261 */
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1262 ufunc_T *
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1263 find_class_func(char_u **arg)
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1264 {
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1265 char_u name = arg;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1266 char_u *name_end = find_name_end(name, NULL, NULL, FNE_CHECK_START);
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1267 if (name_end == name \|\| *name_end != '.')
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1268 return NULL;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1269
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1270 size_t len = name_end - name;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1271 typval_T tv;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1272 tv.v_type = VAR_UNKNOWN;
31592 65a2bae18b27 patch 9.0.1128: build failure Bram Moolenaar <Bram@vim.org> parents: 31590 diff changeset	1273 if (eval_variable(name, (int)len,
65a2bae18b27 patch 9.0.1128: build failure Bram Moolenaar <Bram@vim.org> parents: 31590 diff changeset	1274 0, &tv, NULL, EVAL_VAR_NOAUTOLOAD) == FAIL)
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1275 return NULL;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1276 if (tv.v_type != VAR_CLASS && tv.v_type != VAR_OBJECT)
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	1277 goto fail_after_eval;
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1278
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1279 class_T *cl = tv.v_type == VAR_CLASS ? tv.vval.v_class
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1280 : tv.vval.v_object->obj_class;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1281 if (cl == NULL)
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	1282 goto fail_after_eval;
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1283 char_u *fname = name_end + 1;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1284 char_u *fname_end = find_name_end(fname, NULL, NULL, FNE_CHECK_START);
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1285 if (fname_end == fname)
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	1286 goto fail_after_eval;
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1287 len = fname_end - fname;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1288
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1289 int count = tv.v_type == VAR_CLASS ? cl->class_class_function_count
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1290 : cl->class_obj_method_count;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1291 ufunc_T **funcs = tv.v_type == VAR_CLASS ? cl->class_class_functions
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1292 : cl->class_obj_methods;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1293 for (int i = 0; i < count; ++i)
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1294 {
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1295 ufunc_T *fp = funcs[i];
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1296 // Use a separate pointer to avoid that ASAN complains about
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1297 // uf_name[] only being 4 characters.
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1298 char_u ufname = (char_u )fp->uf_name;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1299 if (STRNCMP(fname, ufname, len) == 0 && ufname[len] == NUL)
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	1300 {
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	1301 clear_tv(&tv);
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1302 return fp;
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	1303 }
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1304 }
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1305
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	1306 fail_after_eval:
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	1307 clear_tv(&tv);
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1308 return NULL;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1309 }
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1310
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	1311 /*
31590 aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1312 * If "name[len]" is a class member in cctx->ctx_ufunc->uf_class return the
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1313 * index in class.class_class_members[].
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1314 * If "cl_ret" is not NULL set it to the class.
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1315 * Otherwise return -1;
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1316 */
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1317 int
31590 aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1318 class_member_index(char_u name, size_t len, class_T cl_ret, cctx_T cctx)
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1319 {
31590 aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1320 if (cctx == NULL \|\| cctx->ctx_ufunc == NULL
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1321 \|\| cctx->ctx_ufunc->uf_class == NULL)
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1322 return -1;
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1323 class_T *cl = cctx->ctx_ufunc->uf_class;
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1324
31590 aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1325 for (int i = 0; i < cl->class_class_member_count; ++i)
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1326 {
31590 aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1327 ocmember_T *m = &cl->class_class_members[i];
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1328 if (STRNCMP(name, m->ocm_name, len) == 0 && m->ocm_name[len] == NUL)
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1329 {
31590 aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1330 if (cl_ret != NULL)
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1331 *cl_ret = cl;
aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1332 return i;
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1333 }
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1334 }
31590 aee868b9229a patch 9.0.1127: no error if function argument shadows class member Bram Moolenaar <Bram@vim.org> parents: 31586 diff changeset	1335 return -1;
31582 8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1336 }
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1337
8bbc932fbd09 patch 9.0.1123: class function not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31517 diff changeset	1338 /*
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1339 * Make a copy of an object.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1340 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1341 void
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1342 copy_object(typval_T from, typval_T to)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1343 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1344 to = from;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1345 if (to->vval.v_object != NULL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1346 ++to->vval.v_object->obj_refcount;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1347 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1348
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1349 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1350 * Free an object.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1351 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1352 static void
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1353 object_clear(object_T *obj)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1354 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1355 class_T *cl = obj->obj_class;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1356
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1357 // the member values are just after the object structure
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1358 typval_T tv = (typval_T )(obj + 1);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1359 for (int i = 0; i < cl->class_obj_member_count; ++i)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1360 clear_tv(tv + i);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1361
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1362 // Remove from the list headed by "first_object".
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1363 object_cleared(obj);
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1364
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1365 vim_free(obj);
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1366 class_unref(cl);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1367 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1368
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1369 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1370 * Unreference an object.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1371 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1372 void
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1373 object_unref(object_T *obj)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1374 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1375 if (obj != NULL && --obj->obj_refcount <= 0)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1376 object_clear(obj);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1377 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1378
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1379 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1380 * Make a copy of a class.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1381 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1382 void
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1383 copy_class(typval_T from, typval_T to)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1384 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1385 to = from;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1386 if (to->vval.v_class != NULL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1387 ++to->vval.v_class->class_refcount;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1388 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1389
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1390 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1391 * Unreference a class. Free it when the reference count goes down to zero.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1392 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1393 void
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1394 class_unref(class_T *cl)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1395 {
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1396 if (cl != NULL && --cl->class_refcount <= 0 && cl->class_name != NULL)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1397 {
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1398 // Freeing what the class contains may recursively come back here.
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1399 // Clear "class_name" first, if it is NULL the class does not need to
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1400 // be freed.
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1401 VIM_CLEAR(cl->class_name);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1402
31653 ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	1403 class_unref(cl->class_extends);
ec76f9d2319e patch 9.0.1159: extends argument for class not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31649 diff changeset	1404
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	1405 for (int i = 0; i < cl->class_interface_count; ++i)
31704 69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1406 {
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	1407 vim_free(((char_u **)cl->class_interfaces)[i]);
31704 69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1408 if (cl->class_interfaces_cl[i] != NULL)
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1409 class_unref(cl->class_interfaces_cl[i]);
69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1410 }
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	1411 vim_free(cl->class_interfaces);
31704 69ee530cac28 patch 9.0.1184: interface of an object is not recognized when checking type Bram Moolenaar <Bram@vim.org> parents: 31692 diff changeset	1412 vim_free(cl->class_interfaces_cl);
31639 62237ea155d9 patch 9.0.1152: class "implements" argument not implemented Bram Moolenaar <Bram@vim.org> parents: 31635 diff changeset	1413
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1414 for (int i = 0; i < cl->class_class_member_count; ++i)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1415 {
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1416 ocmember_T *m = &cl->class_class_members[i];
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1417 vim_free(m->ocm_name);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1418 vim_free(m->ocm_init);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1419 if (cl->class_members_tv != NULL)
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1420 clear_tv(&cl->class_members_tv[i]);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1421 }
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1422 vim_free(cl->class_class_members);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1423 vim_free(cl->class_members_tv);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1424
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1425 for (int i = 0; i < cl->class_obj_member_count; ++i)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1426 {
31483 1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1427 ocmember_T *m = &cl->class_obj_members[i];
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1428 vim_free(m->ocm_name);
1bebc2093e6b patch 9.0.1074: class members are not supported yet Bram Moolenaar <Bram@vim.org> parents: 31455 diff changeset	1429 vim_free(m->ocm_init);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1430 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1431 vim_free(cl->class_obj_members);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1432
31586 f36f920bad1a patch 9.0.1125: memory leak when using class functions Bram Moolenaar <Bram@vim.org> parents: 31582 diff changeset	1433 for (int i = 0; i < cl->class_class_function_count; ++i)
f36f920bad1a patch 9.0.1125: memory leak when using class functions Bram Moolenaar <Bram@vim.org> parents: 31582 diff changeset	1434 {
f36f920bad1a patch 9.0.1125: memory leak when using class functions Bram Moolenaar <Bram@vim.org> parents: 31582 diff changeset	1435 ufunc_T *uf = cl->class_class_functions[i];
f36f920bad1a patch 9.0.1125: memory leak when using class functions Bram Moolenaar <Bram@vim.org> parents: 31582 diff changeset	1436 func_clear_free(uf, FALSE);
f36f920bad1a patch 9.0.1125: memory leak when using class functions Bram Moolenaar <Bram@vim.org> parents: 31582 diff changeset	1437 }
f36f920bad1a patch 9.0.1125: memory leak when using class functions Bram Moolenaar <Bram@vim.org> parents: 31582 diff changeset	1438 vim_free(cl->class_class_functions);
f36f920bad1a patch 9.0.1125: memory leak when using class functions Bram Moolenaar <Bram@vim.org> parents: 31582 diff changeset	1439
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1440 for (int i = 0; i < cl->class_obj_method_count; ++i)
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1441 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1442 ufunc_T *uf = cl->class_obj_methods[i];
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1443 func_clear_free(uf, FALSE);
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	1444 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1445 vim_free(cl->class_obj_methods);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1446
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1447 clear_type_list(&cl->class_type_list);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1448
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1449 vim_free(cl);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1450 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1451 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	1452
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1453 static object_T *first_object = NULL;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1454
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1455 /*
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1456 * Call this function when an object has been created. It will be added to the
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1457 * list headed by "first_object".
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1458 */
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1459 void
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1460 object_created(object_T *obj)
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1461 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1462 if (first_object != NULL)
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1463 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1464 obj->obj_next_used = first_object;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1465 first_object->obj_prev_used = obj;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1466 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1467 first_object = obj;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1468 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1469
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1470 /*
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1471 * Call this function when an object has been cleared and is about to be freed.
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1472 * It is removed from the list headed by "first_object".
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1473 */
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1474 void
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1475 object_cleared(object_T *obj)
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1476 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1477 if (obj->obj_next_used != NULL)
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1478 obj->obj_next_used->obj_prev_used = obj->obj_prev_used;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1479 if (obj->obj_prev_used != NULL)
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1480 obj->obj_prev_used->obj_next_used = obj->obj_next_used;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1481 else if (first_object == obj)
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1482 first_object = obj->obj_next_used;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1483 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1484
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1485 /*
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1486 * Go through the list of all objects and free items without "copyID".
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1487 */
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1488 int
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1489 object_free_nonref(int copyID)
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1490 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1491 int did_free = FALSE;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1492 object_T *next_obj;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1493
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1494 for (object_T *obj = first_object; obj != NULL; obj = next_obj)
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1495 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1496 next_obj = obj->obj_next_used;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1497 if ((obj->obj_copyID & COPYID_MASK) != (copyID & COPYID_MASK))
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1498 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1499 // Free the object and items it contains.
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1500 object_clear(obj);
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1501 did_free = TRUE;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1502 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1503 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1504
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1505 return did_free;
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1506 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	1507
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1508
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	1509 #endif // FEAT_EVAL

Mercurial > vim

annotate src/vim9class.c @ 31746:d3d3ed2c09f6 v9.0.1205