0
0
mirror of https://github.com/vim/vim.git synced 2025-07-26 11:04:33 -04:00

patch 8.2.3151: Vim9: profiling fails if nested function is also profiled

Problem:    Vim9: profiling fails if nested function is also profiled.
Solution:   Use the compile type from the outer function. (closes #8543)
This commit is contained in:
Bram Moolenaar 2021-07-11 20:22:30 +02:00
parent c72bdd28ac
commit ffcfddc759
3 changed files with 30 additions and 5 deletions

View File

@ -4190,6 +4190,14 @@ def ProfiledNested()
Nested() Nested()
enddef enddef
def ProfiledNestedProfiled()
var x = 0
def Nested(): any
return x
enddef
Nested()
enddef
" Execute this near the end, profiling doesn't stop until Vim exists. " Execute this near the end, profiling doesn't stop until Vim exists.
" This only tests that it works, not the profiling output. " This only tests that it works, not the profiling output.
def Test_xx_profile_with_lambda() def Test_xx_profile_with_lambda()
@ -4198,8 +4206,17 @@ def Test_xx_profile_with_lambda()
profile start Xprofile.log profile start Xprofile.log
profile func ProfiledWithLambda profile func ProfiledWithLambda
ProfiledWithLambda() ProfiledWithLambda()
profile func ProfiledNested profile func ProfiledNested
ProfiledNested() ProfiledNested()
# Also profile the nested function. Use a different function, although the
# contents is the same, to make sure it was not already compiled.
profile func *
ProfiledNestedProfiled()
profdel func *
profile pause
enddef enddef
" Keep this last, it messes up highlighting. " Keep this last, it messes up highlighting.

View File

@ -755,6 +755,8 @@ static char *(features[]) =
static int included_patches[] = static int included_patches[] =
{ /* Add new patch number below this line */ { /* Add new patch number below this line */
/**/
3151,
/**/ /**/
3150, 3150,
/**/ /**/

View File

@ -5570,6 +5570,7 @@ compile_nested_function(exarg_T *eap, cctx_T *cctx)
char_u *lambda_name; char_u *lambda_name;
ufunc_T *ufunc; ufunc_T *ufunc;
int r = FAIL; int r = FAIL;
compiletype_T compile_type;
if (eap->forceit) if (eap->forceit)
{ {
@ -5636,9 +5637,15 @@ compile_nested_function(exarg_T *eap, cctx_T *cctx)
} }
} }
if (func_needs_compiling(ufunc, COMPILE_TYPE(ufunc)) compile_type = COMPILE_TYPE(ufunc);
&& compile_def_function(ufunc, TRUE, COMPILE_TYPE(ufunc), cctx) #ifdef FEAT_PROFILE
== FAIL) // If the outer function is profiled, also compile the nested function for
// profiling.
if (cctx->ctx_compile_type == CT_PROFILE)
compile_type = CT_PROFILE;
#endif
if (func_needs_compiling(ufunc, compile_type)
&& compile_def_function(ufunc, TRUE, compile_type, cctx) == FAIL)
{ {
func_ptr_unref(ufunc); func_ptr_unref(ufunc);
goto theend; goto theend;
@ -5647,8 +5654,7 @@ compile_nested_function(exarg_T *eap, cctx_T *cctx)
#ifdef FEAT_PROFILE #ifdef FEAT_PROFILE
// When the outer function is compiled for profiling, the nested function // When the outer function is compiled for profiling, the nested function
// may be called without profiling. Compile it here in the right context. // may be called without profiling. Compile it here in the right context.
if (COMPILE_TYPE(ufunc) == CT_PROFILE if (compile_type == CT_PROFILE && func_needs_compiling(ufunc, CT_NONE))
&& func_needs_compiling(ufunc, CT_NONE))
compile_def_function(ufunc, FALSE, CT_NONE, cctx); compile_def_function(ufunc, FALSE, CT_NONE, cctx);
#endif #endif