annotate src/testdir/test_profile.vim @ 31437:ede2bd5f3426 v9.0.1051

patch 9.0.1051: after a failed CTRL-W ] next command splits window Commit: https://github.com/vim/vim/commit/cb94c910706fdd575cc25797d7858e084f1e3524 Author: Rob Pilling <robpilling@gmail.com> Date: Tue Dec 13 12:26:09 2022 +0000 patch 9.0.1051: after a failed CTRL-W ] next command splits window Problem: After a failed CTRL-W ] next command splits window. Solution: Reset postponed_split. (Rob Pilling, closes https://github.com/vim/vim/issues/11698)
author Bram Moolenaar <Bram@vim.org>
date Tue, 13 Dec 2022 13:30:04 +0100
parents 457ea0570b6f
children c8612da7564c
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
30592
457ea0570b6f patch 9.0.0631: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 30158
diff changeset
49 call writefile(lines, 'Xprofile_func.vim', 'D')
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
30158
008808e60963 patch 9.0.0415: on MS-Windows some tests are flaky
Bram Moolenaar <Bram@vim.org>
parents: 28373
diff changeset
56 sleep 50m
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
57 let lines = readfile('Xprofile_func.log')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
58
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
59 " - 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
60 " 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
61 " - 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
62 " - 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
63 " - 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
64 " for v:profiling.
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
65 " - 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
66 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
67
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
68 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
69 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
70 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
71 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
72 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
73 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
74 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
75 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
76 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
77 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
78 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
79 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
80 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
81 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
82 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
83 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
84 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
85 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
86 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
87 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
88 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
89 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
90 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
91 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
92 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
93 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
94 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
95 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
96 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
97 call assert_equal('', lines[30])
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
98
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
30592
457ea0570b6f patch 9.0.0631: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 30158
diff changeset
144 call writefile(lines, 'Xprofile_func.vim', 'D')
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.log')
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
217 endfunc
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
218
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
219 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
220 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
221 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
222 endfunc
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
223
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
224 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
225 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
226 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
227 try
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
228 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
229 catch
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
230 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
231 finally
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
232 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
233 endtry
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
234 endXXX
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
235 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
236 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
237 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
238 catch
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
239 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
240 finally
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
241 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
242 endtry
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
243 endXXX
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
244 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
245 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
246 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
247 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
248 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
249 finally
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
250 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
251 endtry
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
252 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
253 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
254 call Foo2()
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
255 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
256 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
257 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
258 catch
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
259 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
260 endtry
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
261 if rethrown != 1
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
262 " 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
263 call Foo1()
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
264 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
265 [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
266
23725
f98692ae09a0 patch 8.2.2404: Vim9: profiling try/catch not correct
Bram Moolenaar <Bram@vim.org>
parents: 23723
diff changeset
267 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
268 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
269
30592
457ea0570b6f patch 9.0.0631: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 30158
diff changeset
270 call writefile(lines, 'Xprofile_func.vim', 'D')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
271 call system(GetVimCommand()
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
272 \ . ' -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
273 \ . ' -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
274 \ . ' -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
275 \ . ' -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
276 \ . ' -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
277 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
278
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
279 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
280
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
281 " - 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
282 " - 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
283 " - 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
284 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
285
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
286 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
287 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
288 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
289 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
290 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
291 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
292 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
293 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
294 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
295 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
296 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
297 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
298 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
299 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
300 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
301 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
302 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
303 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
304 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
305 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
306 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
307 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
308 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
309 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
310 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
311 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
312 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
313 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
314 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
315 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
316 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
317 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
318 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
319 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
320 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
321 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
322 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
323 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
324 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
325 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
326 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
327 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
328 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
329 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
330 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
331 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
332 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
333 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
334 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
335 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
336 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
337 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
338 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
339 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
340 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
341
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
342 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
343 endfunc
96878f6f5d4c patch 8.1.0309: profiling does not show a count for condition lines
Christian Brabandt <cb@256bit.org>
parents: 14228
diff changeset
344
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
345 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
346 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
347 func! Foo()
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 17089
diff changeset
348 endfunc
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 17089
diff changeset
349 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
350 " a comment
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 17089
diff changeset
351 call Foo()
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 17089
diff changeset
352 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
353 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
354 [CODE]
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
355
30592
457ea0570b6f patch 9.0.0631: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 30158
diff changeset
356 call writefile(lines, 'Xprofile_file.vim', 'D')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
357 call system(GetVimCommandClean()
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
358 \ . ' -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
359 \ . ' -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
360 \ . ' -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
361 \ . ' -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
362 \ . ' -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
363 \ . ' -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
364 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
365
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
366 let lines = readfile('Xprofile_file.log')
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 call assert_equal(14, len(lines))
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_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
371 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
372 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
373 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
374 call assert_equal('', lines[4])
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
375 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
376 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
377 call assert_equal(' endfunc', lines[7])
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
378 " 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
379 " 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
380 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
381 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
382 " 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
383 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
384 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
385 " 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
386 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
387 call assert_equal('', lines[13])
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
388
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
389 call delete('Xprofile_file.log')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
390 endfunc
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
391
12658
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
392 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
393 let lines = [
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
394 \ 'echo "hello',
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
395 \ ' \ world"',
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
396 \ 'echo "foo ',
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
397 \ ' \bar"',
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
398 \ ]
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
399
30592
457ea0570b6f patch 9.0.0631: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 30158
diff changeset
400 call writefile(lines, 'Xprofile_file.vim', 'D')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
401 call system(GetVimCommandClean()
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
402 \ . ' -es'
12658
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
403 \ . ' -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
404 \ . ' -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
405 \ . ' -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
406 \ . ' -c "qall!"')
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
407 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
408
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
409 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
410 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
411
14228
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
412 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
413 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
414 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
415 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
416 call assert_equal('', lines[4])
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
417 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
418 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
419 call assert_equal(' \ world"', lines[7])
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
420 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
421 call assert_equal(' \bar"', lines[9])
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
422 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
423
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
424 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
425 endfunc
20aacdca367d patch 8.0.1207: profiling skips the first and last script line
Christian Brabandt <cb@256bit.org>
parents: 12128
diff changeset
426
28373
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
427 " Test for ':profile stop' and ':profile dump' commands
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
428 func Test_profile_stop_dump()
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
429 call delete('Xprof1.out')
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
430 call delete('Xprof2.out')
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
431 call delete('Xprof3.out')
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
432 func Xprof_test1()
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
433 return "Hello"
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
434 endfunc
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
435 func Xprof_test2()
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
436 return "World"
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
437 endfunc
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
438
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
439 " Test for ':profile stop'
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
440 profile start Xprof1.out
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
441 profile func Xprof_test1
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
442 call Xprof_test1()
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
443 profile stop
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
444
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
445 let lines = readfile('Xprof1.out')
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
446 call assert_equal(17, len(lines))
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
447 call assert_equal('FUNCTION Xprof_test1()', lines[0])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
448 call assert_match('Defined:.*test_profile.vim:', lines[1])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
449 call assert_equal('Called 1 time', lines[2])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
450 call assert_match('^Total time:\s\+\d\+\.\d\+$', lines[3])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
451 call assert_match('^ Self time:\s\+\d\+\.\d\+$', lines[4])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
452 call assert_equal('', lines[5])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
453 call assert_equal('count total (s) self (s)', lines[6])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
454 call assert_match('^\s*1\s\+.*\sreturn "Hello"$', lines[7])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
455 call assert_equal('', lines[8])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
456 call assert_equal('FUNCTIONS SORTED ON TOTAL TIME', lines[9])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
457 call assert_equal('count total (s) self (s) function', lines[10])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
458 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Xprof_test1()$', lines[11])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
459 call assert_equal('', lines[12])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
460 call assert_equal('FUNCTIONS SORTED ON SELF TIME', lines[13])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
461 call assert_equal('count total (s) self (s) function', lines[14])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
462 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Xprof_test1()$', lines[15])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
463 call assert_equal('', lines[16])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
464
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
465 " Test for ':profile stop' for a different function
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
466 profile start Xprof2.out
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
467 profile func Xprof_test2
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
468 call Xprof_test2()
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
469 profile stop
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
470 let lines = readfile('Xprof2.out')
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
471 call assert_equal(17, len(lines))
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
472 call assert_equal('FUNCTION Xprof_test2()', lines[0])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
473 call assert_match('Defined:.*test_profile.vim:', lines[1])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
474 call assert_equal('Called 1 time', lines[2])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
475 call assert_match('^Total time:\s\+\d\+\.\d\+$', lines[3])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
476 call assert_match('^ Self time:\s\+\d\+\.\d\+$', lines[4])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
477 call assert_equal('', lines[5])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
478 call assert_equal('count total (s) self (s)', lines[6])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
479 call assert_match('^\s*1\s\+.*\sreturn "World"$', lines[7])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
480 call assert_equal('', lines[8])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
481 call assert_equal('FUNCTIONS SORTED ON TOTAL TIME', lines[9])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
482 call assert_equal('count total (s) self (s) function', lines[10])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
483 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Xprof_test2()$', lines[11])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
484 call assert_equal('', lines[12])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
485 call assert_equal('FUNCTIONS SORTED ON SELF TIME', lines[13])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
486 call assert_equal('count total (s) self (s) function', lines[14])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
487 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Xprof_test2()$', lines[15])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
488 call assert_equal('', lines[16])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
489
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
490 " Test for ':profile dump'
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
491 profile start Xprof3.out
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
492 profile func Xprof_test1
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
493 profile func Xprof_test2
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
494 call Xprof_test1()
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
495 profile dump
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
496 " dump the profile once and verify the contents
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
497 let lines = readfile('Xprof3.out')
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
498 call assert_equal(17, len(lines))
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
499 call assert_match('^\s*1\s\+.*\sreturn "Hello"$', lines[7])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
500 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Xprof_test1()$', lines[11])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
501 call assert_match('^\s*1\s\+\d\+\.\d\+\s\+Xprof_test1()$', lines[15])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
502 " dump the profile again and verify the contents
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
503 call Xprof_test2()
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
504 profile dump
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
505 profile stop
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
506 let lines = readfile('Xprof3.out')
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
507 call assert_equal(28, len(lines))
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
508 call assert_equal('FUNCTION Xprof_test1()', lines[0])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
509 call assert_match('^\s*1\s\+.*\sreturn "Hello"$', lines[7])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
510 call assert_equal('FUNCTION Xprof_test2()', lines[9])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
511 call assert_match('^\s*1\s\+.*\sreturn "World"$', lines[16])
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
512
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
513 delfunc Xprof_test1
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
514 delfunc Xprof_test2
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
515 call delete('Xprof1.out')
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
516 call delete('Xprof2.out')
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
517 call delete('Xprof3.out')
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
518 endfunc
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
519
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
520 " Test for :profile sub-command completion
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
521 func Test_profile_completion()
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
522 call feedkeys(":profile \<C-A>\<C-B>\"\<CR>", 'tx')
28373
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
523 call assert_equal('"profile continue dump file func pause start stop', @:)
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
524
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
525 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
526 call assert_match('^"profile start.* test_profile\.vim', @:)
28091
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
527
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
528 call feedkeys(":profile file test_prof\<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
529 call assert_match('"profile file test_profile\.vim', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
530 call feedkeys(":profile file test_prof\<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
531 call assert_match('"profile file test_profile\.vim', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
532 call feedkeys(":profile file test_prof \<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
533 call assert_match('"profile file test_prof ', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
534 call feedkeys(":profile file X1B2C3\<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
535 call assert_match('"profile file X1B2C3', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
536
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
537 func Xprof_test()
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
538 endfunc
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
539 call feedkeys(":profile func Xprof\<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
540 call assert_equal('"profile func Xprof_test', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
541 call feedkeys(":profile func Xprof\<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
542 call assert_equal('"profile func Xprof_test', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
543 call feedkeys(":profile func Xprof \<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
544 call assert_equal('"profile func Xprof ', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
545 call feedkeys(":profile func X1B2C3\<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
546 call assert_equal('"profile func X1B2C3', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
547
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
548 call feedkeys(":profdel \<C-A>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
549 call assert_equal('"profdel file func', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
550 call feedkeys(":profdel fu\<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
551 call assert_equal('"profdel func', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
552 call feedkeys(":profdel he\<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
553 call assert_equal('"profdel he', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
554 call feedkeys(":profdel here \<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
555 call assert_equal('"profdel here ', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
556 call feedkeys(":profdel file test_prof\<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
557 call assert_equal('"profdel file test_profile.vim', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
558 call feedkeys(":profdel file X1B2C3\<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
559 call assert_equal('"profdel file X1B2C3', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
560 call feedkeys(":profdel func Xprof\<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
561 call assert_equal('"profdel func Xprof_test', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
562 call feedkeys(":profdel func Xprof_test \<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
563 call assert_equal('"profdel func Xprof_test ', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
564 call feedkeys(":profdel func X1B2C3\<Tab>\<C-B>\"\<CR>", 'tx')
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
565 call assert_equal('"profdel func X1B2C3', @:)
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
566
554f493902ea patch 8.2.4570: no command line completion for :profile and :profdel
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
567 delfunc Xprof_test
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
568 endfunc
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
569
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
570 func Test_profile_errors()
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
571 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
572 call assert_fails("profile pause", 'E750:')
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
573 call assert_fails("profile continue", 'E750:')
28373
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
574 call assert_fails("profile stop", 'E750:')
2ddf8aa1252c patch 8.2.4712: only get profiling information after exiting
Bram Moolenaar <Bram@vim.org>
parents: 28091
diff changeset
575 call assert_fails("profile dump", 'E750:')
10599
2748b23db6bb patch 8.0.0189: profile commands are not tested
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
576 endfunc
12992
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
577
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
578 func Test_profile_truncate_mbyte()
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 14706
diff changeset
579 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
580 return
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
581 endif
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
582
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
583 let lines = [
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
584 \ '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
585 \ 'func! Foo()',
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
586 \ ' return [',
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
587 \ ' \ "' . 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
588 \ ' \ "' . 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
589 \ ' \ ]',
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
590 \ 'endfunc',
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
591 \ 'call Foo()',
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
592 \ ]
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
593
30592
457ea0570b6f patch 9.0.0631: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 30158
diff changeset
594 call writefile(lines, 'Xprofile_file.vim', 'D')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
595 call system(GetVimCommandClean()
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
596 \ . ' -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
597 \ . ' -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
598 \ . ' -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
599 \ . ' -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
600 \ . ' -c "qall!"')
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
601 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
602
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
603 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
604 if &fenc != ''
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
605 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
606 endif
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
607 /func! Foo()
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
608 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
609 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
610 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
611 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
612 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
613 bwipe!
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
614
5532b5176870 patch 8.0.1372: profile log may be truncated halfway a character
Christian Brabandt <cb@256bit.org>
parents: 12658
diff changeset
615 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
616 endfunc
14228
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
617
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
618 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
619 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
620 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
621 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
622 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
623 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
624 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
625 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
626 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
627
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
628 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
629 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
630 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
631 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
632
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
633 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
634 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
635 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
636 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
637 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
638 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
639 [CODE]
30592
457ea0570b6f patch 9.0.0631: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 30158
diff changeset
640 call writefile(lines, 'Xprofile_file.vim', 'D')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
641 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
642 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
643
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
644 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
645 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
646
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
647 " Check that:
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
648 " - 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
649 " - 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
650 " - 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
651 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
652 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
653 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
654 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
655 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
656 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
657 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
658
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
659 call delete('Xprofile_file.log')
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
660 endfunc
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
661
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
662 func Test_profdel_star()
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
663 " 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
664 " 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
665 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
666 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
667 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
668 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
669 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
670 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
671 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
672 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
673 [CODE]
30592
457ea0570b6f patch 9.0.0631: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 30158
diff changeset
674 call writefile(lines, 'Xprofile_file.vim', 'D')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
675 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
676 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
677
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
678 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
679 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
680
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
681 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
682 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
683 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
684 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
685 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
686
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
687 call delete('Xprofile_file.log')
24109c2e0b0b patch 8.1.0131: :profdel is not tested
Christian Brabandt <cb@256bit.org>
parents: 12992
diff changeset
688 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
689
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
690 " 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
691 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
692 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
693
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
694 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
695 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
696 END
30592
457ea0570b6f patch 9.0.0631: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 30158
diff changeset
697 call writefile(lines, 'XtestProfile', 'D')
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
698 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
699
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
700 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
701 \ .. "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
702 \ .. "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
703 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
704 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
705 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
706 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
707 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
708 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
709 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
710
48fd0712dad8 patch 8.1.1946: memory error when profiling a function without a script ID
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
711 " 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
712 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
713 endfunc
21765
08940efa6b4e patch 8.2.1432: various inconsistencies in test files
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
714
23735
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
715 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
716 " 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
717 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
718 vim9script
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
719 def Func()
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
720 Crash()
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
721 enddef
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
722 def Crash()
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
723 enddef
23740
9b55c60f9d52 patch 8.2.2411: profile test fails on MS-Windows
Bram Moolenaar <Bram@vim.org>
parents: 23735
diff changeset
724 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
725 prof func Func
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
726 Func()
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
727 END
30592
457ea0570b6f patch 9.0.0631: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 30158
diff changeset
728 call writefile(lines, 'Xprofile_crash.vim', 'D')
23740
9b55c60f9d52 patch 8.2.2411: profile test fails on MS-Windows
Bram Moolenaar <Bram@vim.org>
parents: 23735
diff changeset
729 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
730 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
731 call assert_true(readfile('Xprofile_crash.log')->len() > 10)
30592
457ea0570b6f patch 9.0.0631: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 30158
diff changeset
732
23740
9b55c60f9d52 patch 8.2.2411: profile test fails on MS-Windows
Bram Moolenaar <Bram@vim.org>
parents: 23735
diff changeset
733 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
734 endfunc
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
735
23976
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
736 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
737 let lines =<< trim END
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
738 vim9script
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
739 var total = 0
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
740 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
741 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
742 Ref(i)
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
743 endfor
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
744 enddef
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
745 def Two(nr: number)
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
746 total += nr
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
747 enddef
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
748 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
749 prof func One
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
750 prof func Two
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
751 One((nr) => Two(nr))
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
752 assert_equal(3, total)
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
753 END
30592
457ea0570b6f patch 9.0.0631: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 30158
diff changeset
754 call writefile(lines, 'Xprofile_nested.vim', 'D')
23976
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
755 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
756 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
757
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
758 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
759 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
760 \ .. '#Called 1 time.*'
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
761 \ .. '# 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
762 \ .. '# 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
763 \ .. '# 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
764 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
765 \ .. '#Called 3 times.*'
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
766 \ .. '# 3 \s*[0-9.]\+ total += nr', prof_lines)
30592
457ea0570b6f patch 9.0.0631: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 30158
diff changeset
767
24043
15408ab5fed7 patch 8.2.2563: cannot use multibyte characters for folding in 'fillchars'
Bram Moolenaar <Bram@vim.org>
parents: 23976
diff changeset
768 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
769 endfunc
03819ebd3e6d patch 8.2.2530: Vim9: not enough testing for profiling
Bram Moolenaar <Bram@vim.org>
parents: 23740
diff changeset
770
23735
7caffd835aa1 patch 8.2.2409: Vim9: profiling only works for one function
Bram Moolenaar <Bram@vim.org>
parents: 23725
diff changeset
771
21765
08940efa6b4e patch 8.2.1432: various inconsistencies in test files
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
772 " vim: shiftwidth=2 sts=2 expandtab