annotate src/testdir/test_profile.vim @ 27457:4c16acb2525f v8.2.4257

patch 8.2.4257: Vim9: finding global function without g: prefix inconsistent Commit: https://github.com/vim/vim/commit/62aec93bfdb9e1b40d03a6d2e8e9511f8b1bdb2d Author: Bram Moolenaar <Bram@vim.org> Date: Sat Jan 29 21:45:34 2022 +0000 patch 8.2.4257: Vim9: finding global function without g: prefix inconsistent Problem: Vim9: finding global function without g: prefix but not finding global variable is inconsistent. Solution: Require using g: for a global function. Change the vim9.vim script into a Vim9 script with exports. Fix that import in legacy script does not work.
author Bram Moolenaar <Bram@vim.org>
date Sat, 29 Jan 2022 23:00:05 +0100
parents 24887299c5ff
children 554f493902ea
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1 " Test Vim profiler
17049
f38fcbf343ce patch 8.1.1524: tests are silently skipped
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2
17089
8e9e9124c7a2 patch 8.1.1544: some balloon tests don't run when they can
Bram Moolenaar <Bram@vim.org>
parents: 17049
diff changeset
3 source check.vim
8e9e9124c7a2 patch 8.1.1544: some balloon tests don't run when they can
Bram Moolenaar <Bram@vim.org>
parents: 17049
diff changeset
4 CheckFeature profile
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
5
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
6 source shared.vim
17899
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
7 source screendump.vim
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
8
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
9 func Test_profile_func()
23717
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
10 call RunProfileFunc('func', 'let', 'let')
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
11 call RunProfileFunc('def', 'var', '')
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
12 endfunc
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
13
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
14 func RunProfileFunc(command, declare, assign)
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
15 let lines =<< trim [CODE]
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
16 profile start Xprofile_func.log
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
17 profile func Foo*
23717
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
18 XXX Foo1()
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
19 endXXX
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
20 XXX Foo2()
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
21 DDD counter = 100
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
22 while counter > 0
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
23 AAA counter = counter - 1
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
24 endwhile
19683
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
25 sleep 1m
23717
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
26 endXXX
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
27 XXX Foo3()
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
28 endXXX
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
29 XXX Bar()
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
30 endXXX
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
31 call Foo1()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
32 call Foo1()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
33 profile pause
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
34 call Foo1()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
35 profile continue
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
36 call Foo2()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
37 call Foo3()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
38 call Bar()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
39 if !v:profiling
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
40 delfunc Foo2
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
41 endif
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
42 delfunc Foo3
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
43 [CODE]
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
44
23717
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
45 call map(lines, {k, v -> substitute(v, 'XXX', a:command, '') })
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
46 call map(lines, {k, v -> substitute(v, 'DDD', a:declare, '') })
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
47 call map(lines, {k, v -> substitute(v, 'AAA', a:assign, '') })
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
48
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
49 call writefile(lines, 'Xprofile_func.vim')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
50 call system(GetVimCommand()
14228
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
51 \ . ' -es --clean'
10613
196757b230a2 patch 8.0.0196: profile test is slo and does not work on MS-Windows
Christian Brabandt <cb@256bit.org>
parents: 10609
diff changeset
52 \ . ' -c "so Xprofile_func.vim"'
196757b230a2 patch 8.0.0196: profile test is slo and does not work on MS-Windows
Christian Brabandt <cb@256bit.org>
parents: 10609
diff changeset
53 \ . ' -c "qall!"')
196757b230a2 patch 8.0.0196: profile test is slo and does not work on MS-Windows
Christian Brabandt <cb@256bit.org>
parents: 10609
diff changeset
54 call assert_equal(0, v:shell_error)
196757b230a2 patch 8.0.0196: profile test is slo and does not work on MS-Windows
Christian Brabandt <cb@256bit.org>
parents: 10609
diff changeset
55
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
56 let lines = readfile('Xprofile_func.log')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
57
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
58 " - Foo1() is called 3 times but should be reported as called twice
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
59 " since one call is in between "profile pause" .. "profile continue".
10613
196757b230a2 patch 8.0.0196: profile test is slo and does not work on MS-Windows
Christian Brabandt <cb@256bit.org>
parents: 10609
diff changeset
60 " - Foo2() should come before Foo1() since Foo1() does much more work.
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
61 " - Foo3() is not reported because function is deleted.
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
62 " - Unlike Foo3(), Foo2() should not be deleted since there is a check
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
63 " for v:profiling.
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
64 " - Bar() is not reported since it does not match "profile func Foo*".
19683
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
65 call assert_equal(31, len(lines))
10613
196757b230a2 patch 8.0.0196: profile test is slo and does not work on MS-Windows
Christian Brabandt <cb@256bit.org>
parents: 10609
diff changeset
66
196757b230a2 patch 8.0.0196: profile test is slo and does not work on MS-Windows
Christian Brabandt <cb@256bit.org>
parents: 10609
diff changeset
67 call assert_equal('FUNCTION Foo1()', lines[0])
18120
ed222e264905 patch 8.1.2055: not easy to jump to function line from profile
Bram Moolenaar <Bram@vim.org>
parents: 17899
diff changeset
68 call assert_match('Defined:.*Xprofile_func.vim:3', lines[1])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
69 call assert_equal('Called 2 times', lines[2])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
70 call assert_match('^Total time:\s\+\d\+\.\d\+$', lines[3])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
71 call assert_match('^ Self time:\s\+\d\+\.\d\+$', lines[4])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
72 call assert_equal('', lines[5])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
73 call assert_equal('count total (s) self (s)', lines[6])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
74 call assert_equal('', lines[7])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
75 call assert_equal('FUNCTION Foo2()', lines[8])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
76 call assert_equal('Called 1 time', lines[10])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
77 call assert_match('^Total time:\s\+\d\+\.\d\+$', lines[11])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
78 call assert_match('^ Self time:\s\+\d\+\.\d\+$', lines[12])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
79 call assert_equal('', lines[13])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
80 call assert_equal('count total (s) self (s)', lines[14])
23717
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
81 call assert_match('^\s*1\s\+.*\s\(let\|var\) counter = 100$', lines[15])
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
82 call assert_match('^\s*101\s\+.*\swhile counter > 0$', lines[16])
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
83 call assert_match('^\s*100\s\+.*\s \(let\)\= counter = counter - 1$', lines[17])
e3720756acdc patch 8.2.2400: Vim9: compiled functions are not profiled
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
84 call assert_match('^\s*10[01]\s\+.*\sendwhile$', lines[18])
19683
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
85 call assert_match('^\s*1\s\+.\+sleep 1m$', lines[19])
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
86 call assert_equal('', lines[20])
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
87 call assert_equal('FUNCTIONS SORTED ON TOTAL TIME', lines[21])
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
88 call assert_equal('count total (s) self (s) function', lines[22])
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
89 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo2()$', lines[23])
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
90 call assert_match('^\s*2\s\+\d\+\.\d\+\s\+Foo1()$', lines[24])
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
91 call assert_equal('', lines[25])
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
92 call assert_equal('FUNCTIONS SORTED ON SELF TIME', lines[26])
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
93 call assert_equal('count total (s) self (s) function', lines[27])
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
94 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo2()$', lines[28])
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
95 call assert_match('^\s*2\s\+\d\+\.\d\+\s\+Foo1()$', lines[29])
dd028abdde0f patch 8.2.0398: profile test fails when two functions take same time
Bram Moolenaar <Bram@vim.org>
parents: 18120
diff changeset
96 call assert_equal('', lines[30])
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
97
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
98 call delete('Xprofile_func.vim')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
99 call delete('Xprofile_func.log')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
100 endfunc
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
101
14591
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
102 func Test_profile_func_with_ifelse()
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
103 call Run_profile_func_with_ifelse('func', 'let')
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
104 call Run_profile_func_with_ifelse('def', 'var')
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
105 endfunc
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
106
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
107 func Run_profile_func_with_ifelse(command, declare)
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
108 let lines =<< trim [CODE]
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
109 XXX Foo1()
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
110 if 1
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
111 DDD x = 0
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
112 elseif 1
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
113 DDD x = 1
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
114 else
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
115 DDD x = 2
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
116 endif
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
117 endXXX
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
118 XXX Foo2()
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
119 if 0
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
120 DDD x = 0
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
121 elseif 1
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
122 DDD x = 1
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
123 else
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
124 DDD x = 2
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
125 endif
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
126 endXXX
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
127 XXX Foo3()
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
128 if 0
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
129 DDD x = 0
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
130 elseif 0
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
131 DDD x = 1
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
132 else
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
133 DDD x = 2
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
134 endif
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
135 endXXX
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
136 call Foo1()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
137 call Foo2()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
138 call Foo3()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
139 [CODE]
14591
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
140
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
141 call map(lines, {k, v -> substitute(v, 'XXX', a:command, '') })
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
142 call map(lines, {k, v -> substitute(v, 'DDD', a:declare, '') })
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
143
14591
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
144 call writefile(lines, 'Xprofile_func.vim')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
145 call system(GetVimCommand()
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
146 \ . ' -es -i NONE --noplugin'
14591
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
147 \ . ' -c "profile start Xprofile_func.log"'
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
148 \ . ' -c "profile func Foo*"'
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
149 \ . ' -c "so Xprofile_func.vim"'
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
150 \ . ' -c "qall!"')
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
151 call assert_equal(0, v:shell_error)
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
152
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
153 let lines = readfile('Xprofile_func.log')
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
154
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
155 " - Foo1() should pass 'if' block.
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
156 " - Foo2() should pass 'elseif' block.
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
157 " - Foo3() should pass 'else' block.
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
158 call assert_equal(57, len(lines))
14591
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
159
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
160 call assert_equal('FUNCTION Foo1()', lines[0])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
161 call assert_match('Defined:.*Xprofile_func.vim', lines[1])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
162 call assert_equal('Called 1 time', lines[2])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
163 call assert_match('^Total time:\s\+\d\+\.\d\+$', lines[3])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
164 call assert_match('^ Self time:\s\+\d\+\.\d\+$', lines[4])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
165 call assert_equal('', lines[5])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
166 call assert_equal('count total (s) self (s)', lines[6])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
167 call assert_match('^\s*1\s\+.*\sif 1$', lines[7])
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
168 call assert_match('^\s*1\s\+.*\s \(let\|var\) x = 0$', lines[8])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
169 call assert_match( '^\s\+elseif 1$', lines[9])
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
170 call assert_match( '^\s\+\(let\|var\) x = 1$', lines[10])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
171 call assert_match( '^\s\+else$', lines[11])
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
172 call assert_match( '^\s\+\(let\|var\) x = 2$', lines[12])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
173 call assert_match('^\s*1\s\+.*\sendif$', lines[13])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
174 call assert_equal('', lines[14])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
175 call assert_equal('FUNCTION Foo2()', lines[15])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
176 call assert_equal('Called 1 time', lines[17])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
177 call assert_match('^Total time:\s\+\d\+\.\d\+$', lines[18])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
178 call assert_match('^ Self time:\s\+\d\+\.\d\+$', lines[19])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
179 call assert_equal('', lines[20])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
180 call assert_equal('count total (s) self (s)', lines[21])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
181 call assert_match('^\s*1\s\+.*\sif 0$', lines[22])
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
182 call assert_match( '^\s\+\(let\|var\) x = 0$', lines[23])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
183 call assert_match('^\s*1\s\+.*\selseif 1$', lines[24])
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
184 call assert_match('^\s*1\s\+.*\s \(let\|var\) x = 1$', lines[25])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
185 call assert_match( '^\s\+else$', lines[26])
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
186 call assert_match( '^\s\+\(let\|var\) x = 2$', lines[27])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
187 call assert_match('^\s*1\s\+.*\sendif$', lines[28])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
188 call assert_equal('', lines[29])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
189 call assert_equal('FUNCTION Foo3()', lines[30])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
190 call assert_equal('Called 1 time', lines[32])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
191 call assert_match('^Total time:\s\+\d\+\.\d\+$', lines[33])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
192 call assert_match('^ Self time:\s\+\d\+\.\d\+$', lines[34])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
193 call assert_equal('', lines[35])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
194 call assert_equal('count total (s) self (s)', lines[36])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
195 call assert_match('^\s*1\s\+.*\sif 0$', lines[37])
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
196 call assert_match( '^\s\+\(let\|var\) x = 0$', lines[38])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
197 call assert_match('^\s*1\s\+.*\selseif 0$', lines[39])
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
198 call assert_match( '^\s\+\(let\|var\) x = 1$', lines[40])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
199 call assert_match('^\s*1\s\+.*\selse$', lines[41])
23723
14e92f4c98c9 patch 8.2.2403: Vim9: profiling if/elseif/endif not correct
Bram Moolenaar <Bram@vim.org>
parents: 23717
diff changeset
200 call assert_match('^\s*1\s\+.*\s \(let\|var\) x = 2$', lines[42])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
201 call assert_match('^\s*1\s\+.*\sendif$', lines[43])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
202 call assert_equal('', lines[44])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
203 call assert_equal('FUNCTIONS SORTED ON TOTAL TIME', lines[45])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
204 call assert_equal('count total (s) self (s) function', lines[46])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
205 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo.()$', lines[47])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
206 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo.()$', lines[48])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
207 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo.()$', lines[49])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
208 call assert_equal('', lines[50])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
209 call assert_equal('FUNCTIONS SORTED ON SELF TIME', lines[51])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
210 call assert_equal('count total (s) self (s) function', lines[52])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
211 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo.()$', lines[53])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
212 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo.()$', lines[54])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
213 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo.()$', lines[55])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
214 call assert_equal('', lines[56])
14591
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
215
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
216 call delete('Xprofile_func.vim')
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
217 call delete('Xprofile_func.log')
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
218 endfunc
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
219
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
220 func Test_profile_func_with_trycatch()
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
221 call Run_profile_func_with_trycatch('func', 'let')
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
222 call Run_profile_func_with_trycatch('def', 'var')
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
223 endfunc
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
224
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
225 func Run_profile_func_with_trycatch(command, declare)
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
226 let lines =<< trim [CODE]
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
227 XXX Foo1()
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
228 try
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
229 DDD x = 0
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
230 catch
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
231 DDD x = 1
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
232 finally
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
233 DDD x = 2
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
234 endtry
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
235 endXXX
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
236 XXX Foo2()
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
237 try
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
238 throw 0
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
239 catch
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
240 DDD x = 1
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
241 finally
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
242 DDD x = 2
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
243 endtry
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
244 endXXX
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
245 XXX Foo3()
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
246 try
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
247 throw 0
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
248 catch
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
249 throw 1
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
250 finally
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
251 DDD x = 2
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
252 endtry
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
253 endXXX
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
254 call Foo1()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
255 call Foo2()
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
256 let rethrown = 0
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
257 try
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
258 call Foo3()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
259 catch
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
260 let rethrown = 1
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
261 endtry
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
262 if rethrown != 1
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
263 " call Foo1 again so that the test fails
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
264 call Foo1()
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
265 endif
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
266 [CODE]
14591
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
267
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
268 call map(lines, {k, v -> substitute(v, 'XXX', a:command, '') })
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
269 call map(lines, {k, v -> substitute(v, 'DDD', a:declare, '') })
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
270
14591
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
271 call writefile(lines, 'Xprofile_func.vim')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
272 call system(GetVimCommand()
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
273 \ . ' -es -i NONE --noplugin'
14591
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
274 \ . ' -c "profile start Xprofile_func.log"'
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
275 \ . ' -c "profile func Foo*"'
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
276 \ . ' -c "so Xprofile_func.vim"'
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
277 \ . ' -c "qall!"')
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
278 call assert_equal(0, v:shell_error)
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
279
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
280 let lines = readfile('Xprofile_func.log')
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
281
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
282 " - Foo1() should pass 'try' 'finally' blocks.
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
283 " - Foo2() should pass 'catch' 'finally' blocks.
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
284 " - Foo3() should not pass 'endtry'.
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
285 call assert_equal(57, len(lines))
14591
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
286
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
287 call assert_equal('FUNCTION Foo1()', lines[0])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
288 call assert_match('Defined:.*Xprofile_func.vim', lines[1])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
289 call assert_equal('Called 1 time', lines[2])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
290 call assert_match('^Total time:\s\+\d\+\.\d\+$', lines[3])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
291 call assert_match('^ Self time:\s\+\d\+\.\d\+$', lines[4])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
292 call assert_equal('', lines[5])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
293 call assert_equal('count total (s) self (s)', lines[6])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
294 call assert_match('^\s*1\s\+.*\stry$', lines[7])
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
295 call assert_match('^\s*1\s\+.*\s \(let\|var\) x = 0$', lines[8])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
296 call assert_match( '^\s\+catch$', lines[9])
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
297 call assert_match( '^\s\+\(let\|var\) x = 1$', lines[10])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
298 call assert_match('^\s*1\s\+.*\sfinally$', lines[11])
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
299 call assert_match('^\s*1\s\+.*\s \(let\|var\) x = 2$', lines[12])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
300 call assert_match('^\s*1\s\+.*\sendtry$', lines[13])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
301 call assert_equal('', lines[14])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
302 call assert_equal('FUNCTION Foo2()', lines[15])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
303 call assert_equal('Called 1 time', lines[17])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
304 call assert_match('^Total time:\s\+\d\+\.\d\+$', lines[18])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
305 call assert_match('^ Self time:\s\+\d\+\.\d\+$', lines[19])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
306 call assert_equal('', lines[20])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
307 call assert_equal('count total (s) self (s)', lines[21])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
308 call assert_match('^\s*1\s\+.*\stry$', lines[22])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
309 call assert_match('^\s*1\s\+.*\s throw 0$', lines[23])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
310 call assert_match('^\s*1\s\+.*\scatch$', lines[24])
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
311 call assert_match('^\s*1\s\+.*\s \(let\|var\) x = 1$', lines[25])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
312 call assert_match('^\s*1\s\+.*\sfinally$', lines[26])
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
313 call assert_match('^\s*1\s\+.*\s \(let\|var\) x = 2$', lines[27])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
314 call assert_match('^\s*1\s\+.*\sendtry$', lines[28])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
315 call assert_equal('', lines[29])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
316 call assert_equal('FUNCTION Foo3()', lines[30])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
317 call assert_equal('Called 1 time', lines[32])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
318 call assert_match('^Total time:\s\+\d\+\.\d\+$', lines[33])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
319 call assert_match('^ Self time:\s\+\d\+\.\d\+$', lines[34])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
320 call assert_equal('', lines[35])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
321 call assert_equal('count total (s) self (s)', lines[36])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
322 call assert_match('^\s*1\s\+.*\stry$', lines[37])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
323 call assert_match('^\s*1\s\+.*\s throw 0$', lines[38])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
324 call assert_match('^\s*1\s\+.*\scatch$', lines[39])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
325 call assert_match('^\s*1\s\+.*\s throw 1$', lines[40])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
326 call assert_match('^\s*1\s\+.*\sfinally$', lines[41])
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
327 call assert_match('^\s*1\s\+.*\s \(let\|var\) x = 2$', lines[42])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
328 call assert_match( '^\s\+endtry$', lines[43])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
329 call assert_equal('', lines[44])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
330 call assert_equal('FUNCTIONS SORTED ON TOTAL TIME', lines[45])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
331 call assert_equal('count total (s) self (s) function', lines[46])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
332 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo.()$', lines[47])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
333 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo.()$', lines[48])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
334 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo.()$', lines[49])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
335 call assert_equal('', lines[50])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
336 call assert_equal('FUNCTIONS SORTED ON SELF TIME', lines[51])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
337 call assert_equal('count total (s) self (s) function', lines[52])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
338 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo.()$', lines[53])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
339 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo.()$', lines[54])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
340 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Foo.()$', lines[55])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
341 call assert_equal('', lines[56])
14591
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
342
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
343 call delete('Xprofile_func.vim')
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
344 call delete('Xprofile_func.log')
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
345 endfunc
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
346
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
347 func Test_profile_file()
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
348 let lines =<< trim [CODE]
17172
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 17089
diff changeset
349 func! Foo()
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 17089
diff changeset
350 endfunc
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 17089
diff changeset
351 for i in range(10)
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 17089
diff changeset
352 " a comment
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 17089
diff changeset
353 call Foo()
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 17089
diff changeset
354 endfor
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
355 call Foo()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
356 [CODE]
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
357
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
358 call writefile(lines, 'Xprofile_file.vim')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
359 call system(GetVimCommandClean()
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
360 \ . ' -es'
10613
196757b230a2 patch 8.0.0196: profile test is slo and does not work on MS-Windows
Christian Brabandt <cb@256bit.org>
parents: 10609
diff changeset
361 \ . ' -c "profile start Xprofile_file.log"'
196757b230a2 patch 8.0.0196: profile test is slo and does not work on MS-Windows
Christian Brabandt <cb@256bit.org>
parents: 10609
diff changeset
362 \ . ' -c "profile file Xprofile_file.vim"'
196757b230a2 patch 8.0.0196: profile test is slo and does not work on MS-Windows
Christian Brabandt <cb@256bit.org>
parents: 10609
diff changeset
363 \ . ' -c "so Xprofile_file.vim"'
196757b230a2 patch 8.0.0196: profile test is slo and does not work on MS-Windows
Christian Brabandt <cb@256bit.org>
parents: 10609
diff changeset
364 \ . ' -c "so Xprofile_file.vim"'
196757b230a2 patch 8.0.0196: profile test is slo and does not work on MS-Windows
Christian Brabandt <cb@256bit.org>
parents: 10609
diff changeset
365 \ . ' -c "qall!"')
196757b230a2 patch 8.0.0196: profile test is slo and does not work on MS-Windows
Christian Brabandt <cb@256bit.org>
parents: 10609
diff changeset
366 call assert_equal(0, v:shell_error)
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
367
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
368 let lines = readfile('Xprofile_file.log')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
369
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
370 call assert_equal(14, len(lines))
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
371
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
372 call assert_match('^SCRIPT .*Xprofile_file.vim$', lines[0])
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
373 call assert_equal('Sourced 2 times', lines[1])
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
374 call assert_match('^Total time:\s\+\d\+\.\d\+$', lines[2])
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
375 call assert_match('^ Self time:\s\+\d\+\.\d\+$', lines[3])
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
376 call assert_equal('', lines[4])
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
377 call assert_equal('count total (s) self (s)', lines[5])
12658
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
378 call assert_match(' 2 0.\d\+ func! Foo()', lines[6])
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
379 call assert_equal(' endfunc', lines[7])
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
380 " Loop iterates 10 times. Since script runs twice, body executes 20 times.
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
381 " First line of loop executes one more time than body to detect end of loop.
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
382 call assert_match('^\s*22\s\+\d\+\.\d\+\s\+for i in range(10)$', lines[8])
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
383 call assert_equal(' " a comment', lines[9])
12128
2f4eb2e10766 patch 8.0.0944: test_profile is a little bit flaky
Christian Brabandt <cb@256bit.org>
parents: 10613
diff changeset
384 " if self and total are equal we only get one number
2f4eb2e10766 patch 8.0.0944: test_profile is a little bit flaky
Christian Brabandt <cb@256bit.org>
parents: 10613
diff changeset
385 call assert_match('^\s*20\s\+\(\d\+\.\d\+\s\+\)\=\d\+\.\d\+\s\+call Foo()$', lines[10])
14591
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
386 call assert_match('^\s*22\s\+\d\+\.\d\+\s\+endfor$', lines[11])
10609
302aedeed8c9 patch 8.0.0194: profile tests fails if total and self time are equal
Christian Brabandt <cb@256bit.org>
parents: 10599
diff changeset
387 " if self and total are equal we only get one number
302aedeed8c9 patch 8.0.0194: profile tests fails if total and self time are equal
Christian Brabandt <cb@256bit.org>
parents: 10599
diff changeset
388 call assert_match('^\s*2\s\+\(\d\+\.\d\+\s\+\)\=\d\+\.\d\+\s\+call Foo()$', lines[12])
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
389 call assert_equal('', lines[13])
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
390
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
391 call delete('Xprofile_file.vim')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
392 call delete('Xprofile_file.log')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
393 endfunc
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
394
12658
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
395 func Test_profile_file_with_cont()
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
396 let lines = [
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
397 \ 'echo "hello',
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
398 \ ' \ world"',
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
399 \ 'echo "foo ',
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
400 \ ' \bar"',
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
401 \ ]
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
402
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
403 call writefile(lines, 'Xprofile_file.vim')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
404 call system(GetVimCommandClean()
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
405 \ . ' -es'
12658
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
406 \ . ' -c "profile start Xprofile_file.log"'
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
407 \ . ' -c "profile file Xprofile_file.vim"'
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
408 \ . ' -c "so Xprofile_file.vim"'
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
409 \ . ' -c "qall!"')
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
410 call assert_equal(0, v:shell_error)
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
411
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
412 let lines = readfile('Xprofile_file.log')
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
413 call assert_equal(11, len(lines))
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
414
14228
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
415 call assert_match('^SCRIPT .*Xprofile_file.vim$', lines[0])
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
416 call assert_equal('Sourced 1 time', lines[1])
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
417 call assert_match('^Total time:\s\+\d\+\.\d\+$', lines[2])
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
418 call assert_match('^ Self time:\s\+\d\+\.\d\+$', lines[3])
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
419 call assert_equal('', lines[4])
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
420 call assert_equal('count total (s) self (s)', lines[5])
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
421 call assert_match(' 1 0.\d\+ echo "hello', lines[6])
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
422 call assert_equal(' \ world"', lines[7])
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
423 call assert_match(' 1 0.\d\+ echo "foo ', lines[8])
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
424 call assert_equal(' \bar"', lines[9])
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
425 call assert_equal('', lines[10])
12658
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
426
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
427 call delete('Xprofile_file.vim')
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
428 call delete('Xprofile_file.log')
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
429 endfunc
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
430
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
431 func Test_profile_completion()
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
432 call feedkeys(":profile \<C-A>\<C-B>\"\<CR>", 'tx')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
433 call assert_equal('"profile continue file func pause start', @:)
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
434
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
435 call feedkeys(":profile start test_prof\<C-A>\<C-B>\"\<CR>", 'tx')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
436 call assert_match('^"profile start.* test_profile\.vim', @:)
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
437 endfunc
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
438
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
439 func Test_profile_errors()
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
440 call assert_fails("profile func Foo", 'E750:')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
441 call assert_fails("profile pause", 'E750:')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
442 call assert_fails("profile continue", 'E750:')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
443 endfunc
12992
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
444
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
445 func Test_profile_truncate_mbyte()
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 14706
diff changeset
446 if &enc !=# 'utf-8'
12992
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
447 return
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
448 endif
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
449
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
450 let lines = [
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
451 \ 'scriptencoding utf-8',
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
452 \ 'func! Foo()',
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
453 \ ' return [',
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
454 \ ' \ "' . join(map(range(0x4E00, 0x4E00 + 340), 'nr2char(v:val)'), '') . '",',
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
455 \ ' \ "' . join(map(range(0x4F00, 0x4F00 + 340), 'nr2char(v:val)'), '') . '",',
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
456 \ ' \ ]',
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
457 \ 'endfunc',
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
458 \ 'call Foo()',
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
459 \ ]
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
460
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
461 call writefile(lines, 'Xprofile_file.vim')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
462 call system(GetVimCommandClean()
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
463 \ . ' -es --cmd "set enc=utf-8"'
12992
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
464 \ . ' -c "profile start Xprofile_file.log"'
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
465 \ . ' -c "profile file Xprofile_file.vim"'
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
466 \ . ' -c "so Xprofile_file.vim"'
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
467 \ . ' -c "qall!"')
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
468 call assert_equal(0, v:shell_error)
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
469
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
470 split Xprofile_file.log
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
471 if &fenc != ''
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
472 call assert_equal('utf-8', &fenc)
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
473 endif
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
474 /func! Foo()
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
475 let lnum = line('.')
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
476 call assert_match('^\s*return \[$', getline(lnum + 1))
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
477 call assert_match("\u4F52$", getline(lnum + 2))
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
478 call assert_match("\u5052$", getline(lnum + 3))
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
479 call assert_match('^\s*\\ \]$', getline(lnum + 4))
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
480 bwipe!
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
481
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
482 call delete('Xprofile_file.vim')
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
483 call delete('Xprofile_file.log')
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
484 endfunc
14228
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
485
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
486 func Test_profdel_func()
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
487 let lines =<< trim [CODE]
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
488 profile start Xprofile_file.log
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
489 func! Foo1()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
490 endfunc
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
491 func! Foo2()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
492 endfunc
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
493 func! Foo3()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
494 endfunc
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
495
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
496 profile func Foo1
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
497 profile func Foo2
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
498 call Foo1()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
499 call Foo2()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
500
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
501 profile func Foo3
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
502 profdel func Foo2
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
503 profdel func Foo3
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
504 call Foo1()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
505 call Foo2()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
506 call Foo3()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
507 [CODE]
14228
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
508 call writefile(lines, 'Xprofile_file.vim')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
509 call system(GetVimCommandClean() . ' -es -c "so Xprofile_file.vim" -c q')
14228
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
510 call assert_equal(0, v:shell_error)
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
511
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
512 let lines = readfile('Xprofile_file.log')
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
513 call assert_equal(26, len(lines))
14228
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
514
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
515 " Check that:
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
516 " - Foo1() is called twice (profdel not invoked)
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
517 " - Foo2() is called once (profdel invoked after it was called)
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
518 " - Foo3() is not called (profdel invoked before it was called)
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
519 call assert_equal('FUNCTION Foo1()', lines[0])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
520 call assert_match('Defined:.*Xprofile_file.vim', lines[1])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
521 call assert_equal('Called 2 times', lines[2])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
522 call assert_equal('FUNCTION Foo2()', lines[8])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
523 call assert_equal('Called 1 time', lines[10])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
524 call assert_equal('FUNCTIONS SORTED ON TOTAL TIME', lines[16])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
525 call assert_equal('FUNCTIONS SORTED ON SELF TIME', lines[21])
14228
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
526
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
527 call delete('Xprofile_file.vim')
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
528 call delete('Xprofile_file.log')
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
529 endfunc
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
530
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
531 func Test_profdel_star()
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
532 " Foo() is invoked once before and once after 'profdel *'.
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
533 " So profiling should report it only once.
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
534 let lines =<< trim [CODE]
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
535 profile start Xprofile_file.log
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
536 func! Foo()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
537 endfunc
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
538 profile func Foo
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
539 call Foo()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
540 profdel *
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
541 call Foo()
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
542 [CODE]
14228
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
543 call writefile(lines, 'Xprofile_file.vim')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
544 call system(GetVimCommandClean() . ' -es -c "so Xprofile_file.vim" -c q')
14228
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
545 call assert_equal(0, v:shell_error)
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
546
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
547 let lines = readfile('Xprofile_file.log')
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
548 call assert_equal(16, len(lines))
14228
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
549
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
550 call assert_equal('FUNCTION Foo()', lines[0])
14706
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
551 call assert_match('Defined:.*Xprofile_file.vim', lines[1])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
552 call assert_equal('Called 1 time', lines[2])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
553 call assert_equal('FUNCTIONS SORTED ON TOTAL TIME', lines[8])
2c0f454fcdc9 patch 8.1.0365: function profile doesn't specify where it was defined
Christian Brabandt <cb@256bit.org>
parents: 14591
diff changeset
554 call assert_equal('FUNCTIONS SORTED ON SELF TIME', lines[12])
14228
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
555
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
556 call delete('Xprofile_file.vim')
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
557 call delete('Xprofile_file.log')
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
558 endfunc
17899
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
559
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
560 " When typing the function it won't have a script ID, test that this works.
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
561 func Test_profile_typed_func()
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
562 CheckScreendump
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
563
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
564 let lines =<< trim END
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
565 profile start XprofileTypedFunc
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
566 END
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
567 call writefile(lines, 'XtestProfile')
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
568 let buf = RunVimInTerminal('-S XtestProfile', #{})
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
569
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
570 call term_sendkeys(buf, ":func DoSomething()\<CR>"
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
571 \ .. "echo 'hello'\<CR>"
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
572 \ .. "endfunc\<CR>")
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
573 call term_sendkeys(buf, ":profile func DoSomething\<CR>")
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
574 call term_sendkeys(buf, ":call DoSomething()\<CR>")
19954
c087099e9163 patch 8.2.0533: tests using term_wait() can still be flaky
Bram Moolenaar <Bram@vim.org>
parents: 19683
diff changeset
575 call TermWait(buf, 100)
17899
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
576 call StopVimInTerminal(buf)
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
577 let lines = readfile('XprofileTypedFunc')
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
578 call assert_equal("FUNCTION DoSomething()", lines[0])
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
579 call assert_equal("Called 1 time", lines[1])
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
580
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
581 " clean up
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
582 call delete('XprofileTypedFunc')
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
583 call delete('XtestProfile')
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
584 endfunc
21765
08940efa6b4e patch 8.2.1432: various inconsistencies in test files
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
585
23735
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
586 func Test_vim9_profiling()
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
587 " only tests that compiling and calling functions doesn't crash
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
588 let lines =<< trim END
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
589 vim9script
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
590 def Func()
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
591 Crash()
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
592 enddef
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
593 def Crash()
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
594 enddef
23740
9b55c60f9d52 patch 8.2.2411: profile test fails on MS-Windows
Bram Moolenaar <Bram@vim.org>
parents: 23735
diff changeset
595 prof start Xprofile_crash.log
23735
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
596 prof func Func
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
597 Func()
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
598 END
23740
9b55c60f9d52 patch 8.2.2411: profile test fails on MS-Windows
Bram Moolenaar <Bram@vim.org>
parents: 23735
diff changeset
599 call writefile(lines, 'Xprofile_crash.vim')
9b55c60f9d52 patch 8.2.2411: profile test fails on MS-Windows
Bram Moolenaar <Bram@vim.org>
parents: 23735
diff changeset
600 call system(GetVimCommandClean() . ' -es -c "so Xprofile_crash.vim" -c q')
9b55c60f9d52 patch 8.2.2411: profile test fails on MS-Windows
Bram Moolenaar <Bram@vim.org>
parents: 23735
diff changeset
601 call assert_equal(0, v:shell_error)
24059
24887299c5ff patch 8.2.2571: test may leave file behind
Bram Moolenaar <Bram@vim.org>
parents: 24043
diff changeset
602 call assert_true(readfile('Xprofile_crash.log')->len() > 10)
23740
9b55c60f9d52 patch 8.2.2411: profile test fails on MS-Windows
Bram Moolenaar <Bram@vim.org>
parents: 23735
diff changeset
603 call delete('Xprofile_crash.vim')
9b55c60f9d52 patch 8.2.2411: profile test fails on MS-Windows
Bram Moolenaar <Bram@vim.org>
parents: 23735
diff changeset
604 call delete('Xprofile_crash.log')
23735
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
605 endfunc
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
606
23976
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
607 func Test_vim9_nested_call()
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
608 let lines =<< trim END
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
609 vim9script
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
610 var total = 0
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
611 def One(Ref: func(number))
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
612 for i in range(3)
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
613 Ref(i)
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
614 endfor
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
615 enddef
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
616 def Two(nr: number)
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
617 total += nr
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
618 enddef
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
619 prof start Xprofile_nested.log
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
620 prof func One
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
621 prof func Two
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
622 One((nr) => Two(nr))
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
623 assert_equal(3, total)
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
624 END
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
625 call writefile(lines, 'Xprofile_nested.vim')
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
626 call system(GetVimCommandClean() . ' -es -c "so Xprofile_nested.vim" -c q')
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
627 call assert_equal(0, v:shell_error)
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
628
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
629 let prof_lines = readfile('Xprofile_nested.log')->join('#')
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
630 call assert_match('FUNCTION <SNR>\d\+_One().*'
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
631 \ .. '#Called 1 time.*'
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
632 \ .. '# 1 \s*[0-9.]\+ for i in range(3)'
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
633 \ .. '# 3 \s*[0-9.]\+ \s*[0-9.]\+ Ref(i)'
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
634 \ .. '# 3 \s*[0-9.]\+ endfor', prof_lines)
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
635 call assert_match('FUNCTION <SNR>\d\+_Two().*'
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
636 \ .. '#Called 3 times.*'
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
637 \ .. '# 3 \s*[0-9.]\+ total += nr', prof_lines)
24043
15408ab5fed7 patch 8.2.2563: cannot use multibyte characters for folding in 'fillchars'
Bram Moolenaar <Bram@vim.org>
parents: 23976
diff changeset
638 call delete('Xprofile_nested.vim')
15408ab5fed7 patch 8.2.2563: cannot use multibyte characters for folding in 'fillchars'
Bram Moolenaar <Bram@vim.org>
parents: 23976
diff changeset
639 call delete('Xprofile_nested.log')
23976
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
640 endfunc
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
641
23735
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
642
21765
08940efa6b4e patch 8.2.1432: various inconsistencies in test files
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
643 " vim: shiftwidth=2 sts=2 expandtab