vim: src/vim9class.c annotate

annotate src/vim9class.c @ 31416:f088f1d97eee v9.0.1041

patch 9.0.1041: cannot define a method in a class Commit: https://github.com/vim/vim/commit/ffdaca9e6f3d39af6857ac52ced9385df203a152 Author: Bram Moolenaar <Bram@vim.org> Date: Fri Dec 9 21:41:48 2022 +0000 patch 9.0.1041: cannot define a method in a class Problem: Cannot define a method in a class. Solution: Implement defining an object method. Make calling an object method work.

author	Bram Moolenaar <Bram@vim.org>
date	Fri, 09 Dec 2022 22:45:03 +0100
parents	c82cb53474ee
children	462508d04341

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 /*
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	25 * Handle ":class" and ":abstract class" up to ":endclass".
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	26 */
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	27 void
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	28 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	29 {
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	30 if (!current_script_is_vim9()
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	31 \|\| (cmdmod.cmod_flags & CMOD_LEGACY)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	32 \|\| !getline_equal(eap->getline, eap->cookie, getsourceline))
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	33 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	34 emsg(_(e_class_can_only_be_defined_in_vim9_script));
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	35 return;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	36 }
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	37
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	38 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	39 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	40 if (is_abstract)
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	41 {
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	42 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	43 {
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	44 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	45 return;
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	46 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	47 arg = skipwhite(arg + 5);
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	48 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	49
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	50 if (!ASCII_ISUPPER(*arg))
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	51 {
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	52 semsg(_(e_class_name_must_start_with_uppercase_letter_str), arg);
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	53 return;
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	54 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	55 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	56 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	57 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	58 semsg(_(e_white_space_required_after_class_name_str), arg);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	59 return;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	60 }
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	61
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	62 // TODO:
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	63 // generics: <Tkey, Tentry>
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	64 // extends SomeClass
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	65 // implements SomeInterface
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	66 // specifies SomeInterface
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	67 // check nothing follows
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	68
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	69 // TODO: handle "is_export" if it is set
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	70
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	71 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	72 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	73
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	74 // 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	75 garray_T objmembers;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	76 ga_init2(&objmembers, sizeof(objmember_T), 10);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	77
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	78 // 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	79 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	80 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	81
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	82 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	83 * Go over the body of the class until "endclass" is found.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	84 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	85 char_u *theline = NULL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	86 int success = FALSE;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	87 for (;;)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	88 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	89 vim_free(theline);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	90 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	91 if (theline == NULL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	92 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	93 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	94
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	95 // TODO:
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	96 // class members (public, read access, private):
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	97 // static varname
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	98 // public static varname
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	99 // static _varname
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	100
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	101 char_u *p = line;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	102 if (checkforcmd(&p, "endclass", 4))
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	103 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	104 if (STRNCMP(line, "endclass", 8) != 0)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	105 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	106 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	107 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	108 else
c82cb53474ee patch 9.0.1037: lalloc(0) error for a class without members Bram Moolenaar <Bram@vim.org> parents: 31404 diff changeset	109 success = TRUE;
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	110 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	111 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	112
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	113 // "this.varname"
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	114 // "this._varname"
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	115 // TODO:
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	116 // "public this.varname"
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	117 if (STRNCMP(line, "this", 4) == 0)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	118 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	119 if (line[4] != '.' \|\| !eval_isnamec1(line[5]))
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	120 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	121 semsg(_(e_invalid_object_member_declaration_str), line);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	122 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	123 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	124 char_u *varname = line + 5;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	125 char_u *varname_end = to_name_end(varname, FALSE);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	126
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	127 char_u *colon = skipwhite(varname_end);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	128 // TODO: accept initialization and figure out type from it
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	129 if (*colon != ':')
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	130 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	131 emsg(_(e_type_or_initialization_required));
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	132 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	133 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	134 if (VIM_ISWHITE(*varname_end))
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	135 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	136 semsg(_(e_no_white_space_allowed_before_colon_str), varname);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	137 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	138 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	139 if (!VIM_ISWHITE(colon[1]))
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	140 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	141 semsg(_(e_white_space_required_after_str_str), ":", varname);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	142 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	143 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	144
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	145 char_u *type_arg = skipwhite(colon + 1);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	146 type_T *type = parse_type(&type_arg, &type_list, TRUE);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	147 if (type == NULL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	148 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	149
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	150 if (ga_grow(&objmembers, 1) == FAIL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	151 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	152 objmember_T m = ((objmember_T )objmembers.ga_data)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	153 + objmembers.ga_len;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	154 m->om_name = vim_strnsave(varname, varname_end - varname);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	155 m->om_type = type;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	156 ++objmembers.ga_len;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	157 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	158
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	159 // constructors:
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	160 // def new()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	161 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	162 // def newOther()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	163 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	164 // methods:
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	165 // def someMethod()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	166 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	167 // TODO:
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	168 // static def someMethod()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	169 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	170 // def <Tval> someMethod()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	171 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	172 // static def <Tval> someMethod()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	173 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	174 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	175 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	176 exarg_T ea;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	177 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	178
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	179 CLEAR_FIELD(ea);
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	180 ea.cmd = line;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	181 ea.arg = p;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	182 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	183 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	184 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	185
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	186 ga_init2(&lines_to_free, sizeof(char_u *), 50);
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	187 ufunc_T *uf = define_function(&ea, NULL, &lines_to_free, TRUE);
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	188 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	189
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	190 // TODO: how about errors?
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	191 if (uf != NULL && ga_grow(&objmethods, 1) == OK)
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	192 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	193 ((ufunc_T **)objmethods.ga_data)[objmethods.ga_len] = uf;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	194 ++objmethods.ga_len;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	195 }
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	196 }
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	197
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	198 else
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	199 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	200 semsg(_(e_not_valid_command_in_class_str), line);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	201 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	202 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	203 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	204 vim_free(theline);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	205
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	206 if (success)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	207 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	208 class_T *cl = ALLOC_CLEAR_ONE(class_T);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	209 if (cl == NULL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	210 goto cleanup;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	211 cl->class_refcount = 1;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	212 cl->class_name = vim_strnsave(arg, name_end - arg);
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	213
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	214 // Members are used by the new() function, add them here.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	215 cl->class_obj_member_count = objmembers.ga_len;
31408 c82cb53474ee patch 9.0.1037: lalloc(0) error for a class without members Bram Moolenaar <Bram@vim.org> parents: 31404 diff changeset	216 cl->class_obj_members = objmembers.ga_len == 0 ? NULL
c82cb53474ee patch 9.0.1037: lalloc(0) error for a class without members Bram Moolenaar <Bram@vim.org> parents: 31404 diff changeset	217 : ALLOC_MULT(objmember_T, objmembers.ga_len);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	218 if (cl->class_name == NULL
31408 c82cb53474ee patch 9.0.1037: lalloc(0) error for a class without members Bram Moolenaar <Bram@vim.org> parents: 31404 diff changeset	219 \|\| (objmembers.ga_len > 0 && cl->class_obj_members == NULL))
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	220 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	221 vim_free(cl->class_name);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	222 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	223 vim_free(cl);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	224 goto cleanup;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	225 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	226 mch_memmove(cl->class_obj_members, objmembers.ga_data,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	227 sizeof(objmember_T) * objmembers.ga_len);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	228 vim_free(objmembers.ga_data);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	229
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	230 int have_new = FALSE;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	231 for (int i = 0; i < objmethods.ga_len; ++i)
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	232 if (STRCMP(((ufunc_T **)objmethods.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	233 "new") == 0)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	234 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	235 have_new = TRUE;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	236 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	237 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	238 if (!have_new)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	239 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	240 // 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	241 garray_T fga;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	242 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	243 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	244 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	245 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	246 if (i > 0)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	247 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	248 ga_concat(&fga, (char_u *)"this.");
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	249 objmember_T *m = cl->class_obj_members + i;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	250 ga_concat(&fga, (char_u *)m->om_name);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	251 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	252 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	253 ga_append(&fga, NUL);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	254
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	255 exarg_T fea;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	256 CLEAR_FIELD(fea);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	257 fea.cmdidx = CMD_def;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	258 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	259
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	260 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	261 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	262
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	263 ufunc_T *nf = define_function(&fea, NULL, &lines_to_free, TRUE);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	264
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	265 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	266 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	267
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	268 if (nf != NULL && ga_grow(&objmethods, 1) == OK)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	269 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	270 ((ufunc_T **)objmethods.ga_data)[objmethods.ga_len] = nf;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	271 ++objmethods.ga_len;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	272
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	273 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	274 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	275 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	276 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	277 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	278 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	279 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	280 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	281 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	282 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	283 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	284
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	285 cl->class_obj_method_count = objmethods.ga_len;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	286 cl->class_obj_methods = ALLOC_MULT(ufunc_T *, objmethods.ga_len);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	287 if (cl->class_obj_methods == NULL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	288 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	289 vim_free(cl->class_name);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	290 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	291 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	292 vim_free(cl);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	293 goto cleanup;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	294 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	295 mch_memmove(cl->class_obj_methods, objmethods.ga_data,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	296 sizeof(ufunc_T ) objmethods.ga_len);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	297 vim_free(objmethods.ga_data);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	298
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	299 // Set the class pointer on all the object methods.
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	300 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	301 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	302 ufunc_T *fp = 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	303 fp->uf_class = cl;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	304 fp->uf_flags \|= FC_OBJECT; // TODO: not for class method
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	305 }
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	306
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	307 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	308 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	309 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	310 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	311 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	312
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	313 // TODO:
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	314 // - Add the methods to the class
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	315 // - array with ufunc_T pointers
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	316 // - Fill hashtab with object members and methods
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	317 // - Generate the default new() method, if needed.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	318 // Later:
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	319 // - class members
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	320 // - class methods
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	321
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	322 // Add the class to the script-local variables.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	323 typval_T tv;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	324 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	325 tv.vval.v_class = cl;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	326 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	327 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	328 return;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	329 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	330
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	331 cleanup:
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	332 for (int i = 0; i < objmembers.ga_len; ++i)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	333 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	334 objmember_T m = ((objmember_T )objmembers.ga_data) + i;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	335 vim_free(m->om_name);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	336 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	337 ga_clear(&objmembers);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	338
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	339 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	340 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	341 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	342 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	343 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	344 ga_clear(&objmethods);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	345 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	346 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	347
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	348 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	349 * Find member "name" in class "cl" and return its type.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	350 * When not found t_any is returned.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	351 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	352 type_T *
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	353 class_member_type(
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	354 class_T *cl,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	355 char_u *name,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	356 char_u *name_end,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	357 int *member_idx)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	358 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	359 *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	360 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	361
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	362 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	363 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	364 objmember_T *m = cl->class_obj_members + i;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	365 if (STRNCMP(m->om_name, name, len) == 0 && m->om_name[len] == NUL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	366 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	367 *member_idx = i;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	368 return m->om_type;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	369 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	370 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	371 return &t_any;
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	372 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	373
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	374 /*
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	375 * Handle ":interface" up to ":endinterface".
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	376 */
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	377 void
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	378 ex_interface(exarg_T *eap UNUSED)
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	379 {
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	380 // TODO
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	381 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	382
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	383 /*
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	384 * 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	385 */
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	386 void
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	387 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	388 {
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	389 // TODO
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	390 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	391
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	392 /*
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	393 * Handle ":type".
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	394 */
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	395 void
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	396 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	397 {
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	398 // TODO
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	399 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	400
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	401 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	402 * 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	403 * - class member: SomeClass.varname
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	404 * - class method: SomeClass.SomeMethod()
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	405 * - class constructor: SomeClass.new()
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	406 * - object member: someObject.varname
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	407 * - object method: someObject.SomeMethod()
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	408 *
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	409 * "*arg" points to the '.'.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	410 * "*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	411 *
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	412 * Returns FAIL or OK.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	413 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	414 int
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	415 class_object_index(
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	416 char_u **arg,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	417 typval_T *rettv,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	418 evalarg_T *evalarg,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	419 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	420 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	421 // int evaluate = evalarg != NULL
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	422 // && (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	423
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	424 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	425 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	426 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	427 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	428 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	429
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	430 ++*arg;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	431 char_u name = arg;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	432 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	433 if (name_end == name)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	434 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	435 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	436
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	437 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	438 : 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	439 if (*name_end == '(')
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	440 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	441 for (int i = 0; i < cl->class_obj_method_count; ++i)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	442 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	443 ufunc_T *fp = cl->class_obj_methods[i];
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	444 if (STRNCMP(name, fp->uf_name, len) == 0 && fp->uf_name[len] == NUL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	445 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	446 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	447 int argcount = 0;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	448
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	449 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	450 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	451 argvars, &argcount);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	452 if (ret == FAIL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	453 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	454
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	455 funcexe_T funcexe;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	456 CLEAR_FIELD(funcexe);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	457 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	458 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	459 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	460 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	461 ++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	462 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	463
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	464 // 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	465 // 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	466 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	467 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	468
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	469 // 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	470 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	471 rettv, &funcexe, NULL);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	472
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	473 // 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	474 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	475 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	476 clear_tv(&argvars[idx]);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	477
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	478 if (error != FCERR_NONE)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	479 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	480 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	481 funcexe.fe_found_var);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	482 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	483 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	484 *arg = argp;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	485 return OK;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	486 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	487 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	488
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	489 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	490 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	491
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	492 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	493 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	494 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	495 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	496 objmember_T *m = &cl->class_obj_members[i];
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	497 if (STRNCMP(name, m->om_name, len) == 0 && m->om_name[len] == NUL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	498 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	499 // 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	500 // 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	501 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	502 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	503 copy_tv(tv, rettv);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	504 object_unref(obj);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	505
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	506 *arg = name_end;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	507 return OK;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	508 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	509 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	510
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	511 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	512 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	513
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	514 // TODO: class member
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	515
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	516 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	517 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	518
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	519 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	520 * 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	521 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	522 void
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	523 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	524 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	525 to = from;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	526 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	527 ++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	528 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	529
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	530 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	531 * Free an object.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	532 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	533 static void
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	534 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	535 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	536 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	537
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	538 // 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	539 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	540 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	541 clear_tv(tv + i);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	542
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	543 // 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	544 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	545
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	546 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	547 class_unref(cl);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	548 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	549
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	550 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	551 * Unreference an object.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	552 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	553 void
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	554 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	555 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	556 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	557 object_clear(obj);
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 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	561 * 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	562 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	563 void
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	564 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	565 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	566 to = from;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	567 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	568 ++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	569 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	570
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	571 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	572 * 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	573 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	574 void
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	575 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	576 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	577 if (cl != NULL && --cl->class_refcount <= 0)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	578 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	579 vim_free(cl->class_name);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	580
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	581 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	582 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	583 objmember_T *m = &cl->class_obj_members[i];
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	584 vim_free(m->om_name);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	585 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	586 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	587
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	588 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	589 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	590 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	591 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	592 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	593 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	594
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	595 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	596
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	597 vim_free(cl);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	598 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	599 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	600
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	601 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	602
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	603 /*
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	604 * 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	605 * 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	606 */
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	607 void
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	608 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	609 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	610 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	611 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	612 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	613 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	614 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	615 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	616 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	617
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	618 /*
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	619 * 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	620 * 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	621 */
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	622 void
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	623 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	624 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	625 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	626 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	627 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	628 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	629 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	630 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	631 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	632
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	633 /*
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	634 * 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	635 */
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	636 int
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	637 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	638 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	639 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	640 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	641
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	642 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	643 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	644 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	645 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	646 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	647 // 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	648 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	649 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	650 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	651 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	652
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	653 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	654 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	655
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	656
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	657 #endif // FEAT_EVAL

Mercurial > vim

annotate src/vim9class.c @ 31416:f088f1d97eee v9.0.1041