vim: src/vim9class.c annotate

annotate src/vim9class.c @ 31455:5ef28f5ff357 v9.0.1060

patch 9.0.1060: private and public object members are not implemented yet Commit: https://github.com/vim/vim/commit/3d473ee1a6aed7cb9eae458bbd8d42dffdc754f9 Author: Bram Moolenaar <Bram@vim.org> Date: Wed Dec 14 20:59:32 2022 +0000 patch 9.0.1060: private and public object members are not implemented yet problem: Private and public object members are not implemented yet. Solution: Implement private and public object members.

author	Bram Moolenaar <Bram@vim.org>
date	Wed, 14 Dec 2022 22:00:04 +0100
parents	8cb31f7ac9e2
children	1bebc2093e6b

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
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	113 // "this._varname"
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	114 // "this.varname"
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	115 // "public this.varname"
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	116 int has_public = FALSE;
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	117 if (checkforcmd(&p, "public", 3))
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	118 {
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	119 if (STRNCMP(line, "public", 6) != 0)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	120 {
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	121 semsg(_(e_command_cannot_be_shortened_str), line);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	122 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	123 }
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	124 has_public = TRUE;
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	125 p = skipwhite(line + 6);
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	126
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	127 if (STRNCMP(p, "this", 4) != 0)
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	128 {
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	129 emsg(_(e_public_must_be_followed_by_this));
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	130 break;
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	131 }
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	132 }
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	133 if (STRNCMP(p, "this", 4) == 0)
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	134 {
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	135 if (p[4] != '.' \|\| !eval_isnamec1(p[5]))
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	136 {
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	137 semsg(_(e_invalid_object_member_declaration_str), p);
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	138 break;
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	139 }
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	140 char_u *varname = p + 5;
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	141 char_u *varname_end = to_name_end(varname, FALSE);
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	142 if (*varname == '_' && has_public)
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	143 {
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	144 semsg(_(e_public_object_member_name_cannot_start_with_underscore_str), line);
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	145 break;
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	146 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	147
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	148 char_u *colon = skipwhite(varname_end);
31443 9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	149 char_u *type_arg = colon;
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	150 type_T *type = NULL;
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	151 if (*colon == ':')
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	152 {
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	153 if (VIM_ISWHITE(*varname_end))
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	154 {
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	155 semsg(_(e_no_white_space_allowed_before_colon_str),
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	156 varname);
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	157 break;
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	158 }
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	159 if (!VIM_ISWHITE(colon[1]))
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	160 {
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	161 semsg(_(e_white_space_required_after_str_str), ":",
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	162 varname);
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	163 break;
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	164 }
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	165 type_arg = skipwhite(colon + 1);
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	166 type = parse_type(&type_arg, &type_list, TRUE);
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	167 if (type == NULL)
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	168 break;
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	169 }
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	170
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	171 char_u *expr_start = skipwhite(type_arg);
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	172 char_u *expr_end = expr_start;
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	173 if (type == NULL && *expr_start != '=')
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	174 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	175 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	176 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	177 }
31443 9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	178
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	179 if (*expr_start == '=')
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	180 {
31443 9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	181 if (!VIM_ISWHITE(expr_start[-1]) \|\| !VIM_ISWHITE(expr_start[1]))
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	182 {
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	183 semsg(_(e_white_space_required_before_and_after_str_at_str),
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	184 "=", type_arg);
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	185 break;
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	186 }
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	187 expr_start = skipwhite(expr_start + 1);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	188
31443 9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	189 expr_end = expr_start;
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	190 evalarg_T evalarg;
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	191 fill_evalarg_from_eap(&evalarg, eap, FALSE);
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	192 skip_expr(&expr_end, NULL);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	193
31443 9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	194 if (type == NULL)
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	195 {
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	196 // No type specified, use the type of the initializer.
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	197 typval_T tv;
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	198 tv.v_type = VAR_UNKNOWN;
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	199 char_u *expr = expr_start;
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	200 int res = eval0(expr, &tv, eap, &evalarg);
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	201
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	202 if (res == OK)
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	203 type = typval2type(&tv, get_copyID(), &type_list,
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	204 TVTT_DO_MEMBER);
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	205 if (type == NULL)
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	206 {
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	207 semsg(_(e_cannot_get_object_member_type_from_initializer_str),
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	208 expr_start);
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	209 clear_evalarg(&evalarg, NULL);
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	210 break;
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	211 }
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	212 }
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	213 clear_evalarg(&evalarg, NULL);
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	214 }
31443 9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	215 if (!valid_declaration_type(type))
9ae3720f9bd9 patch 9.0.1054: object member can't get type from initializer Bram Moolenaar <Bram@vim.org> parents: 31441 diff changeset	216 break;
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	217
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	218 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	219 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	220 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	221 + objmembers.ga_len;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	222 m->om_name = vim_strnsave(varname, varname_end - varname);
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	223 m->om_access = has_public ? ACCESS_ALL
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	224 : *varname == '_' ? ACCESS_PRIVATE
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	225 : ACCESS_READ;
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	226 m->om_type = type;
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	227 if (expr_end > expr_start)
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	228 m->om_init = vim_strnsave(expr_start, expr_end - expr_start);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	229 ++objmembers.ga_len;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	230 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	231
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	232 // constructors:
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	233 // def new()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	234 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	235 // def newOther()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	236 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	237 // methods:
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	238 // def someMethod()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	239 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	240 // TODO:
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	241 // static def someMethod()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	242 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	243 // def <Tval> someMethod()
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	244 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	245 // 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	246 // enddef
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	247 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	248 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	249 exarg_T ea;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	250 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	251
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	252 CLEAR_FIELD(ea);
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	253 ea.cmd = line;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	254 ea.arg = p;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	255 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	256 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	257 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	258
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	259 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	260 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	261 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	262
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	263 // 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	264 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	265 {
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	266 if (STRNCMP(uf->uf_name, "new", 3) == 0)
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	267 uf->uf_flags \|= FC_NEW;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	268
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	269 ((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	270 ++objmethods.ga_len;
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	271 }
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	272 }
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	273
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	274 else
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	275 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	276 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	277 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	278 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	279 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	280 vim_free(theline);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	281
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	282 class_T *cl = NULL;
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	283 if (success)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	284 {
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	285 cl = ALLOC_CLEAR_ONE(class_T);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	286 if (cl == NULL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	287 goto cleanup;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	288 cl->class_refcount = 1;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	289 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	290
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	291 // 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	292 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	293 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	294 : 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	295 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	296 \|\| (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	297 goto cleanup;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	298 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	299 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	300 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	301
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	302 int have_new = FALSE;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	303 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	304 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	305 "new") == 0)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	306 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	307 have_new = TRUE;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	308 break;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	309 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	310 if (!have_new)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	311 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	312 // 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	313 garray_T fga;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	314 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	315 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	316 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	317 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	318 if (i > 0)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	319 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	320 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	321 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	322 ga_concat(&fga, (char_u *)m->om_name);
31441 e572ff386670 patch 9.0.1053: default constructor arguments are not optional Bram Moolenaar <Bram@vim.org> parents: 31424 diff changeset	323 ga_concat(&fga, (char_u *)" = v:none");
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	324 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	325 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	326 ga_append(&fga, NUL);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	327
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	328 exarg_T fea;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	329 CLEAR_FIELD(fea);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	330 fea.cmdidx = CMD_def;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	331 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	332
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	333 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	334 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	335
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	336 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	337
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	338 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	339 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	340
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	341 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	342 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	343 ((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	344 ++objmethods.ga_len;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	345
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	346 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	347 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	348 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	349 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	350 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	351 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	352 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	353 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	354 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	355 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	356 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	357
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	358 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	359 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	360 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	361 goto cleanup;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	362 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	363 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	364 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	365
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	366 // 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	367 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	368 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	369 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	370 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	371 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	372 }
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	373
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	374 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	375 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	376 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	377 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	378 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	379
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	380 // TODO:
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	381 // - 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	382 // - 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	383 // - 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	384 // - 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	385 // Later:
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	386 // - class members
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	387 // - class methods
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	388
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	389 // 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	390 typval_T tv;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	391 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	392 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	393 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	394 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	395 return;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	396 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	397
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	398 cleanup:
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	399 if (cl != NULL)
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	400 {
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	401 vim_free(cl->class_name);
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	402 vim_free(cl->class_obj_members);
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	403 vim_free(cl->class_obj_methods);
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	404 vim_free(cl);
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	405 }
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	406
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	407 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	408 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	409 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	410 vim_free(m->om_name);
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	411 vim_free(m->om_init);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	412 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	413 ga_clear(&objmembers);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	414
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	415 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	416 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	417 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	418 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	419 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	420 ga_clear(&objmethods);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	421 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	422 }
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 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	425 * 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	426 * 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	427 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	428 type_T *
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	429 class_member_type(
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	430 class_T *cl,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	431 char_u *name,
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,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	433 int *member_idx)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	434 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	435 *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	436 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	437
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	438 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	439 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	440 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	441 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	442 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	443 *member_idx = i;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	444 return m->om_type;
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 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	447 return &t_any;
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	448 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	449
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	450 /*
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	451 * 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	452 */
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	453 void
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	454 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	455 {
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	456 // TODO
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	457 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	458
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	459 /*
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	460 * 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	461 */
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	462 void
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	463 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	464 {
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	465 // TODO
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	466 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	467
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	468 /*
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	469 * Handle ":type".
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	470 */
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	471 void
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	472 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	473 {
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	474 // TODO
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	475 }
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	476
31396 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 * 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	479 * - class member: SomeClass.varname
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	480 * - class method: SomeClass.SomeMethod()
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	481 * - class constructor: SomeClass.new()
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	482 * - object member: someObject.varname
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	483 * - object method: someObject.SomeMethod()
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	484 *
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	485 * "*arg" points to the '.'.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	486 * "*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	487 *
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	488 * Returns FAIL or OK.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	489 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	490 int
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	491 class_object_index(
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	492 char_u **arg,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	493 typval_T *rettv,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	494 evalarg_T *evalarg,
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	495 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	496 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	497 // int evaluate = evalarg != NULL
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	498 // && (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	499
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	500 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	501 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	502 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	503 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	504 }
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;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	507 char_u name = arg;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	508 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	509 if (name_end == name)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	510 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	511 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	512
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	513 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	514 : 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	515 if (*name_end == '(')
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	516 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	517 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	518 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	519 ufunc_T *fp = cl->class_obj_methods[i];
31418 462508d04341 patch 9.0.1042: ASAN gives false alarm about array access. Bram Moolenaar <Bram@vim.org> parents: 31416 diff changeset	520 // Use a separate pointer to avoid that ASAN complains about
462508d04341 patch 9.0.1042: ASAN gives false alarm about array access. Bram Moolenaar <Bram@vim.org> parents: 31416 diff changeset	521 // uf_name[] only being 4 characters.
462508d04341 patch 9.0.1042: ASAN gives false alarm about array access. Bram Moolenaar <Bram@vim.org> parents: 31416 diff changeset	522 char_u ufname = (char_u )fp->uf_name;
462508d04341 patch 9.0.1042: ASAN gives false alarm about array access. Bram Moolenaar <Bram@vim.org> parents: 31416 diff changeset	523 if (STRNCMP(name, ufname, len) == 0 && ufname[len] == NUL)
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	524 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	525 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	526 int argcount = 0;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	527
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	528 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	529 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	530 argvars, &argcount);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	531 if (ret == FAIL)
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	532 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	533
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	534 funcexe_T funcexe;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	535 CLEAR_FIELD(funcexe);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	536 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	537 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	538 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	539 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	540 ++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	541 }
31396 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 // 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	544 // 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	545 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	546 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	547
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	548 // 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	549 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	550 rettv, &funcexe, NULL);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	551
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	552 // 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	553 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	554 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	555 clear_tv(&argvars[idx]);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	556
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	557 if (error != FCERR_NONE)
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 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	560 funcexe.fe_found_var);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	561 return FAIL;
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 *arg = argp;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	564 return OK;
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 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	567
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	568 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	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 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	572 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	573 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	574 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	575 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	576 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	577 {
31455 5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	578 if (*name == '_')
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	579 {
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	580 semsg(_(e_cannot_access_private_object_member_str),
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	581 m->om_name);
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	582 return FAIL;
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	583 }
5ef28f5ff357 patch 9.0.1060: private and public object members are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31447 diff changeset	584
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	585 // 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	586 // 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	587 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	588 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	589 copy_tv(tv, rettv);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	590 object_unref(obj);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	591
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	592 *arg = name_end;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	593 return OK;
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 }
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 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	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 // TODO: class member
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	601
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	602 return FAIL;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	603 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	604
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	605 /*
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	606 * If "arg" points to a class or object method, return it.
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	607 * Otherwise return NULL.
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	608 */
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	609 ufunc_T *
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	610 find_class_func(char_u **arg)
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	611 {
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	612 char_u name = arg;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	613 char_u *name_end = find_name_end(name, NULL, NULL, FNE_CHECK_START);
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	614 if (name_end == name \|\| *name_end != '.')
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	615 return NULL;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	616
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	617 size_t len = name_end - name;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	618 typval_T tv;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	619 tv.v_type = VAR_UNKNOWN;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	620 if (eval_variable(name, len, 0, &tv, NULL, EVAL_VAR_NOAUTOLOAD) == FAIL)
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	621 return NULL;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	622 if (tv.v_type != VAR_CLASS && tv.v_type != VAR_OBJECT)
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	623 goto fail_after_eval;
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	624
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	625 class_T *cl = tv.v_type == VAR_CLASS ? tv.vval.v_class
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	626 : tv.vval.v_object->obj_class;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	627 if (cl == NULL)
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	628 goto fail_after_eval;
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	629 char_u *fname = name_end + 1;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	630 char_u *fname_end = find_name_end(fname, NULL, NULL, FNE_CHECK_START);
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	631 if (fname_end == fname)
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	632 goto fail_after_eval;
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	633 len = fname_end - fname;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	634
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	635 for (int i = 0; i < cl->class_obj_method_count; ++i)
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	636 {
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	637 ufunc_T *fp = cl->class_obj_methods[i];
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	638 // Use a separate pointer to avoid that ASAN complains about
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	639 // uf_name[] only being 4 characters.
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	640 char_u ufname = (char_u )fp->uf_name;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	641 if (STRNCMP(fname, ufname, len) == 0 && ufname[len] == NUL)
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	642 {
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	643 clear_tv(&tv);
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	644 return fp;
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	645 }
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	646 }
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	647
31447 8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	648 fail_after_eval:
8cb31f7ac9e2 patch 9.0.1056: leaking memory when disassembling an object method Bram Moolenaar <Bram@vim.org> parents: 31443 diff changeset	649 clear_tv(&tv);
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	650 return NULL;
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	651 }
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	652
e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	653 /*
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	654 * 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	655 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	656 void
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	657 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	658 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	659 to = from;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	660 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	661 ++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	662 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	663
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	664 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	665 * Free an object.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	666 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	667 static void
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	668 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	669 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	670 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	671
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	672 // 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	673 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	674 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	675 clear_tv(tv + i);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	676
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	677 // 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	678 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	679
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	680 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	681 class_unref(cl);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	682 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	683
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	684 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	685 * Unreference an object.
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	686 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	687 void
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	688 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	689 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	690 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	691 object_clear(obj);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	692 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	693
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	694 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	695 * 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	696 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	697 void
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	698 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	699 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	700 to = from;
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	701 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	702 ++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	703 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	704
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	705 /*
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	706 * 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	707 */
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	708 void
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	709 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	710 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	711 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	712 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	713 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	714
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	715 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	716 {
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	717 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	718 vim_free(m->om_name);
31424 e31fc75f6aff patch 9.0.1045: in a class object members cannot be initialized Bram Moolenaar <Bram@vim.org> parents: 31418 diff changeset	719 vim_free(m->om_init);
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	720 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	721 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	722
31416 f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	723 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	724 {
f088f1d97eee patch 9.0.1041: cannot define a method in a class Bram Moolenaar <Bram@vim.org> parents: 31408 diff changeset	725 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	726 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	727 }
31396 307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	728 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	729
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	730 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	731
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	732 vim_free(cl);
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	733 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	734 }
307f68a41b03 patch 9.0.1031: Vim9 class is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 31335 diff changeset	735
31404 60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	736 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	737
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	738 /*
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	739 * 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	740 * 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	741 */
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	742 void
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	743 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	744 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	745 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	746 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	747 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	748 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	749 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	750 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	751 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	752
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	753 /*
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	754 * 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	755 * 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	756 */
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	757 void
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	758 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	759 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	760 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	761 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	762 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	763 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	764 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	765 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	766 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	767
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	768 /*
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	769 * 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	770 */
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	771 int
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	772 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	773 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	774 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	775 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	776
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	777 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	778 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	779 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	780 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	781 {
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	782 // 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	783 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	784 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	785 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	786 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	787
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	788 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	789 }
60b1d266548d patch 9.0.1035: object members are not being marked as used Bram Moolenaar <Bram@vim.org> parents: 31396 diff changeset	790
31335 5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	791
5acc0d2cf4f7 patch 9.0.1001: classes are not documented or implemented yet Bram Moolenaar <Bram@vim.org> parents: diff changeset	792 #endif // FEAT_EVAL

Mercurial > vim

annotate src/vim9class.c @ 31455:5ef28f5ff357 v9.0.1060