Mercurial > vim
diff src/ex_docmd.c @ 14591:96878f6f5d4c v8.1.0309
patch 8.1.0309: profiling does not show a count for condition lines
commit https://github.com/vim/vim/commit/7feb35e7782907b44659a2748ff5d7489deeed74
Author: Bram Moolenaar <Bram@vim.org>
Date: Tue Aug 21 17:49:54 2018 +0200
patch 8.1.0309: profiling does not show a count for condition lines
Problem: Profiling does not show a count for condition lines. (Daniel
Hahler)
Solution: Count lines when not skipping. (Ozaki Kiichi, closes #2499)
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Tue, 21 Aug 2018 18:00:08 +0200 |
parents | c8f07e8b273e |
children | 89cc3e7ecb68 |
line wrap: on
line diff
--- a/src/ex_docmd.c +++ b/src/ex_docmd.c @@ -1766,28 +1766,6 @@ do_one_cmd( ea.skip = (if_level > 0); #endif -#ifdef FEAT_EVAL -# ifdef FEAT_PROFILE - /* Count this line for profiling if ea.skip is FALSE. */ - if (do_profiling == PROF_YES && !ea.skip) - { - if (getline_equal(fgetline, cookie, get_func_line)) - func_line_exec(getline_cookie(fgetline, cookie)); - else if (getline_equal(fgetline, cookie, getsourceline)) - script_line_exec(); - } -#endif - - /* May go to debug mode. If this happens and the ">quit" debug command is - * used, throw an interrupt exception and skip the next command. */ - dbg_check_breakpoint(&ea); - if (!ea.skip && got_int) - { - ea.skip = TRUE; - (void)do_intthrow(cstack); - } -#endif - /* * 3. Skip over the range to find the command. Let "p" point to after it. * @@ -1799,6 +1777,51 @@ do_one_cmd( ea.cmd = skipwhite(ea.cmd + 1); p = find_command(&ea, NULL); +#ifdef FEAT_EVAL +# ifdef FEAT_PROFILE + // Count this line for profiling if skip is TRUE. + if (do_profiling == PROF_YES + && (!ea.skip || cstack->cs_idx == 0 || (cstack->cs_idx > 0 + && (cstack->cs_flags[cstack->cs_idx - 1] & CSF_ACTIVE)))) + { + int skip = did_emsg || got_int || did_throw; + + if (ea.cmdidx == CMD_catch) + skip = !skip && !(cstack->cs_idx >= 0 + && (cstack->cs_flags[cstack->cs_idx] & CSF_THROWN) + && !(cstack->cs_flags[cstack->cs_idx] & CSF_CAUGHT)); + else if (ea.cmdidx == CMD_else || ea.cmdidx == CMD_elseif) + skip = skip || !(cstack->cs_idx >= 0 + && !(cstack->cs_flags[cstack->cs_idx] + & (CSF_ACTIVE | CSF_TRUE))); + else if (ea.cmdidx == CMD_finally) + skip = FALSE; + else if (ea.cmdidx != CMD_endif + && ea.cmdidx != CMD_endfor + && ea.cmdidx != CMD_endtry + && ea.cmdidx != CMD_endwhile) + skip = ea.skip; + + if (!skip) + { + if (getline_equal(fgetline, cookie, get_func_line)) + func_line_exec(getline_cookie(fgetline, cookie)); + else if (getline_equal(fgetline, cookie, getsourceline)) + script_line_exec(); + } + } +# endif + + /* May go to debug mode. If this happens and the ">quit" debug command is + * used, throw an interrupt exception and skip the next command. */ + dbg_check_breakpoint(&ea); + if (!ea.skip && got_int) + { + ea.skip = TRUE; + (void)do_intthrow(cstack); + } +#endif + /* * 4. parse a range specifier of the form: addr [,addr] [;addr] .. *