thac0/vim
1
0
Fork 0
forked from aniani/vim
Code Activity

patch 9.0.0617: calling function for reduce() has too much overhead

Browse Source 
Problem:    Calling function for reduce() has too much overhead.
Solution:   Only call clear_tv() when needed.
This commit is contained in:
Bram Moolenaar
2022-09-28 15:19:10 +01:00
parent 371951d0c3
commit 1936c76536
3 changed files with 14 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
src/vim9execute.c
View File

@@ -710,7 +710,8 @@ handle_closure_in_use(ectx_T *ectx, int free_arguments)
return FAIL;
funcstack->fs_var_offset = argcount + STACK_FRAME_SIZE;
funcstack->fs_ga.ga_len = funcstack->fs_var_offset + dfunc->df_varcount;
funcstack->fs_ga.ga_len = funcstack->fs_var_offset
+ dfunc->df_varcount;
stack = ALLOC_CLEAR_MULT(typval_T, funcstack->fs_ga.ga_len);
funcstack->fs_ga.ga_data = stack;
if (stack == NULL)
@@ -5881,7 +5882,11 @@ call_def_function(
failed_early:
// Free all arguments and local variables.
for (idx = 0; idx < ectx.ec_stack.ga_len; ++idx)
clear_tv(STACK_TV(idx));
{
tv = STACK_TV(idx);
if (tv->v_type != VAR_NUMBER && tv->v_type != VAR_UNKNOWN)
clear_tv(tv);
}
ex_nesting_level = orig_nesting_level;
vim_free(ectx.ec_stack.ga_data);
@@ -6371,11 +6376,11 @@ list_instructions(char *pfx, isn_T *instr, int instr_count, ufunc_T *ufunc)
break;
case ISN_NEWLIST:
smsg("%s%4d NEWLIST size %lld", pfx, current,
(varnumber_T)(iptr->isn_arg.number));
(varnumber_T)(iptr->isn_arg.number));
break;
case ISN_NEWDICT:
smsg("%s%4d NEWDICT size %lld", pfx, current,
(varnumber_T)(iptr->isn_arg.number));
(varnumber_T)(iptr->isn_arg.number));
break;
case ISN_NEWPARTIAL:
smsg("%s%4d NEWPARTIAL", pfx, current);